list1MouseMove method |
Applies to
TForm5
Declaration
procedure list1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);Implementation
procedure TForm5.list1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin try Button2.Enabled := Filectrl.DirectoryExists(cmb1.Path); except end;End; |
|