GetWindowTitle() mit Handle anstatt #Window

[Joshua314]

Hallo Leute,

ich suche eine Möglichkeit den Title von einem Beliebigen Window abzufragen, dessen Handle ich habe.


Den Handle bekomme ich durch.

Code: Alles auswählen

Procedure Callback(HWND.l, P.l)
  Debug "Handle "+Str(HWND)
  ProcedureReturn #True
EndProcedure


Debug EnumWindows_(@Callback(),0)

Ich brache jetzt dazu den Title.

Gruß Thomas

[RSBasic]

Code: Alles auswählen

EnableExplicit

Define Handle = FindWindow_("notepad", #Null)
Define WindowTitle$
Define WindowLength

If Handle
  WindowLength = GetWindowTextLength_(Handle)+1
  WindowTitle$ = Space(WindowLength)
  GetWindowText_(Handle, @WindowTitle$, WindowLength)
  Debug WindowTitle$
  
EndIf

[Bisonte]

da wäre GetWindowText_() im Angebot :

Code: Alles auswählen

Procedure Callback(hWnd, p)

  If IsWindow_(hWnd)
    lpString.s = Space(1024)
    GetWindowText_(hWnd, @lpString, 1024)   
    If lpString<>""
      Debug lpString
    EndIf
  EndIf
  
  ProcedureReturn #True
  
EndProcedure

Debug EnumWindows_(@Callback(),0) 

[Joshua314]

Danke.. an Alle
Gruß Thomas