Form immer im vordergrund

[ghost007]

Hallo,
hab mal wieder ein problem ...
Gibt es eine möglichkeit, wie ich meine form immer ontop habe, und man sie sogar vor einem spiel sieht, das im vollbild modus läuft.
d.h. spiel läuft, man spielt ganz normal, blos vor der spiel-form is noch meine form, z.b. klein rechts unten in der ecke.

Danke schon mal

MfG - Ghost

[Corpsman]

Form1.Formstyle:=fsStayOnTop; Am Besten ist aber du machst das zur Debugg Zeit.

Wenn du das erst zur Runtime machst geht es anders, das weis ich aber grad net auswendig.

[ghost007]

hallo,
danke für deine antwort.
1.wie "zur debugg zeit" ?
2.ich habe bereits bei meiner form
oncreate
Form1.Formstyle:=fsStayOnTop; Aber die form bleibt nicht sichtbar vor dem spiel(im vollbildmodus)


[EDIT] ich glaube auch nicht das es mit dem StayOnTop getahn is ...

[ghost007]

Hi,
oder muss man das ganz von einer ganz anderen seite angehen?
mit nem Grafik hook, falls es sowas gibt?!

[Corpsman]

OK Probiers mal damit

Mit

Stayontop :Boolean

Delphi-Quellcode:

    If Stayontop Then
      SetWindowPos (Form1.Handle, HWND_TOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)
    Else
      SetWindowPos (Form1.Handle, HWND_NOTOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)

So mache ich das in meinem Project

[ghost007]

hallo,
danke für die antwort, aber wo soll das hin?

Da ich nicht weiß was du meinst hab ich es mal hier rein:

Delphi-Quellcode:

procedure TForm1.FormCreate(Sender: TObject);
begin
If Stayontop Then
      SetWindowPos (Form1.Handle, HWND_TOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)
    Else
      SetWindowPos (Form1.Handle, HWND_NOTOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)
end;

Das wird da aber nix

[Vjay]

Hallo Ghost,
ohne zuviel verraten und somit die Spannung aus dem Faden nehmen zu wollen, schau dir mal die Delphi-Hilfe zu setWindowPos und WM_WINDOWPOSCHANGING an.

*EDIT* zu deinem Text,

Mach dir eine Prozedur mit einem Parameter namens Stayontop.

[ghost007]

hi,
also.
habe mir jetzt mal diese procedure gebastelt:

Delphi-Quellcode:

procedure Stayontop (Stayontop:Boolean);
begin
If Stayontop Then
      SetWindowPos (Form1.Handle, HWND_TOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)
    Else
      SetWindowPos (Form1.Handle, HWND_NOTOPMOST, -1, -1, -1, -1, SWP_NOMOVE + SWP_NOSIZE)
end;

ABER:
1.Ich starte ein Spiel im vollbildmodus
2.wenn ich da hin gehe, wo im windows die form ist, wird mein zeiger zu nem normalem curosr, aber die form kann man nicht sehen.

[Vjay]

Okay,

tschuldigung das ich frage, hört sich vielleicht etwas komisch an, aber: Rufst du die Prozedur überhaupt auf? Wenn ja starte ich sofortig mein Delphi und bastel dir was. Muss aber gleich in die Falle, also poste fix

[ghost007]

natürlich rufe ich die prozedur auf ^^

mit dem tastekürzel F5 (globaler hotkey)

[EDIT]Man sieht die form einmal kurz aufleuchten, und dann verschwindet se weider, wenn man aber an die stelle klickt, wo sie aufgeläuchtet hat, komme ich ins windows und hab die form makiert ...

[EDIT]Ich teste das ganze mit Warcraft 3, falls euch das was sagt. Aber ich denke das das spiel keine rolle spielt