RS232Cデーターの送信

Write(Rs232c)

Write(const Buffer; Size: integer);//Byte or char 単位送信 サイズ指定

 例 1バイト送信

var

Dbyte: Pbyte;

begin

Comm1.Open;

Dbyte := 127;

Comm1.Write(Dbyte,1);

Comm1.Close;

end;

 例 char 送信

var

P:PChar;

begin

P :='Hello world!';

Comm1.Write(P,length(P));

end;

var

Buf: string;

begin

Buf := 'abcdefghijk';

Write(Pchar(Buf)^, Length(S)); // 送信処理

end;

SendString

SendString(S: string); //ストリング送信

 例 var

S: string;

begin

S := 'ABCD';

Comm1.SendString(S);

end;

SendSpace; //送信バッファ空き容量調査

 例 var

Freesize: Cardinal;

begin

Freesize := Comm1.SendSpace;

end;

送信の完了待ち指定