AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Sonstige Fragen zu Delphi Problem beim Focus setzen nach erstellen eines forms

Problem beim Focus setzen nach erstellen eines forms

Offene Frage von "5etH"
Ein Thema von 5etH · begonnen am 7. Nov 2008 · letzter Beitrag vom 16. Mär 2009
Antwort Antwort
Seite 2 von 2     12
Benutzerbild von 5etH
5etH

Registriert seit: 4. Mär 2008
Ort: Giessen
217 Beiträge
 
Delphi 2007 Professional
 
#11

Re: Problem beim Focus setzen nach erstellen eines forms

  Alt 12. Nov 2008, 08:32
ich werde mich gleich daran machen und es mit source uploaden

EDIT: Wie versprochen das Testproject, es tritt auch der selbe fehler auf!
Angehängte Dateien
Dateityp: rar testprojekt_182.rar (5,0 KB, 2x aufgerufen)
Manuel
Lieber heimlich schlau als unheimlich dumm
  Mit Zitat antworten Zitat
nahpets
(Gast)

n/a Beiträge
 
#12

Re: Problem beim Focus setzen nach erstellen eines forms

  Alt 12. Nov 2008, 11:59
Hallo,

Du hast in Deinem Quelltext zweimal Form9.Show, aber nur einmal Application.BringToFront.
Verlagere das Form9.Show und Application.BringToFront so, dass es in dem entsprechenden Else-Zweig immer durchlaufen wird. Damit sollte es dann funktionieren.
Delphi-Quellcode:
  if seh then begin
    application.Minimize;
    for I := 0 to screen.formcount - 1 do begin
      screen.forms[i].hide;
    end;
    seh := false;
  end else begin
    if sperr then begin
      if not s8 then begin
        s8 := true;
        Application.CreateForm(TForm9, Form9);
      end;
    end else begin
      for I := screen.formcount -1 downto 0 do begin
        screen.forms[i].show
      end;
      seh := true;
    end;
    form9.show;
    application.BringToFront;
  end;
  Mit Zitat antworten Zitat
Benutzerbild von 5etH
5etH

Registriert seit: 4. Mär 2008
Ort: Giessen
217 Beiträge
 
Delphi 2007 Professional
 
#13

Re: Problem beim Focus setzen nach erstellen eines forms

  Alt 12. Nov 2008, 12:08
wow super die lösung war total einfach
war echt blind ... habs mir echt komplizierter vorgestellt vielen dank für eure hilfe
funktioniert super
Manuel
Lieber heimlich schlau als unheimlich dumm
  Mit Zitat antworten Zitat
Schwedenbitter

Registriert seit: 22. Mär 2003
Ort: Finsterwalde
622 Beiträge
 
Turbo Delphi für Win32
 
#14

Re: Problem beim Focus setzen nach erstellen eines forms

  Alt 16. Mär 2009, 11:50
Hallo,

ich habe ein ähnliches Problem und wollte daher kein neues Thema aufmachen. Die Suche hat mir bislang auch keine Antwort beschert.

Mein Programm besteht aus einem Form, mit den Eigenschaften BorderStyle:=byNone; und FormStyle:=fsStayOnTop;. Weiterhin existiert keinerlei Anzeige in der Taskleiste mittels
Delphi-Quellcode:
SetWindowLong(Application.Handle,GWL_EXSTYLE,
              GetWindowLong(Application.Handle,GWL_EXSTYLE) Or
              WS_EX_TOOLWINDOW And Not WS_EX_APPWINDOW);
Es wird durch ein weiteres externes Programm aufgerufen und soll lediglich als eine Art Hinweisfenster kommen; allerdings mit einer Menge Interaktionsmöglichkeiten für den Benutzer. Das klappt soweit auch gut.

Allerdings möchte ich es gern auch mit der Tastatur bedienen können. Wird mein Programm eingeblendet, hat es aber nicht den Focus. Ich muss also erst mit der Maus auf das Fenster klicken und kann es dann - wie gewünscht - mit der Tastatur bedienen. Ich habe schon probiert, im Ereignis OnShow den Befehl Application.BringToFront; ausführen zu lassen. Das hat es nicht gebracht.

Wie kann ich es schaffen, dass das ohne den "goldenen Klick" geht?

Gruß und Dank, Alex
Alex Winzer
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:26 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