2e Form zeigt kein Label?!

[lucius]

Hallo Leute,

Ich habe in meiner Anwendung 2 Formen einmal die Hauptform und einmal eine DatenForm(Form2).
Die DatenForm steht auf visible := false in den properties und Sie enthaelt ein Label mit nem Text.
Jetzt moechte ich per Knopfdruck Die DatenForm anzeigen (Form2.show) aber das Label auf der Form wird nicht angezeigt, nur die DatenForm selber.
Wie kriege ich das hin das das Label auch angezeigt wird?

Danke im voraus..

[3_of_8]

Ist das Label visible=True? Enthält das Label zum Zeitpunkt von Show einen Text?

[lucius]

Hi 3_of_8,

Zitat:

Ist das Label visible=True? Enthält das Label zum Zeitpunkt von Show einen Text?

Ja das Label ist visible := true und enthaehlt zum Zeitpunkt von Show einen Text.

[3_of_8]

Ganz sicher? Poste mal etwas Source, denn dieser Fehler ist vorsichtig ausgedrückt ...ungewöhnlich.

[lucius]

Also hier die Source vom Button der die Form anzeigen muss.

Delphi-Quellcode:

procedure TDemoForm.Button1Click(Sender: TObject);
begin
  form1.show; <--------- DataForm zeigen
  Screen.Cursor := crHourGlass;
  SaveURLToFile('http://www.....');
  NewsList := TStringList.Create;

if GetNewsFeed(...)
     then ParseNews
     else ShowMessage('Fehler!');

timer1.Enabled := true;
Listview.Invalidate;
form1.Close; <---------- DataForm wieder schliessen
Screen.Cursor := crDefault;
end;

[himitsu]

hmmm, ich wüßte jetzt och nüschts, außer das dein Programm eventuell nicht richtig reagieren/zeichnen kann.

Versuch es mal so?

Code:

...
Screen.Cursor := crHourGlass; 
[color=#ff0000]Application.ProcessMessages;[/color]
SaveURLToFile('http://www.....');
...

[lucius]

himitsu, hat geklapt danke.
Haette ich auch selber wissen muessen. :wall:

Manchmal sieht man durch die Baeume den Walt nichtmehr.

[himitsu]

Uhhh, meine Intuition kommt zurück :firejump:

PS: "Manchmal sieht man den Wald vor lauter Bäumen nicht mehr." :angel2: