Butuh bantuan dengan kode contoh untuk FTDI chip

[METI]

Hi everybody,

Saat ini saya sedang mengerjakan proyek sederhana menggunakan chip FTDI dan D2XX sopir MM232R.Im menggunakan Delphi untuk pemrograman.Aku tidak bisa membuat pekerjaan pemberitahuan acara.
Simeone dapat membantu saya dan mengirim kode Delphi sampel menunjukkan cara menginstal pemberitahuan event handler, dan bagaimana menggunakannya?

Thank you in advance

 

[METI]

Mari kita membuatnya lebih sederhana.Berikut adalah kode, proses berhenti di WaitForSingleObject, baris berikutnya mengeksekusi kode neve bahkan jika status modem berubah.

FT_Event_Handle: = CreateEvent (Nil, FALSE, FALSE ,'');
Set_USB_Device_Event_Notification (FT_EVENT_MODEM_STATUS atau FT_EVENT_RXCHAR);
while (true) do
mulai
WaitForSingleObject (FT_Event_Handle, INFINITE);
PortEventHandle;
end;

Di mana kesalahan?