Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

вопрос по .db

Daria © (2005-12-08 16:14:00)
молодые люди, а как сохранить например table1 (у меня .db в Paradox) в виде текстового файла??

Daria (2005-12-08 18:06:00) [1]
всем мерси!

аматор (2005-12-08 18:00:00) [2]
Привет...

Кажись так:

var f : TextFile;
begin
Table1.First;
Assign(f, 'xxx.txt');
Rewrite(f);
While not Table1.Eof do begin
Write(поле1 + ..... + полеХ (лучше поля запихать в переменную));
Table1.Next;
end;
Close(F);

ну почти правильно :).

И вообще пять минут смеха продляет жизнь...
Кажись часа на два уже продлил. (можна ещё).

Плохиш (2005-12-08 17:39:00) [3]

> Daria (08.12.05 17:22) [6]
> напишите прям командками

1. Открыть таблицу
2. Открыть файл
3. Установить индекс на первое поле
4. Записать в файл значение поля по указателю
5. Записать в файл разделитель полей
6. Увеличить индекс
7. Если индекс меньше количества полей, перейти к пункту 4
8. Записать в файл перевод строки
9. Перейти на следующую запись в таблице
10. Если таблица не закончилась, перейти к пункту 3
11. Закрыть файл
12. Закрыть таблицу

PS. Даша, если будешь ещё заставлять столько писать, то я тебя по-отцовски высеку.

Leonid Troyanovsky (2005-12-08 17:36:00) [4]

> Daria (08.12.05 17:32) [8]
> уважаемый, Игорь, большое спасибо. но это не дает ответ
> на мой вопрос

Последовательное применение полученных знаний
позволит не только получить качественный ответ
на данный вопрос, но и, возможно, на многие другие.

--
Regards, LVT.

Johnmen (2005-12-08 17:36:00) [5]
>Daria (08.12.05 17:32) [8]
>...это не дает ответ на мой вопрос

Где вопрос?

Daria (2005-12-08 17:32:00) [6]
уважаемый, Игорь, большое спасибо. но это не дает ответ на мой вопрос

Игорь Шевченко (2005-12-08 17:27:00) [7]
http://www.ln.ua/~openxs/articles/smart-questions-ru.html- там все написано

Daria (2005-12-08 17:22:00) [8]
так, позвольте...
там всякие copy и пр. ...
мне нужно в программке создать текстовый файл и из .db (с 1 полем) туда закинуть. раз уж вы меня тут усыновили, напишите прям командками, пжлста

Daria (2005-12-08 17:17:00) [9]
всем спасибо! обязательно усыновлюсь :)
это, блин, опять цикл делать что ль?
ой жуть какая....

Плохиш (2005-12-08 16:58:00) [10]

> msguns © (08.12.05 16:46) [2]
> Кидаю нафик работу, квартиру, дачу, машину, семью - еду
> свататься

Короче я её усыновляю, приезжай.

Игорь Шевченко (2005-12-08 16:49:00) [11]
msguns © (08.12.05 16:46) [2]

Приедешь - а там мужик бородатый. Вот радости-то :)

msguns (2005-12-08 16:46:00) [12]
Дашка - прелесть !
Кидаю нафик работу, квартиру, дачу, машину, семью - еду свататься ;)))

Sergey13 (2005-12-08 16:22:00) [13]
Даш. Ты же только что написала программу закачки ТХТ в Парадокс. Запусти ее наоборот. 8-)

Наверх

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