Warum wird die Komponente nicht gezeigt?!

[Ricane]

Moin,

ich versuche jetzt schon etwas länger, ein Bild (TImage) zur Laufzeit zu erstellen. Das Thema "Komponenten zur Laufzeit erstellen" wurde ja schon öfters angeschnitten, aber der Source der im Forum steht, scheint nicht auf eine TImage Kompomenten übertragbar zu sein ...

Delphi-Quellcode:

VAR
  Bild : TImage;
begin

  Bild := TImage.Create(tnserverliste);

  with Bild Do Begin
    Parent := tnserverliste;
    Stretch := True;
    Proportional := True;
    Center := True;
    Height := 130;
    Width := 130;
    Left := 16;
    Top := 288;
    Picture.LoadFromFile('C:\Bilder\Testbild.jpg');
    Show;
  End;

"tnServerliste" ist ein TTabbedNotebook Steuerelement.

Dazu ist wohl noch zu sagen, das der code zwar ausgeführt wird, aber das Bild ist nicht sichtbar...........

Grüsse,

Ricane

[Alexander]

Eigentlich sollte es funktionieren, jedenfalls auf den ersten Blick, vielleicht leigt es außerhalb der Komponenten? Lass Left und TOP einfach mal zur Probe weg oder stelle es auf 0.

[Ricane]

Zitat:

Zitat von alexander

Eigentlich sollte es funktionieren, jedenfalls auf den ersten Blick, vielleicht leigt es außerhalb der Komponenten? Lass Left und TOP einfach mal zur Probe weg oder stelle es auf 0.

Das war es... es wurde "geblocket" vom TN...

Na ja, habe den TN rausgeworfen und das Problem ist gelöst :D


Thx,

Ricane

[Alexander]

Eigentlich sollte das mit der Komponente TTabbedNotebook schon klappen, mein eVermutung war nur, dass das Image außerhalb der TTabbedNotebook-Komponente war...

[Ricane]

Moin,

also das erstellen der Komponenten klappert ja jetzt ohne Probleme... Aber wie kann man später denn wieder auf diese Komponente zugreifen?!

Ich hatte mir das so gedacht, aber das scheint nicht die ganze Wahrheit zu sein...

Delphi-Quellcode:

  I: Integer;
  Bild: TImage;

Begin

  If Richtung = 'Vor' Then
  Begin
    For I := AktAnzeige[1] To AktAnzeige[2] Do
    Begin
      Bild.Name := 'Name' + LaufendeNummer
      Bild.Visible := False;

Mmmhhh... any Ideas ?!


Grüsse,

Ricane

[LoL]

hi

schau dir mal die funktion FindComponent an

Gruß Christoph