Forum: Sonstige Fragen zu Delphi
Delphi
by MarkusReisser,
27. Mai 2014
So,
alles funktioniert nun. Die Verbindung konnte nur bei einem bestimmten Gerät nicht vom Tool aus aufgebaut werden.
Ich danke Euch für die Hilfe.
Mfg
Forum: Sonstige Fragen zu Delphi
Delphi
by MarkusReisser,
21. Mai 2014
Sorry, versehentlich überlesen :wink:
sReceive ist ein String?
Forum: Sonstige Fragen zu Delphi
Delphi
by MarkusReisser,
21. Mai 2014
Ich seh schon... :shock: Aber er unterrichtet natürlich noch im Fach Informatik. Vielleicht habe ich es aber auch nur falsch aufgefasst. Es ist doch schon so lange her :oops:
Nun zu der Ausgabe.
procedure TForm1.ComPort1RxChar(Sender: TObject; Count: Integer);
var
Ausgabe:String; // Variable vom Typ String
begin
ComPort1.ReadStr(Ausgabe, 80);
Memo1.Lines.Add(Ausgabe);
end;
Forum: Sonstige Fragen zu Delphi
Delphi
by MarkusReisser,
21. Mai 2014
Das hatte ich mal in der Schule vor 8 Jahren gelernt. Dort hieß es, dass man immer die aktuelle Form davor schreiben sollte.
Wenn ich z.B. Putty als Konsole nutze, sende ich darüber meine Befehle und bekomme dort natürlich auch die Antworten zu sehen. Genau das möchte ich in mein Tool implementieren. Das Senden der Befehle funktioniert :) Nun würde ich gern automatisch die Antworten in...
Forum: Sonstige Fragen zu Delphi
Delphi
by MarkusReisser,
20. Mai 2014
Hallo alle zusammen,
ich habe hier eine ganz einfache Anwendung, mit der ich Befehle über RS232 zu einem Gerät sende. Das funktioniert wunderbar.
Hier die Codeschnipsel (wirklich sehr sehr einfach gehalten):
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.ComPort1.Port:='COM1';
Form1.ComPort1.BaudRate:=br9600;