Экспорт из таблицы access данных из определённых полей в файл .txt с разделителем используя delphi

@Grey777 · Регистрация: 24.05.2017

Студворк — интернет-сервис помощи студентам

Доброго времени суток.
Долго искал, но не смог найти целостной картины по теме, возможно непопулярна. Если кто может помочь с синтаксисом буду рад.
Хотелось бы узнать как правильно выбирать некоторые столбцы из таблицы access и с помощью delphi сохранять их в текстовик.
Еще непонятно как можно устроить так, чтобы каждый новый столбец записи отделялся / и запись оставалась в 1 строке текстовика а не прыгала на следующую. То есть сколько столбцов выбрали в access столько соответствующих разделителей (/) в 1 строке текстового файла, сколько выбрали записей sql выборкой столько записей сохранилось в файле. Надеюсь моя ситуация небезнадёжна.

@drvolodko · 24.05.2017, 21:20

Небезнадежна. Выбираете набор записей, далее загоняете это все в строку и значение каждого поля отделяете удобным для себя разделителем. Потом Сохраняете в файл. Например:

Delphi
1
2
3
4
5
6
7
8
9
10
procedure something;
var
stroka :String;
f :File;
i :Word;
begin
stroka:='';
for i:=0 to table1.recordcount-1 do
stroka:=stroka+'/'+знач. поля+'/'+знач.поля2+.......
end;

ну и потом stroka сохраняем в файл F. Далее F дописываем следующим набором stroka.

@krapotkin · 24.05.2017, 22:24

не используйте в датасетах RecordCount
это совсем не то, читайте документацию

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
L:=TStringList.Create
 
while not dataset.eof do
begin
  s:=dataset.fieldByname('xxx').asString+'/'+
       dataset.fieldByname('yyy').asString+'/'+
       dataset.fieldByname('zzz').asString;
  L.add(s);
  dataset.next;
end;
L.SaveToFile(filename);
L.free;

@drvolodko · 24.05.2017, 22:48

Сообщение от krapotkin

не используйте в датасетах RecordCount

Почему? Потому что программер может ошибиться в вычислении количества строк? eof в принципе почти то же самое. Тем более для визуального отслеживания прогресса Recorcount подойдет как нельзя лучше. Не спорю, использовать для прогресса inc(i), допустим тоже ништяк, но использовать эту же переменную сразу в двух вариантах рациональнее на мой взгляд. Цикл+счетчик прогресса. А так оба наших варианта одинаковы

@krapotkin · 24.05.2017, 22:54

потому что RecordCount <> select count(*) from table
это количество закаченных на клиента строк датасета
а не общее количество строк в датасете

@drvolodko · 24.05.2017, 23:05

хм... Т.е. если я сделал select по условию в таблице, то в датасет клиетского приложения я получу не все строки, что я выбрал? eof берет начало от первой строки и заканчивается на последней, а recordcount рискует остановиться на середине файла? Извините, я не спец, но можно ссылку на док, где это подробно расписано. Честно говоря, это меня заинтриговало. Препод таких различий нам не повествовал.

@krapotkin · 24.05.2017, 23:08

когда я пишу "читайте документацию", я имею в виду "читайте документацию"
http://docwiki.embarcadero.com... ecordCount

Новые блоги и статьи Все статьи Все блоги /
Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .	Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .

@Grey777 0 / 0 / 0 Регистрация: 24.05.2017 Сообщений: 2

	MS Access Экспорт из таблицы access данных из определённых полей в файл .txt с разделителем используя delphi 24.05.2017, 19:15. Показов 3703. Ответов 6 Метки нет (Все метки) Доброго времени суток. Долго искал, но не смог найти целостной картины по теме, возможно непопулярна. Если кто может помочь с синтаксисом буду рад. Хотелось бы узнать как правильно выбирать некоторые столбцы из таблицы access и с помощью delphi сохранять их в текстовик. Еще непонятно как можно устроить так, чтобы каждый новый столбец записи отделялся / и запись оставалась в 1 строке текстовика а не прыгала на следующую. То есть сколько столбцов выбрали в access столько соответствующих разделителей (/) в 1 строке текстового файла, сколько выбрали записей sql выборкой столько записей сохранилось в файле. Надеюсь моя ситуация небезнадёжна. 0

@krapotkin 6847 / 4674 / 1463 Регистрация: 14.04.2014 Сообщений: 20,659 Записей в блоге: 21
	24.05.2017, 22:54
	потому что RecordCount <> select count(*) from table это количество закаченных на клиента строк датасета а не общее количество строк в датасете 1

@drvolodko 224 / 68 / 33 Регистрация: 23.05.2014 Сообщений: 745
	24.05.2017, 23:05
	хм... Т.е. если я сделал select по условию в таблице, то в датасет клиетского приложения я получу не все строки, что я выбрал? eof берет начало от первой строки и заканчивается на последней, а recordcount рискует остановиться на середине файла? Извините, я не спец, но можно ссылку на док, где это подробно расписано. Честно говоря, это меня заинтриговало. Препод таких различий нам не повествовал. 1

@krapotkin 6847 / 4674 / 1463 Регистрация: 14.04.2014 Сообщений: 20,659 Записей в блоге: 21
	24.05.2017, 23:08
	когда я пишу "читайте документацию", я имею в виду "читайте документацию" http://docwiki.embarcadero.com... ecordCount 1

Экспорт из таблицы access данных из определённых полей в файл .txt с разделителем используя delphi

Решение