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

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

Сохранение в Excel [D7, 2000]


vigo_ ©   (2007-10-03 15:20:00) 

Добрый день,
как сохранить данные из TClientDataSet в файл "*.xls"? Какие используются для этого компоненты и т.д. Спасибо.


Ping   (2007-10-03 16:37:00) [1]

vigo_   (03.10.07 16:27) [5]

Но сохранилась такая же ж.. как и твои рекомендации. Не понятно, зачем советовать заведомо левую информацию?

Ты просил сохранить в *.xls? Просил.
Сохранилось в *.xls? Сохранилось.
В MS Excel открылось? Открылось.

Значит, проблема не в моих рекомендациях, а в твоем вопросе.

вот нашел-таки, если кому понадобится:

Опять ерунду говоришь. Где в приведенном тобой коде сохранение в *.xls?

Резюме: "Не перекладывай с больной головы..." (С) Пословица


Сергей М.   (2007-10-03 16:36:00) [2]


> vigo_   (03.10.07 16:27) [5]


И как вся эта ботва связана с "сохранить данные .. в файл "*.xls" ?

Никак не связана.


vigo_   (2007-10-03 16:27:00) [3]


> Ping   (03.10.07 16:08) [4]

параметры я посмотрел, надо было DBClient подключить. Но сохранилась такая же ж.. как и твои рекомендации. Не понятно, зачем советовать заведомо левую информацию?

вот нашел-таки, если кому понадобится:

procedure TfmView.BtnSaveClick(Sender: TObject);
var
 XL, XArr: Variant;
 i, j: Integer;
begin
// Ñîçäàåì ìàññèâ ýëåìåíòîâ, ïîëó÷åííûõ â ðåçóëüòàòå çàïðîñà
 XArr:=VarArrayCreate([1, fmMain.CDSRes.FieldCount],varVariant);
 XL:=CreateOLEObject('Excel.Application');     // Ñîçäàíèå OLE îáúåêòà
 XL.WorkBooks.add;
 XL.Visible := True;

 j := 1;
 fmMain.CDSRes.First;
 while not fmMain.CDSRes.Eof do
 begin
   i := 1;
   while i


Ping   (2007-10-03 16:08:00) [4]

vigo_   (03.10.07 15:35) [3]

Ты бы список параметров SaveToFile() посмотрел бы в справке.


vigo_   (2007-10-03 15:35:00) [5]


> CDS.SaveToFile('c:\data.xls', dfXML);

Undeclared identifier: 'dfXML'


Ping   (2007-10-03 15:29:00) [6]

как сохранить данные из TClientDataSet в файл "*.xls"?

CDS.SaveToFile('c:\data.xls');

:-)

А если еще и так:

CDS.SaveToFile('c:\data.xls', dfXML);

то Excel его даже откроет...


Сергей М.   (2007-10-03 15:23:00) [7]


> как сохранить данные из TClientDataSet в файл "*.xls"?


Средствами исключительно TClientDataSet - никак.


> Какие используются для этого компоненты и т.д.


Любые подходящие компоненты, работающие с xls-форматом.


Наверх

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