Forum: Cross-Platform-Entwicklung
by skoschke,
24. Nov 2022
Ja, so habe ich es jetzt auch umgeändert:
Ich sammle die Zeilen in einer TStringList (Protokoll), ein Label zeigt die zuletzt eingetragene Zeile an.
Damit hat man zumindest die Rückmeldung, dass sich da was "bewegt".
Am Ende der Kommunikation wird Memo.Text := Ptotokoll.Text übergeben, zum Anschauen...
Ciao
Stefan
Forum: Cross-Platform-Entwicklung
by skoschke,
24. Nov 2022
Ach so :-)
Nein, in der Routine kommen teilweise nur halbe Zeilen an, erst wenn eine komplett ist, wird diese ausgegeben...
Ich suche schon nach einer anderen Komponente, aber so richtig finde ich nichts :-(
Ciao
Stefan
Forum: Cross-Platform-Entwicklung
by skoschke,
24. Nov 2022
wann soll das verwendet werden?
Vor Beginn und am Ende der Kommunikation?
Ich brauche die Anzeige der einlaufenden Zeilen!
Das wird so leider nichts...
Ciao
Stefan
Forum: Cross-Platform-Entwicklung
by skoschke,
24. Nov 2022
Hallo,
in einer App zur Stromzählerauslesung verwende ich ein TMemo zur Kommunikationsanzeige...
Die vom Zähler empfangenen Zeilen packe ich so in etwa ins Memo:
//inbuffer sind die am COMPort angekommenen Zeichen
p := pos(cr + lf, inbuffer);
while p <> 0 do