Связь по компонентам

[Heneken87]

Сообщение от sistemsx

Добрый день. Не пойму почему не работает, делфи ругается на GetAllFiles, что надо добавить в uses?

Добрый. GetAllFiles надо объявить как приватную или публичную процедуру

unit ;
....
interface
....
uses
....
type
....
private
procedure GetAllFiles(Path:string;lb:Tlistbox); //Поиск в 1 каталоге

На вход подается путь, и любой листбокс с формы, там будут записаны результаты поиска

bufer_listbox.Clear;
GetAllFiles('C://My_DIR/',bufer_listbox);