Hi Steve!
Hier nochmal was ich grundsätzlich versuche:
Ich stelle eine Verbindung zu dem Endgerät her:
Delphi-Quellcode:
procedure TForm1.ToolButton6Click(Sender: TObject);
begin
if FileExists(ExtractFilePath(ParamStr(0))+'verbindung.ini') then
begin
ini:=TIniFile.create(ExtractFilePath(ParamStr(0))+'verbindung.ini');
if ini.ReadBool ('comport','checked',true) then
begin
ApdComPort1.ComNumber := ini.ReadInteger('comport','port',0);
ApdComPort1.Output := #13;
StatusBar1.Panels.Items[0].Text := 'Verbunden';
end;
end else
Form2.Show;
end;
Durch den CR wird die BaudRate des Endgerätes auf 9600 gesetzt (Dies funktioniert
komischerweise auch nicht immer).
Nun sende ich per Button Click z. B. 'M10=EIN'. Dadurch werden z. B. die
Einstellungen abgefragt. Diese hatte ich in einem Beitrag weiter oben
schon mal gepostet. So wie sie in dem Beitrag stehen kommen sie auch
zurück. Mit Hyperterminal funktioniert das alles sehr gut. Ich
weiß eben nicht, wie ich die empfangenen Daten weiterverwerten kann.
(Stringliste, in Memo speichern etc.). Fehlermeldungen bekomme ich eigentlich
keine.