Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Form nach vorne. (https://www.delphipraxis.net/157341-form-nach-vorne.html)

Muellermilchtrinker 8. Jan 2011 15:24

Delphi-Version: 2009

Form nach vorne.
 
Hallo Leute,

ich probiere grad auf einen Hotkey mein Formular nach vorne zu holen. Mein Versuche haben jedoch bis jetzt noch nicht geklappt. Es ist nie das Formular nach vorne gekommen. Hab ein
Code:
beep;
umzu schauen ob es gemerkt wird und siehe da der beep ertönt.
Vielleicht hat jmd. von euch eine Lösung. Meine Versuche: Form1.BringToFront, .Show, Application.restore.

Notxor 8. Jan 2011 15:26

AW: Form nach vorne.
 
Mit "SetForegroundWindow" sollte es gehen.

s.h.a.r.k 8. Jan 2011 15:28

AW: Form nach vorne.
 
BringToFront müsste schon funktionieren, außer du verwendest unter Umständen noch ein fsStayOnTop oder dergleichen (PopupParent z.B.). Und zeig vielleicht mal etwas Code her. Ist die Form versteckt? Minimiert? Nur hinter anderen (eigenen) Fenstern?

Muellermilchtrinker 8. Jan 2011 15:32

AW: Form nach vorne.
 
Also das ganze ist ne leere Form.
Mein Timer:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
  if getasynckeystate(ord('I'))<0 then
  begin
    beep;
    Form2.BringToFront;
  end;
end;
Die Form ist nur hinter anderen Fenster jedoch sind diese fremde. fsstayontop wird nicht verwendet oder sonstiges.

Muellermilchtrinker 8. Jan 2011 15:44

AW: Form nach vorne.
 
Zitat:

Zitat von Notxor (Beitrag 1073269)
Mit "SetForegroundWindow" sollte es gehen.

Jop damit funktioniert es.

Nur hab ich noch eine Frage. Dies soll für ein kleines Tool für ein Spiel sein. Jedoch, wenn ich jetzt das Fenster nach vorne hole, dann minimiert sich das Spiel. Kann ich das irgendwie umgehen oder gibts da keinen weg?

s.h.a.r.k 8. Jan 2011 16:03

AW: Form nach vorne.
 
Zitat:

Zitat von Muellermilchtrinker (Beitrag 1073272)
Also das ganze ist ne leere Form.
Mein Timer:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
  if getasynckeystate(ord('I'))<0 then
  begin
    beep;
    Form2.BringToFront;
  end;
end;
Die Form ist nur hinter anderen Fenster jedoch sind diese fremde. fsstayontop wird nicht verwendet oder sonstiges.

Was hälst du von sowas? Ich hasse pollen :stupid:

Muellermilchtrinker 8. Jan 2011 16:13

AW: Form nach vorne.
 
Zitat:

Zitat von s.h.a.r.k (Beitrag 1073275)
Zitat:

Zitat von Muellermilchtrinker (Beitrag 1073272)
Also das ganze ist ne leere Form.
Mein Timer:
Delphi-Quellcode:
procedure TForm2.Timer1Timer(Sender: TObject);
begin
  if getasynckeystate(ord('I'))<0 then
  begin
    beep;
    Form2.BringToFront;
  end;
end;
Die Form ist nur hinter anderen Fenster jedoch sind diese fremde. fsstayontop wird nicht verwendet oder sonstiges.

Was hälst du von sowas? Ich hasse pollen :stupid:

Das Spiel nimmt nur getasynckeystate alles andere bringt da nichts. :stupid:


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:03 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz