Mit dem Beispiel klappts auch. Doch ich möchte das nicht mit der Terminalkomponente machen sondern einfach nur mit Comport.
So ist mein Code vom Button:
Delphi-Quellcode:
var s:ansistring;
begin
comPort1.Write(pchar(edit1.Text),1);
comport1.Write(#13,1);
s := ansistring(edit2.Text);
comport1.WriteStr(s);
comport1.Write(#13,1);
Edit1.Text = 2
Edit2.Text = &B00110011
Im Terminal siehts dann so aus:
Aber bei Muster sollte der ganze Text ausm Editfeld stehen.