labels sichtbar machen aus einer eigenen procedure

[jonsmithq]

Delphi-Quellcode:

procedure TForm1.blabla(Sender: TObject);
...
Label5.Visible := true;
...

Das will ich aber aus einer anderen procedure oder im Initialization Abschnitt
einer Unit machen.
Habs mit TForm1.Label5.Visible := true; probiert,
allerdings kommt dann eine Fehlermeldung:
Methodenbezeichner erwartet.

Hat jemand eine Ahnung wie das geht???

[ManuMF]

Lass mal das T bei TForm1.Label5... weg.

Gruß,
ManuMF

[ichbins]

Hallo,

erstmal: Herzlich willkommen in der Delphi-Praxis!

du darfst nicht tform1 schreiben, da dies der Klassenname der Form ist, wie integer bei einer Integervariable, sondern du musst form1.label5.visible:=true ausführen.

Im Initialization-Abschnitt einer Unit ist dies aber noch nicht möglich, da dort form1 noch gar nicht erstellt wurde.

Delphi-Quellcode:

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1};

{$R *.res}

begin
  //Hier werden die initialization-Abschnitte ausgeführt
  Application.Initialize;
  Application.CreateForm(TForm1, Form1); //Hier wird form1 erzeugt
  Application.Run; //Hier wird form1 angezeigt.
end.

[ManuMF]

Zitat von jonsmithq:

Das will ich aber aus einer anderen procedure oder im Initialization Abschnitt
einer Unit machen.

Also, in einer anderen Prozedur geht das, wenn sie in der gleichen Unit wie das Form1 steht oder die Unit die Unit mit dem Formular unter Uses zur Verfügung hat.

Gruß,
ManuMF

[jonsmithq]

Nun, erstmal danke für die Hilfe.
Das Programm startet jetzt... allerdings mit einem Runtime error.

[ManuMF]

Problem:

Zitat von jonsmithq:

Nun, erstmal danke für die Hilfe.
Das Programm startet jetzt... allerdings mit einem Runtime error.

Grund:

Zitat von ichbins:

Im Initialization-Abschnitt einer Unit ist dies aber noch nicht möglich, da dort form1 noch gar nicht erstellt wurde.

Lösung:
Erst auf Komponenten zugreifen, wenn sie erstellt wurden.

Gruß,
ManuMF