Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.015 c
1-56727
Ig
2003-11-04 21:03
2003.11.17
Как скрыть папку или файл?


3-56511
Stratos
2003-10-28 01:07
2003.11.17
Выбор записей с приоритетом


6-56795
MAY
2003-09-22 20:13
2003.11.17
Delphi7, Indy9.0 - отправка почты


1-56619
Zheks
2003-11-05 15:53
2003.11.17
Errors


1-56667
JohnJ
2003-11-07 20:17
2003.11.17
Печать RichEdit




   Наверх