scusa il rirtardo...
Var
path: string;
begin
path:= 'f:\*.*';
Listbox2.Perform(LB_DIR, DDL_DIRECTORY or DDL_EXCLUSIVE, LPARAM(Pchar(Path)));
end;
ciao
scusa il rirtardo...
Var
path: string;
begin
path:= 'f:\*.*';
Listbox2.Perform(LB_DIR, DDL_DIRECTORY or DDL_EXCLUSIVE, LPARAM(Pchar(Path)));
end;
ciao