Create von TLabel funktioniert nicht

[Dragon27]

Hallo,

habe heute folgenden Code ausprobiert, doch leider wird mir auf dem definierten Form das Label nicht angezeigt

Wisst Ihr warum?

Delphi-Quellcode:

var 
    Status:TForm;
    Progress:TJvXPProgressBar;
    anzeige:TLabel;
begin

status:=Tform.Create(nil);
with status do begin
  Position:=poScreencenter;
  width:=385;
  Height:=89;
  color:=clwhite;
  Formstyle:=fsstayontop;
  BorderStyle:=bstoolwindow;
  BorderIcons:=[];
  show;
end;

anzeige:=Tlabel.create(Status);

with anzeige do begin
  Left:=8;
  Top:=9;
  Caption:='Bitte warten... Vorgang wird initialisiert';
  show;
  anzeige.Repaint;
end;

Danke!

[khh]

setze mal noch das Form als parent


Gruss Kh

[Matze]

Hi,

du musst das Parent setzen, damit Delphi weiß, auf welcher Komponente das Label platziert werden soll:

anzeige.Parent := Form1; Grüße, Matze

Edit: zu langsam ...

[Dragon27]

Danke!

Hat funktioniert

Nun habe ich aber doch eine Frage... ich habe doch oben schon das Label meinem Form zugewiesen oder? Also mit:

Anzeige:=TLabel.create(Status); Warum muss ich das dann mit dem Parent noch machen... wo liegt der Unterschied?

Danke!

[Matze]

Ich bin mir nicht ganz sicher, aber der Owner sagt glaub nur aus, welcher Komponente das Label zugeordnet ist, was das Freigeben betrifft. Du musst das Label theoretisch nicht manuell freigeben, da zusammen mit dem Owner bzw. deinem Formular freigegeben wird.

Grüße, Matze

[khh]

da hat du das label nur erzeugt, aber nicht definiert wo es angezeigt werden soll.


Gruss KH

[Luckie]

Zitat von Matze:

Ich bin mir nicht ganz sicher, aber der Owner sagt glaub nur aus, welcher Komponente das Label zugeordnet ist, was das Freigeben betrifft. Du musst das Label theoretisch nicht manuell freigeben, da zusammen mit dem Owner bzw. deinem Formular freigegeben wird.

Richtig. Wenn ein Owner angegeben wird, kümmert dieser sich um die Freigabe.