RS232C受信データーサイズの取得

データー受信時のバッファ内データーのサイズを取得する為には、ReceiveSizeを使用します。

当然CommデバイスがOpen状態である必要があります。

通常は、割り込み受信を使用するので、受信サイズの取得はしません。

受信割り込みは、受信サイズを持ってきます。

var

Instring: string;

Procedure CommRead;

var

Size: Cardinal;

Buf: PChar;

begin

Size := Comm1.ReceiveSize;

if Size > 0 then

begin

Buf := AllocMem(Size + 1);

Comm1.Read(Buf,Size);

Instring := Buf;

Freemem(Buf, Size + 1);

end;

end;

RS232C受信の完了待ち指定