Wow. Das ging aber schnell.
Danke für die Antwort.
Habe das ganze jetzt mal ausprobiert, bekomme aber eine Fehlermeldung:
[Error] UnitMain.pas(22): Unsatisfied forward or external declaration: 'TFormMain.Test'
im Header meiner UnitMain steht:
Delphi-Quellcode:
...
type
TFormMain = class(TForm)
Button1: TButton;
Button2: TButton;
LabelHeader: TLabel;
Label1: TLabel;
Image1: TImage;
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure FormCreate(Sender: TObject);
private
{ Private-Deklarationen }
public
class function Test():boolean;
end;
...
function Test():boolean;
begin
showMessage('test');
end;
Und in der anderen
Unit steht das bereits im letzten Post erwähnte.
Wo liegt der Fehler.
Sorry, wenn ich mich vielleicht ein bisschen blöd anstelle
