Einzelnen Beitrag anzeigen

Luke_83

Registriert seit: 22. Mai 2007
Ort: Rödermark
32 Beiträge
 
Delphi 7 Professional
 
#1

Prüfen ob TImage Componente Existiet???

  Alt 3. Jun 2007, 21:13
Hallo wie kann ich überprüfen ob eine bereits erstellte Image oder Label Componente Existiet.

Habs schon etwas mit FindComponent probiert, was allerdings noch nicht zum geklappt hat.

Danke für die Hilfe.

Delphi-Quellcode:

procedure TForm1.hintergrund_erstellen;
var h:timage;
Begin

  h:=Timage.Create(Form1);
      with h do begin
          Parent:=Form1;
          Stretch:=True;
          AutoSize:=False;
          Width:=Form1.Width-10;
          Height:=Form1.Height-55;
          Visible:=True;
          SendtoBack;
          name:='hintergrund';
      End;

   IF FileExists(hintergrundpfad) Then
      h.Picture.LoadFromFile(hintergrundpfad);
End;
Wenn ich die Procedure nochmalaufrufe soll überprüft werden Ob die Componente schon existiert.
  Mit Zitat antworten Zitat