immer im VOrdergrung

qwertzuiopü · Beiträge: 63

HI!
ich will ein Program schreiben, das immer im VOrdergrund ist,und wie ein weiteres startmenü erscheint. Alle anderen programme, sollen im Volbild modus nur an dieses Program angrenzen, es aber nicht überdecken.

Kann mir da jemand helfen?

Danke!!!

WeBsPaCe · Verfasst: Sa 02.07.05 17:38

Hallo!

qwertzuiopü hat folgendes geschrieben:

[...] , das immer im VOrdergrund ist, [...]

markieren

Delphi-Quelltext

1:	SetWindowPos(TForm1(Self).Handle,HWND_TOPMOST,0,0,0,0,SWP_NOSIZE+SWP_NOMOVE);

qwertzuiopü hat folgendes geschrieben:

[...] und wie ein weiteres startmenü erscheint. [...]

markieren

Delphi-Quelltext

1:
2:
3:

Form1.Top := Screen.Height - Form1.Height;
Form1.Width := Screen.Width;
Form1.Left := 0;

qwertzuiopü hat folgendes geschrieben:

[...] Alle anderen programme, sollen im Volbild modus nur an dieses Program angrenzen, es aber nicht überdecken. [...]

Dazu fällt mir nichts ein... :gruebel:

Mhmmm...

Ehemaliges Mitglied Erhaltene Danke: 1

Klingt mir eher nach einer Suche in: Delphi-Forum, Delphi-Library

APPBAR.

qwertzuiopü · Beiträge: 63

Danke WeBsPaCe!

ABer ich weis nicht wo ich dies einsetzen soll, unter Form.create?
Wo genau muss ich es reinschreiben?

-qwertzuiopü-

WeBsPaCe · Verfasst: Mo 04.07.05 13:21

qwertzuiopü hat folgendes geschrieben:

ABer ich weis nicht wo ich dies einsetzen soll, unter Form.create? Wo genau muss ich es reinschreiben?

Jop. Unter TForm.Create. Guckst du:

markieren

Delphi-Quelltext

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

procedure TForm1.FormCreate(Sender: TObject);
begin
SetWindowPos(TForm1(Self).Handle,HWND_TOPMOST,0,0,0,0,SWP_NOSIZE+SWP_NOMOVE);
Form1.Top := Screen.Height - Form1.Height;
Form1.Width := Screen.Width;
Form1.Left := 0;
end;

qwertzuiopü · Beiträge: 63

kannst du mir auch noch sagen, wie ich verhindere, das der benutzer die größe von Form1 Ändern kann?

WeBsPaCe · Verfasst: Mo 04.07.05 13:50

qwertzuiopü hat folgendes geschrieben:

kannst du mir auch noch sagen, wie ich verhindere, das der benutzer die größe von Form1 Ändern kann?

markieren

Delphi-Quelltext

1:	Form1.BorderStyle := bsNone;

oder

markieren

Delphi-Quelltext

1:	Form1.BorderStyle := bsSingle;

qwertzuiopü · Beiträge: 63

Danke, jetzt klapt alles.

!!!DAnke!!!
-qwertzuiopü-

maxk · Verfasst: Mi 06.07.05 21:08

qwertzuiopü hat folgendes geschrieben:

Danke, jetzt klapt alles.

Dann markiere deine Frage bitte als beantwortet. Dies kannst du tun indem du am Ende des Threads den entsprechenden Link benutzt - Danke!

Irr ich mich eigentlich, wenn ich behaupt, dass es besser ist SetBounds(0,Screen.Height-Height,Screen.Width,Height); zu benutzen, weil hier nur eine Message gesendet wird. Der Code von WeBsPaCe müsste eigentlich drei Messages senden, oder?

Gruß,
maxk

_________________
Ein Computer wird das tun, was Du programmierst - nicht das, was Du willst.

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme