![]() |
Re: Findwindow die 3566....
hi
soll ja kein flodder werden sowas is was für spielkids ... ich brauch des ding persönlich aus gesundheitlichen gründen ... mfg |
Re: Findwindow die 3566....
Zitat:
Delphi-Quellcode:
macht was draus Gruß: dorisdoloris
var
// globale Variablen zum rausfinden welche Nummer wir wollen und welche wir haben. I : Integer; WantedNr : Integer; iFensterH : THandle; --------------------------------------------------------- function EnumWindowsProcPrint(Handle: THandle; udata: longword): Boolean; stdcall; begin SendMessage(Handle, WM_SETTEXT, 0, integer(PChar('Nummer ' + IntToStr(I)))); Inc(I); Result := true; end; ---------------------------------------------------------- procedure TForm1.Button1Click(Sender: TObject); begin iFensterH := findwindow(nil, 'Fenstername'); I := 0; if iFensterH <> 0 then EnumChildWindows(iFensterH, @EnumWindowsProcPrint, 0); end; --------------------------------------------------------- function EnumWindowsProc(Handle: THandle; Edit: TEdit): Boolean; stdcall; begin if Assigned(Edit) and (I = WantedNr) then begin SendMessage(Handle, WM_SETTEXT, 0, integer(PChar(Edit.Text))); Result := false; end else begin Result := true; Inc(I); end; end; [edit=sakura] [delphi]-Tags Mfg, sakura[/edit] |
Re: Findwindow die 3566....
Das selbe problem. Java Swing Applicationen haben keine Windows handels weil die komponenten
nicht von windows verwaltet werden sondern von JRE |
Re: Findwindow die 3566....
Mir fällt dazu dann nur noch ein, Eingaben auf der Tastatur zu simulieren. Dafür muss das Feld allerdings ausgewählt sein.
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 07:06 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz