Форум: "Базы";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
ВнизКак результат запроса сохранить в txt файл, чтобы потом загрузить на сервер по ftp ? Найти похожие ветки
← →
Romul (2002-02-08 14:52) [12]Так ты сделай в твоей процедуре переменную типа TStringList и потом в нее закачивай данные из твоего Query. Примерно так
var
SLIst:TStringList;
begin
try
SList:=TStringList.Create;
.....
while not Query.Eof do
begin
for i:=0 to Query.DataSource.DataSet.RecordCount-1 do
SList.Strings[i]:=Query.FieldByName("Название поля в таблице").AsString+допустим пробел+еще одно поле той же строки
//так у тебя по идее заполнится структура TStringList в виде твоей таблицы
end;
SList.SaveToFile("C:\1.Txt");
finally
SList.Free;
end;
end;
Попробуй этот способ. Извини если что-то не так, сейчас просто нет возможности по быстрому это дело проверить, но принцип вроде такой.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2002.03.07;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c