Delphi 7 i slanje sms

Re: Delphi 7 i slanje sms 01.02.2020. u 00:39 · pre 82 meseca #21

Ja sam dodao u moju aplikaciju više SMS Gateway servisa (BulkSMS, SMSGlobal...)

Od drugara sam dobio REST SMS Gateway Android aplikaciju preko koje uspešno šaljem poruke sa svog telefona. Moj program je doduše rađen u Lazarusu, ali sam koristio standardnu idHTTP komponentu sa slanje POST parametara. Radi i na Linuxu.
Napisao sam kratak tekst na blogu kako poslati poruku iz moje aplikacije. Vrlo lako može uraditi iz Delphi-ja, koji već ima Indy u paleti za razliku od Lazarusa

Potpis

Arduino Control Center

Re: Delphi 7 i slanje sms 19.03.2020. u 19:51 · pre 80 meseci #22

Zaboravih da napišem,ako neko želi da pošalje SMS preko telefona i preko AT komandi,najbolje da se uzme neka stara nokia i Nokia pc suite.Meni je uspelo sa Nokijom 2730 i sve radi.Uzmeš neku karticu sa beskonačno poruka i ugradiš u Aplikaciju i sve radi.

Re: Delphi 7 i slanje sms 22.03.2020. u 19:09 · pre 80 meseci #23

Izlazi mi ova greska,kada pridjem com3,nesto je google siromasan za ovu gresku,jel znate šta ovo znači.

slika.jpg28.47k

Re: Delphi 7 i slanje sms 23.03.2020. u 05:00 · pre 80 meseci #24

Kucas u command line "net helpmsg 121". Neki timeout je u pitanju kod upisa, verovatno ne moze da uspostavi vezu sa uredjajem pa javi gresku.

Potpis

Do not be a help vampire (http://slash7.com/pages/vampires), use the google.

How to ask questions the smart way:
http://www.catb.org/~esr/faqs/smart-questions.html
http://solair.eunet.rs/~fangor...stions/smart-questions.sr.html

Re: Delphi 7 i slanje sms 23.03.2020. u 15:43 · pre 80 meseci #25

Izlazi mi poruka:

the semaphore timeout period has expired.

Re: Delphi 7 i slanje sms 23.03.2020. u 21:46 · pre 80 meseci #26

Pronašao sam neku komponentu ZYLGSM ili tako nešto...I tu mi moj uredjaj pronađe kao com4(iako nije,već com3) i boundrate je 921600 i kada otvorim to,pošalje i poruku i poziva...Kako da uspem da stavim ovoliki boundr rate?

Re: Delphi 7 i slanje sms 25.03.2020. u 17:39 · pre 80 meseci #27

Uspeo sam da iz svoje Aplikacije pošaljem poruku,samo sa malo različitim AT komandama:

ComPort1.Open;
ComPort1.WriteStr('AT+CMGF=1'+#13#10);
ComPort1.WriteStr('AT+CSCS="GSM"'+#13#10);
ComPort1.WriteStr('AT+CMGS=' +'"' + EDIT1.Text +'"' +#13#10);
ComPort1.WriteStr(' > ' + MEMO2.Lines.Text);
ComPort1.WriteStr(#26);
ComPort1.WriteStr(Memo1.Text);

Hvala svima.

Zaboravih jos nesto da pitam,jel moguće jednu poruku poslati na više brojeva telefona?I koja je komanda za to?

Forum kao aplikacija na telefonu

Srodne teme