Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
9. Mär 2009
Ich hab's jetzt endlich geschafft, das richtige Fensterhandle und die richtigen Fensterkoordinaten zu bekommen. Dazu musste ich die Funktion GetMainAppWndFromPid etwas ändern:
function GetMainAppWndFromPid(PID: DWORD): THandle;
type
PSearch = ^TSearch;
TSearch = record
PID: DWORD;
Wnd: THandle;
end;
var
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
9. Mär 2009
Mhm, über SetWindowRect habe ich im Zusammenhang mit Delphi nichts Ergiebiges gefunden, wohl aber bei SetWindowPos:
SetWindowPos(AHandle,
HWND_TOPMOST,
rc.Left, rc.Top-100, rc.Right - rc.Left, rc.Bottom - rc.Top,
SWP_NOSIZE or SWP_NOACTIVATE or SWP_SHOWWINDOW);
Mit diesem Code kann ich zwar ein anderes Fenster bewegen, aber - wie Luckie bemerkt hat...
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
9. Mär 2009
Eine ganze Menge! Ich bitte dich außerdem, einen anderen Ton mir gegenüber zu verwenden! Wenn du etwa glauben solltest, dass ich nur Fragen stelle ohne selbst etwas zu tun (s. paralleler Thread), dann hast du dich gründlich getäuscht! Ich habe für dieses Forum schon eine Menge eigenen Code geschrieben! Bitte lass deine Vorurteile an jemand anderem aus!
Um wieder zum Thema zurückzukehren: Es...
Forum: Win32/Win64 API (native code)
Delphi
by PeterPanino,
8. Mär 2009
Hallo, ich habe es jetzt geschafft, die PID und das Fensterhandle vom Programmnamen zu bekommen:
program RepositionWindowFromExeName;
{$APPTYPE CONSOLE}
uses
Dialogs, // debug
JclSysInfo,
SysUtils, Windows;