Async Pro Terminal

[ashkan19]

hallo allerseits,

meine Frage ist ziemlich einfach und doch so schwer zu lösen. Ich verwende den Async Pro Terminal auf einem Program, der mit durch ein Port mit einem Modul kommuniziert. bis dahin läuft alles wunderbar. nun meine Frage ist, wie und mit welchem Befehl ich den Terminal als Stringformat ablesen kann, denn ein adterminal1.read existiert nicht. Ich möchte ganz einfach den erscheinenden Text in Terminal auslesen.

[himitsu]

AdTerminal1.Line

Oder wie wäre es, wenn du dich beim ComPort an eines der Empfangs-Ereignisse hängst?

[ashkan19]

wie konnte ich das adterminal1.line in einem memo anzeigen. ich kriege eine Fehlermeldung....liegt es daran dass adterminal.line in Ansistring ist?

[freimatz]

"eine Fehlermeldung" :cyclops:

vielleicht: memo.text := adterminal1.line

[himitsu]

Line ist ein Array-Property und das andere sind TStrings.
-> vermutlich mit FOR-Schleifchen drüberlaufen

[ashkan19]

Zitat:

Zitat von himitsu (Beitrag 1478460)

Line ist ein Array-Property und das andere sind TStrings.
-> vermutlich mit FOR-Schleifchen drüberlaufen

Das habe ich schonherausgefunden, danke dir, aber das TMemo zeigt mir komische unlesbare Zeichen

[Klaus01]

.. was schickt denn die Gegenstelle?
Steuercode, Strings, ...
Wenn es alles ausser Strings sind, könntest Du die
unlesbaren Zeichen in Hex umwandeln und anzeigen.

Grüße
Klaus

[ashkan19]

Zitat:

Zitat von Klaus01 (Beitrag 1478481)

.. was schickt denn die Gegenstelle?
Steuercode, Strings, ...
Wenn es alles ausser Strings sind, könntest Du die
unlesbaren Zeichen in Hex umwandeln und anzeigen.

Grüße
Klaus

die Gegenstelle schickt mir solche Zeichen:

ËQì”P
$ÍQ
ËQ
$ÍQ
°ÔQ
$ÍQ
ËQ
$ÍQ
ËQܘP
$ÍQ

[Klaus01]

.. was willst Du mit den zeichen machen - bzw. was sollen sie bedeuten?
Sehen die Zeichen anders aus, wenn due den String in einen Ansi-String konvertierst.

Schickt die Gegenstelle 8Bit Zeichen, oder ...

Das sollte alles in der Dokumentation der Gegenstelle zu finden sein.

Grüße
Klaus

[ashkan19]

Zitat:

Zitat von Klaus01 (Beitrag 1478486)

.. was willst Du mit den zeichen machen - bzw. was sollen sie bedeuten?
Sehen die Zeichen anders aus, wenn due den String in einen Ansi-String konvertierst.

Schickt die Gegenstelle 8Bit Zeichen, oder ...

Das sollte alles in der Dokumentation der Gegenstelle zu finden sein.

Grüße
Klaus

ja sie sehen etwas anderes aus wenn ich den utf8toansi Funktion benutze, allerdings auch nicht besser. ich möchte einfach dass er mir den richtigen Text , welche auf dem Terminal scheint im Memo anzeigt

[TiGü]

Kopiere doch mal bitte aus der DOKUMENTATION deines Gerätes den Teil raus, der sich mit den Strings für den "erscheinenden Text in Terminal" - ich nehme an, Terminal ist ein BCD-Display o.ä. - beschäftigt und füge ihn hier ein.
Wenn du nur was gedrucktes hast, bitte scannen oder abfotografieren und als Anhang anfügen.

[Klaus01]

im ersten Ansatz würde Zeichen die einen Ascii Wert (ord(zeichen) < 32) von kleiner 32 haben ausfiltern.
Kleiner 32 weil das dann wahrscheinlich Steuerzeichen sind.
.. und dann mal weitersehen.

Grüße
Klaus

[ashkan19]

Zitat:

Zitat von TiGü (Beitrag 1478489)

Kopiere doch mal bitte aus der DOKUMENTATION deines Gerätes den Teil raus, der sich mit den Strings für den "erscheinenden Text in Terminal" - ich nehme an, Terminal ist ein BCD-Display o.ä. - beschäftigt und füge ihn hier ein.
Wenn du nur was gedrucktes hast, bitte scannen oder abfotografieren und als Anhang anfügen.

ich weiß zwar nicht was du meinst, aber ich kann dir gerne den Teil meiner Delphi code zeigen:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
apdcomport2.PutString('root'#13);
sleep(2000);
apdcomport2.PutString('cat /var/log/cellphone.log > test1.txt'#13);
apdcomport2.PutString('cat test1.txt'#13);
memo1.Lines.Add(utf8toansi(utf8toansi(adterminal2.Line[219])));





end;

[TiGü]

Zitat:

Zitat von ashkan19 (Beitrag 1478492)

ich weiß zwar nicht was du meinst,...

Ok, ein schwieriger Fall.
Ich versuche es mal so: Kannst du uns sagen, mit was dein PC mit deinem Delphi-Programm drauf verbunden ist?
Was ist das "Modul"? Ist das ein physisches Gerät zum Anfassen?
Ist es ein Linux, mit dem du per Terminal kommunizierst?
Der cat-Befehl und /var/log/ lässt darauf schließen.

Kannst du mal ein echo $LC_CTYPE schicken und uns mitteilen, was zurückkommt bzw. was im Terminal steht?

[ashkan19]

Zitat:

Zitat von TiGü (Beitrag 1478496)

Zitat:

Zitat von ashkan19 (Beitrag 1478492)

ich weiß zwar nicht was du meinst,...

Ok, ein schwieriger Fall.
Ich versuche es mal so: Kannst du uns sagen, mit was dein PC mit deinem Delphi-Programm drauf verbunden ist?
Was ist das "Modul"? Ist das ein physisches Gerät zum Anfassen?
Ist es ein Linux, mit dem du per Terminal kommunizierst?
Der cat-Befehl und /var/log/ lässt darauf schließen.

Kannst du mal ein echo $LC_CTYPE schicken und uns mitteilen, was zurückkommt bzw. was im Terminal steht?

Das Modul ist ein separates Gerät, worauf Linux instaleriert ist und mein Pc kommuniziert über die serielle Schnittstelle mit dem Modul.
wenn ich die oben genannten Befehle ausführe erscheint mir diesen Text im Terminal:

Code:

                                                                                                                                
+CME ERROR                                                                                                                      
+CME ERROR                                                                                                                      
+QSIMDET: 0,0                                                                                                                   
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
+QCSQ: "NOSERVICE"                                                                                                              
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
Quectel                                                                                                                         
BG96                                                                                                                            
Revision: BG96MAR02A07M1G                                                                                                       
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
864431046924538                                                                                                                 
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
BG96MAR02A07M1G_01.016.01.016                                                                                                   
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
+QNWINFO: No Service                                                                                                            
                                                                                                                                
OK                                                                                                                              
                                                                                                                                
OK

und genauso möchte ich es in Memo angezeigt bekommen

[TiGü]

Es handelt sich also um das hier?
https://www.quectel.com/product/bg96.htm
https://www.quectel.com/UploadImage/...anual_V2.1.pdf

[ashkan19]

Zitat:

Zitat von TiGü (Beitrag 1478500)

Es handelt sich also um das hier?
https://www.quectel.com/product/bg96.htm
https://www.quectel.com/UploadImage/...anual_V2.1.pdf

nein, es ist ein unbekannter Modul.

ich formuliere die Frage einfacher: wie kann man überhaupt den erscheinenden Text in Terminal in memo anzeigen lassen?

[TiGü]

Dafür müsstest du erstmal die richtige Zeichenkodierung rausbekommen (https://de.wikipedia.org/wiki/Zeichenkodierung), daher meine Frage nach der Dokumentation von deinem Gerät/Modul.

Vielleicht klemmst du erstmal ein Serial Port Sniffer/Monitor dazwischen und schaust, was da eigentlich bei dir ankommt:
https://www.virtual-serial-port.org/...tor-utilities/

[ashkan19]

Zitat:

Zitat von TiGü (Beitrag 1478506)

Dafür müsstest du erstmal die richtige Zeichenkodierung rausbekommen (https://de.wikipedia.org/wiki/Zeichenkodierung), daher meine Frage nach der Dokumentation von deinem Gerät/Modul.

Vielleicht klemmst du erstmal ein Serial Port Sniffer/Monitor dazwischen und schaust, was da eigentlich bei dir ankommt:
https://www.virtual-serial-port.org/...tor-utilities/

Ich danke dir...ic hab allerdings das Problemschon gelöst, indem ich einfach ein Com Terminal verwendet habe und die dazugehörige Funktion readstr()