[leon2009]

вернее как его вывести я знаю:

Код:

memo5.Lines.Add(inttostr(a[i]));

как сделать чтобы значение передавались по кнопке:

Код:

procedure TForm1.Button6Click(Sender: TObject);
begin
FileSearch('d:\image');
memo5.Lines.Add(a);
end;