Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
 
FAQFAQ   SuchenSuchen   MitgliederlisteMitgliederliste   BenutzergruppenBenutzergruppen  RegistrierenRegistrieren
ProfilProfil   Einloggen, um private Nachrichten zu lesenEinloggen, um private Nachrichten zu lesen   LoginLogin
Zur Begleitseite des Forums / Chat / Impressum
Aktueller Forenpartner:

GetFocus

 
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC.
Vorheriges Thema anzeigen :: Nächstes Thema anzeigen  
Autor Nachricht
braesident



Anmeldungsdatum: 15.04.2008
Beiträge: 189
Wohnort: Berlin

BeitragVerfasst am: 13.08.2014, 15:40    Titel: GetFocus Antworten mit Zitat

hallo leute, kann mir jemand sagen wie das mit getfocus genau aussehen muss. bekomm es nicht hin.

Code:
#include "windows.bi"

screenres 666, 444, 32
windowtitle "meinprog"
Dim As HANDLE hWnd = FindWindow(0, StrPtr("meinprog"))
do
  sleep 1
  cls
  ? hWnd
  ? GetFocus
  If GetFocus = hwnd Then ? "meinprog hat den focus"

loop until inkey = chr(27)

ich dachte erst es müsste so aussehen -> GetFocus(hWnd) - doch dabei gibt es immer eine fehlermeldung. dann hab ich hir im forum die variante gefunden wie sie oben in meinem Code steht: keine fehlermeldung aber GetFocus ist natürlich immer 0(null)
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden MSN Messenger
RockTheSchock



Anmeldungsdatum: 04.04.2007
Beiträge: 138

BeitragVerfasst am: 13.08.2014, 16:42    Titel: Antworten mit Zitat

GETFOREGROUNDWINDOW() ist die Function die du gesucht hast.


In der der Dokumentation zu GetFocus steht das auch drin.
http://msdn.microsoft.com/de-de/library/windows/desktop/ms646294%28v=vs.85%29.aspx
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
St_W



Anmeldungsdatum: 22.07.2007
Beiträge: 956
Wohnort: Austria

BeitragVerfasst am: 13.08.2014, 17:09    Titel: Re: GetFocus Antworten mit Zitat

braesident hat Folgendes geschrieben:
Code:
windowtitle "meinprog"
Dim As HANDLE hWnd = FindWindow(0, StrPtr("meinprog"))

.. das ist auch nicht wirklich eine saubere Art und Weise um das Fenster-Handle zu bekommen. Warum verwendest du nicht einfach ScreenControl(FB.GET_WINDOW_HANDLE, @hWnd) ? (bzw. GetConsoleWindow() falls du eine Konsolenapplikation schreiben willst).
_________________
Aktuelle FreeBasic Builds, Projekte, Code-Snippets unter http://users.freebasic-portal.de/stw/
http://www.mv-lacken.at Musikverein Lacken (MV Lacken)
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden
braesident



Anmeldungsdatum: 15.04.2008
Beiträge: 189
Wohnort: Berlin

BeitragVerfasst am: 13.08.2014, 17:11    Titel: Antworten mit Zitat

ja danke das war was ich suchte
Nach oben
Benutzer-Profile anzeigen Private Nachricht senden MSN Messenger
Beiträge der letzten Zeit anzeigen:   
Neues Thema eröffnen   Neue Antwort erstellen    Das deutsche QBasic- und FreeBASIC-Forum Foren-Übersicht -> Allgemeine Fragen zu FreeBASIC. Alle Zeiten sind GMT + 1 Stunde
Seite 1 von 1

 
Gehe zu:  
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.

 Impressum :: Datenschutz