Einzelnen Beitrag anzeigen

mastaofdesasta

Registriert seit: 13. Sep 2006
8 Beiträge
 
#4

Re: probleme beim prozeduraufrufen

  Alt 16. Okt 2006, 12:24
Für den Owner hab ich nil und Self probiert: Dasselbe Problem. Ich poste mal den Code:

unit Unit1;

uses Unit2;

procedure TForm1.FormCreate(Sender: TObject);
var Form: TForm;
begin

Form:=TForm2.Create(nil);
Form.Show;

end;

unit Unit2;

uses Unit3;

procedure TForm2.Button1Click(Sender: TObject);
var Form: TForm;
begin
Form:=TForm3.Create(nil);
Form.Show;

end;

procedure TForm2.Test;
begin
Button1.Caption:='**';
end;

unit Unit3;

uses Unit2;

procedure TForm2.Button1Click(Sender: TObject);
begin
Unit2.Form1.Test;

end;

Wie gesagt die Methode Test ist public.

Instantiiert ist da alles richtig oder?
  Mit Zitat antworten Zitat