Farbe unter dem Mauszeiger erkennen

[TStringlist]

Moin, Moin

Klar Shr, dürfte ja auch eine ganze Stange schneller sein. (Die Ecke war mir da im Moment aber auch gar nicht so wichtig.)

...das Bild, über welchem er aber immer mit dem Cursor drüber ist! Die Ergebnismenge ist also eher größer als notwendig gewesen ...und sollte event. jetzt nur auf das Bild reduziert werden? Z.B. so:

Delphi-Quellcode:

  with Mouse, Image1 do
  if (CursorPos.X < ClientOrigin.X) or (CursorPos.X >= ClientOrigin.X + Width)
  or (CursorPos.Y < ClientOrigin.Y) or (CursorPos.Y >= ClientOrigin.Y + Height)
  then Label1.Caption := ''
  else begin
    .
    .
    .
  end;