list1MouseDown method

Applies to
TForm5

Declaration
procedure list1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);

Implementation

procedure TForm5.list1MouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin try
Button2.Enabled := Filectrl.DirectoryExists(cmb1.Path);
except end;End;

HTML generated by Time2HELP
http://www.time2help.com