Problem beim Erstellen eines Labels während der Laufzeit

[Ultimator]

Zitat:

Code:

F_Main.qrmain.fieldbyname('headline').AsString

^^^^^^^^^^^^^^^^^^^^^^
Vielleicht steht da ja gar nichts drin

[kiar]

was steht denn in

Delphi-Quellcode:

Eingang.Items.Count

drin

wenn das 0 ist wird auch kein label erzeugt.

raik

[Hazardos]

die schleife wird durchlaufen...
Es sind auch werte vorhanden...
es geht halt nur ums grundsätzliche, dass die Labels nicht angezeigt werden...
Ich könnte in der Caption auch etwas anderes reinschreiben (getestet!) und das Ergebnis würde das Selbe sein...

[Christian Seehase]

Moin Hazardos,

was mir im Moment komisch vorkommt:

Delphi-Quellcode:

with TNachrichten.Create(self) do

Delphi-Quellcode:

        with TLabel.create(Nachrichten) do
          begin
            Parent := Nachrichten;

hängen Nachrichten und TNachrichten zusammen?
Bzw. Was ist Nachrichten?

[Hazardos]

Nachrichten ist ein Formular, welches ich so genannt habe. mit TNachrichten.create erstelle ich das formular und es wird auch angezeigt...

[Hazardos]

Ich habe es jetzt umgeschrieben, da wohl keiner dieses Problem für diese Methode Lösen konnte....
Meine Lösung sieht so aus:

Delphi-Quellcode:

 Nachrichten := TNachrichten.Create(self); // neue zeile
with Nachrichten do                       // war: with TNachrichten.Create(self) do
  begin
    for i := 0 to Eingang.Items.Count-1 do
      begin
        with TLabel.create(Nachrichten) do
          begin
            Parent := Nachrichten;
            AutoSize := false;
            Height := 13;
            Width := 93;
            Transparent := false;
            Color := $00000062;
            Font.Color := clwhite;
            Left := 13;
            Top := i * 15 + 35;
            Name := 'Nachricht_Eingang_'+IntToStr(i);
            Caption := F_Main.qrmain.fieldbyname('headline').AsString;
            Tag := i;
          end;
      end;
  end;

[Christian Seehase]

Moin Hazardos,

das war es, worauf ich hinaus wollte.
Wenn Du der Variablen Nachrichten nicht die Adresse einer Instanz von TNachrichten zuweist, so dass Nachrichten einen ungültigen Pointer, oder nil enthält, hat die Zuweisung

Delphi-Quellcode:

Parent := Nachrichten;

zur Folge, dass nichts angezeigt wird, da es ja Nachrichten nichts verwendbares enthält.