я тоже подумал записать в простой listbox и считывать от туда
Код:
ListBox2.Items.Append(IncludeTrailingBackSlash(dirName)+searchResult.Name);
а в массив можно записать?
Код:
procedure TForm1.FileSearch(const dirName:string);
var
searchResult: TSearchRec;
begin
Result:=searchResult.Size;
end;
Код:
procedure TForm1.Button6Click(Sender: TObject);
var i:integer;
begin
FileSearch('d:\image');
memo5.Lines.Add(Result);
end;
это чтобы понять. а так ругается здесь:
Код:
SqlQuery1.ParamByName('size').AsString := '4456874mb'; //inttostr(imgsize);