TForm wird nicht unsichtbar :(

patmann2001 · Beiträge: 201 Windows 7 Prof. Delphi XE2

Hallo
Ich habe eine form1 Typ TForm.

Quelltext

1:	form1.visible:=false;

Wenn jetzt jedoch Code im Programm ausgeführt wird, erscheint der Balken der Form auf dem Desktop. Dann habe ich der Form gesagt, sie soll minimiert gestartet werden, dann jedoch läuft das Prog erst ab, wenn ich sie wieder maximiere. Wie kann ich den mein Programm so laufen lassen das meine Form unsichtbar bleibt.

cu Patmann

DeCodeGuru · Beiträge: 1333 Erhaltene Danke: 1 Arch Linux Eclipse

probiers mal mit:

markieren

Quelltext

1:	Form1.Hide;

_________________
Viele Grüße
Jakob

patmann2001 · Beiträge: 201 Windows 7 Prof. Delphi XE2

Ja
Hab ich schon
geht leider auch nicht.
cu Patmann

DeCodeGuru · Beiträge: 1333 Erhaltene Danke: 1 Arch Linux Eclipse

schreib mal in die *.dpr folgenden Code:

markieren

Quelltext

1:
2:
3:
4:
5:
6:

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.ShowMainForm := False;
  Application.Run;
end.

_________________
Viele Grüße
Jakob

LCS · Verfasst: Do 12.09.02 08:06

Hi
noch ne Variante:

markieren

Quelltext

1:
2:
3:
4:

procedure TForm1.FormActivate(Sender: TObject);
begin
  ShowWindow(self.Handle, SW_HIDE);
end;

Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...

patmann2001 · Beiträge: 201 Windows 7 Prof. Delphi XE2

HI
Die Lösung von LCS klappt leider auch nicht,das Formular wird trozdem ganz kurz sichtbar.

Von DeCodeGuru die Lösung ist super jedoch wird dann der Code in Form1 nicht ausgeführt. Das Programm beendet sich nicht u.s.w.

cu Patmann

LCS · Verfasst: Do 12.09.02 12:04

Hi
das Problem mit dem ganz kurz sichtbar kannst du damit lösen, dass du das Formular beim Erstellen ganz an den rechten Bildschirmrand verschiebst. Dadurch ist es praktisch überhaupt nicht mehr zu sehen.

markieren

Quelltext

1:
2:
3:
4:

TForm1.FormCreate....
begin
  Left := Screen.DesktopWidth;
end;

Gruss Lothar

_________________
Der BH ist für die Brust, der Plan ist für'n Ar...

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme