Einzelnen Beitrag anzeigen

Benutzerbild von TonyR
TonyR

Registriert seit: 17. Jun 2006
Ort: Bautzen
503 Beiträge
 
FreePascal / Lazarus
 
#4

Re: Maus auf ein Ereignis reagieren lassen

  Alt 15. Apr 2007, 09:02
Delphi-Quellcode:
function GetPixelFarbe: TColor;
var
  Pos: TPoint;
begin
  GetCursorPos(Pos);
  Result := GetPixel(DesktopDC, Pos.X, Pos.Y);
end;
Das würde glaube ich reichen...

Und das jetzt ins OnTimer von einem Timer...
Delphi-Quellcode:
if GetPixelFarbe = DieFarbe then
  MachDenMausklick;
Das kommt mir allerding ein bisschen ... naja... schwammig vor...
Vielleicht gibts es noch eine bessere Lösung dein Ziel zu erreichen...
Kannst ja mal sagen, was du vorhast!
Es ist unmöglich, witzig zu sein ohne ein bisschen Bosheit. Die Bosheit eines guten Witzes ist der Widerhaken, der ihn haften lässt. - Georg Christoph Lichtenberg
  Mit Zitat antworten Zitat