Dann ist eine keine Methode vom TForm1, zumindest keine public-Methode. Wenn du die Methode GetVersion innerhalb der Unit1 definierst, dann musst du diese auch nach außen hin "sichtbar" machen:
Delphi-Quellcode:
unit Unit1;
uses
// ...
type
TForm1 =
class(TForm)
// ...
end;
// Ohne diese Zeile ist GetVersion nur innerhalb der Unit1 nutzbar,
// aber auch nur in dem Code, der unter der function steht.
function GetVersion():
string;
implementation
function GetVersion():
string;
begin
Result := '
Blub';
end;
Soll GetVersion eine Methode von TForm1 sein, muss das wie folgt aussehen:
Delphi-Quellcode:
unit Unit1;
uses
// ...
type
TForm1 =
class(TForm)
public
function GetVersion():
string;
end;
implementation
function TForm1.GetVersion():
string;
begin
Result := '
Blub';
end;
»Remember, the future maintainer is the person you should be writing code for, not the compiler.« (Nick Hodges)