Einzelnen Beitrag anzeigen

Benutzerbild von s.h.a.r.k
s.h.a.r.k

Registriert seit: 26. Mai 2004
3.159 Beiträge
 
#4

AW: Function von Form1 in Form2 anzeigen

  Alt 13. Apr 2012, 10:46
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)
  Mit Zitat antworten Zitat