Zitat von
Islay:
Kann mir einer sagen warum ich immer ein "undefinierter Bezeichner" zurückgeworfen bekomme?
Delphi-Quellcode:
procedure machwas;
var
port: TSerialPortNG;
begin
//...
end;
procedure machwas2(port: TSerialPortNG);
var
text: String;
begin
text := 'Hallo';
port.SendString(text + #11);
end;
Ich denke mal, dass er
port nicht kennt.
Dies liegt daran, dass port keine Globale Variable ist, sondern in
machwas deklariert wurde, und somit it
machwas2 keine gültigkeit hat.
Lösungsmöglichkeit: Falls du die Geschichte in eine Klasse kapselst, kannst du port als privates Member deklarieren. Ansonsten kannst du sie als globale Varibale deklarieren (ist aber nicht allzuschön), oder als Parameter übergeben.