Hi Toms.
Danke schonmal für deine Antwort.
Delphi-Quellcode:
procedure TfrmMain.treeCategoriesClick(Sender: TObject);
var
HitInfo :THitInfo;
iMousePosX, iMousePosY: Integer;
begin
iMousePosX := Mouse.CursorPos.X;
iMousePosY := Mouse.CursorPos.Y;
treeCategories.GetHitTestInfoAt(iMousePosX,iMousePosY, false, HitInfo);
if HitInfo.HitPositions = [hiOnItem] then begin
ShowMessage('!!!');
end;
end;
Erkennst du gerade auf Anhieb was ich falsch mache?