Hallo zusammen,
ich bin gerade dabei ein Programm zu schreiben welchen
verschiedene Klassen erhalten soll.
Ich komme zur Zeit durcheinander mit Properties und Funktionen.
Ich weiß das das unten angegebene Beispiel nicht lauffähig ist,
ich hoffe jedoch daraus wird mein Problem ersichtlich.
Ich möchte aus einem anderen Formular die Klasse TTest.Status aufrufen,
und abhängig vom übergebenen Wert "true" oder "false" erhalten.
Delphi-Quellcode:
interface
...
TTest=class(TObject)
private
function GetStatus(ID:pchar):boolean;
public
property Status:boolean read GetStatus(ID:pchar);
end;
implementation
...
function TTest.GetStatus(ID:pchar): boolean;
begin
if ID=4711 then
result := true;
end;
Gruß
Sebastian