Einzelnen Beitrag anzeigen

Benutzerbild von bitsetter
bitsetter

Registriert seit: 17. Jan 2007
1.169 Beiträge
 
Turbo Delphi für Win32
 
#4

Re: Pixelfarbe aus anderem Programm auslesen

  Alt 7. Mär 2007, 23:13
Hi,

wenn du das Handle des Fensters kennst, dann geht es auch so:

Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
  CurPos: TPoint;
  lDC: HDC;
  h: HWND;
begin
  h:= findwindow();//oder auch was anderes
  SetForegroundWindow(h);
  lDC:= GetDC(h);
  if lDC> 0 then
  try
    Color:= GetPixel(lDC, 100, 120);
  finally
    ReleaseDC(h, lDC);
  end;
end;
Oder du musst das Handle mit EnumWindows herausfinden.
EDIT: Ich glaube das Fenster muss sich trotzdem im Vordergrund befinden.
Gruß bitsetter
"Viele Wege führen nach Rom"
Wolfgang Mocker (geb. 1954), dt. Satiriker und Aphoristiker
  Mit Zitat antworten Zitat