selamat pagi delphier..... mohon bantuan para delphier terhadap source aku ini :

var 
  sPDU,sAT,ss : String;
for i:= 1 to 5 do 
begin
 sPDU := fsmsConvertText('','','',lsTelp,'','','',sPesan,lpanjangoctet);
 sAT := 'AT+CMGS='+IntToStr(lpanjangoctet)+chr(13);
 comport.WriteStr(sAT);
 comport.WriteStr(sPDU);
 comport.WriteStr(chr(26));
 comport.ReadStr(ss,100);
 mmo1.Lines.Add(#13);
 mmo1.Lines.Add(ss);
end;

disini aku berusaha mengirim sms dengan modem gsm mengunakan komunikasi com dengan AT Command. hp yang aku gunakan adalah nokia 3110c. komponen yang aku gunakan adalah TComPort by Dejan Crnila versi 4 http://sourceforge.net/projects/comport/ permasalahan Tcomport yang terjadi : - ketika mengirim sms, sms hanya terkirim sejumlah 2 kali bukan 5 kali ( total perulangan) - kadang2 sms tidak terkirim sama sekali pengunaan Tcomport dilakukan pada windows 7 dan windows xp perbandingan : karena menggunakan Tcomport tidak sukses aku gunakam componen activex mscomm32.ocx hasilnya semua proses diatas berhasil. sms dikirm sejumlah perulangan. pengujian dengan mscomm32.ocx dilakukan di windows xp. permasalahannya sekarang, mscomm32.ocx tidak bisa di install di windows 7. so distribusi aplikasi sangat susah. asumsi disini fungsi fsmsConvertText() berfungsi dengan baik menggenerate kode PDU. mohon bantuan para master2 delphi, adakah kesalahan dari source code diatas ? atau ada bagian yang perlu ditambahkan, agar pengiriman sms berhasil semua. rencana digunakan untuk mengirim sms masal terima kasih banyak atas bantuan para delphier semoga Tuhan membalas kebaikan para delphier :)

persis spt yang aku alami...waktu pake ComPort sering gagal kirim sms (tanpa error message) lalu aku ganti ouxcom.....beres bisa kirim massal sms......

thanks mas kofa..... kalo boleh tahu komp auxcom itu berbayar tidak ??? dima kira2 linknya matur suwun

setau ku free sila di search (google) aja...

oke mas...thanks you