Buat temen2 yang mau tau gimana cara gampang komunikasi PC dengan COMM (RS232) dengan menggunakan toos Borland C++ Builder, gw mau kasih tau caranya :
- Kalian harus punnya dan install komponen untuk komunikasi melalui RS232, dalam hal ini gw pake komponen TCommPort.
- Pilih dan temptin aja komponen (yang udah di install) itu ke form kamu
- Untuk memulai komunikasi, port-nya harus di buka terlebih dahulu, carannya : buat satu tombol/menu untuk Connect, trus
masukin code berikut
void __fastcall TForm1::Connect1Click(TObject *Sender)
{
CommPort1->Open();
ShowMessage(CommPort1->Connected?"Connected":"Disconnected");
}
kalau keluar message "Connected", berarti Port telah terbuka dan siap melakukan komunikasi. - Untuk melakukan send data, buat satu tombol untuk Send, trus masukin code berikut :
void __fastcall TForm1::SendClick(TObject *Sender)
{
AnsiString tmpStr = "Hello";
CommPort1->Write(tmpStr.c_str(), tmpStr.Length());
} - Sedangkan Untuk menerima data yang masuk, caranya siapkan terlebih dahulu editor untuk menampilkan data yang di terima, gampangnnya pake memo. Pada event Commport (OnDataReceived), masukin code berikut :
void __fastcall TForm1::CommPort1DataReceived(TObject *Sender,
const char *Buffer, unsigned Length)
{
Memo1->Lines->SetText(AnsiStr(Buffer));
}
Code itu akan menampilkan data yang diterima, dan menampilkan data yang diterima berikutnnya pada baris baru. Untuk menampilkan data berikutnnya pada baris yang sama, maka perlu sedikit tambahan. caranya gimana,,, Utak - atik aja sendiri. heheh - Terakhir, untuk menutup komunikasi, masukin code berikut ke tombol Disconnect :
void __fastcall TForm1::Disconnect1Click(TObject *Sender)
{
CommPort1->Close();
ShowMessage(CommPort1->Connected?"Connected":"Disconnected");
}
Kalau keluar message "Disconnected", tandannya tau sendiri kan ...........
That's all,,, simple banget kan... silahkan mencoba berkomunikasi dengan RS232.
Karena komunikasi dengan manusia itu susah hehehhehe.........
Peace ....
No comments:
Post a Comment