Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Копировать все записи из таблицы в тхт файл. [D6, Paradox]


maxim2 ©   (2002-09-04 13:41:00) 

Привет всем!
Тут возникла ситуация надо скопировать все записи из таблицы в файл, подскажите как бы это сделать


Mike Kouzmine   (2002-09-04 13:56:00) [1]

while not t.eof do
begin
for i:= 0 to t.fieldscount - 1 do
case t.fields[i].datatype of
fkfloat : write(f,t.fields[i].asfloat);
......
end;
t.next;
writeln(f);
end


maxim2   (2002-09-04 13:46:00) [2]

Да любой. Желательно текстовый TXT, можно Word DOC


Mike Kouzmine   (2002-09-04 13:45:00) [3]

В какой файл? (формат)


Наверх

Титульная страница Поиск, карта сайта Написать письмо