I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
int GetWindowText ( HWND hWnd, // handle of window or control with text LPTSTR lpString, // address of buffer for text int nMaxCount // maximum number of characters to copy );
Hvordan den bruges i Delphi ved jeg ikke. Men i C ville det se nogenlunde således ud: int size = 256; char buffer[size]; GetWindowText(hwnd, buffer, size);
var WindowText: array[0..255] of char; Handle : HWND; begin GetWindowText(Handle, WindowText, 255); if WindowText <> '' then Memo1.Lines.Add(WindowText); end;
Her er osse en ting til at liste alle windows i en combo. Du kan måske bruge noget derfra, eller andre kan bruge det. Det viser osse enum med call-back metode. Classname hentes men benyttes ikke.
//disse to vars skal være globale var winCount: integer; windowsA: array[1..1000] of integer;
function getWindow(hdl: HWND; parm: pointer): BOOL; stdcall; begin inc(winCount); windowsA[winCount]:=hdl; //gem kun handlerne getWindow:=true; end; //enum call back
procedure getAll; var i: integer; buf: string; className: string; windowText: string; begin winCount:=0; enumWindows(@getWindow, longword(0)); //fylder array med alle windows cmbActivateWindow.Sorted:=true; for i:=1 to winCount do begin setLength(buf,1002); getClassName(windowsA[i],pchar(buf),1000); setLength(buf,pos(#0,buf)-1); className:=buf; setLength(buf,1002); getWindowText(windowsA[i],pchar(buf),1000); setlength(buf,pos(#0,buf)-1); windowText:=trimSpc(buf); if windowText <> '' then cmbActivateWindow.Items.AddObject(windowText,pointer(windowsA[i])); end; cmbActivateWindow.Sorted:=false; cmbActivateWindow.Items.InsertObject(0,'<none>',pointer($0)); cmbActivateWindow.ItemIndex:=0; end; //get all
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.