Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.17;
Скачать: CL | DM;

Вниз

Как сохранить таблицу   Найти похожие ветки 

 
Newman ©   (2003-10-26 16:56) [0]

Здравствуйте Мастера!

Как сохранить таблицу DBGrid т.е. сохранить в txt файле.

Спасибо


 
jack128 ©   (2003-10-26 17:08) [1]

with MyDataSet do
begin
First;
while not Eof do
begin
for i := 0 to Fields.Count - 1 do
s := s + #9 + Fileds[i].AsString;
s[Length(s)] := #0;
Append(MyTextFile, s);
s := ""
Next;
end;
end;
Примерно так..

P.S. f : Text; s: string;


 
jack128 ©   (2003-10-26 17:12) [2]

еще замечания MyDataSet := MyDbGrid.DataSource.DataSet;

> s[Length(s)] := #0;
читать как s[Length(s)-1] := #0;


 
jack128 ©   (2003-10-26 17:19) [3]

я глючу- прозьба не обращать внимания на код выше..


 
Дмитрий В. Белькевич ©   (2003-10-27 01:28) [4]

Влезу я со своим EhLib"ом, можно? ;)
DbGridEh умеет сам себя сохранять в txt,html,xls и csv.


 
Zacho ©   (2003-10-27 15:19) [5]


>
> Дмитрий В. Белькевич © (27.10.03 01:28) [4]
> Влезу я со своим EhLib"ом, можно? ;)

Даже нужно :)



Страницы: 1 вся ветка

Текущий архив: 2003.11.17;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
1-56715
mc_duck
2003-11-06 20:28
2003.11.17
Сохранение объекта в файл.


6-56794
ashka
2003-09-20 16:06
2003.11.17
помогите прощу вас!!!!


1-56655
Maks Realov
2003-11-05 11:23
2003.11.17
Аналог C-ого Union-а в Delphi есть?


7-56931
asJIura
2003-09-06 15:37
2003.11.17
Функция для получения серийного номера жесткого диска?


1-56726
RoLeX
2003-11-06 17:33
2003.11.17
Когда разница между Edit1.text и Edit2.text больше 14342, о прога