Mam taki kod:
procedure TForm1.VideoWindowMouseMove(Sender: TObject;
Shift: TShiftState; X, Y: Integer);
var
Point : TPoint;
DVDControl2 : IDVDControl2;
begin
if FilterGraph.Active then
If Succeeded(FilterGraph.QueryInterface(IID_IDVDControl2, DVDControl2)) then
begin
Point.x := x;
Point.y := y;
DVDControl2.SelectAtPosition(Point);
DVDControl2 := Nil;
end;
end;
Chcę żeby po najechaniu na jakikolwiek przycisk w menu, kursor zmienił się z crDefault na crHandPoint..... a po zjechaniu z przycisku z powrotem wrócił do crDefault....(taj jak np. WMP) Jak mogę to zrobić? Próbowałem na różne sposoby i nic :-/