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

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

Выгрузка в Ёксель [D6, Win95/98, Win2k]


Keymaster ©   (2002-08-21 22:40:00) 

Люди, есть файл of TRecord;

Record - это
Field1 : String;
Field2 : String;
end;

надо читать из этого файла записи (не проблема)
и сделать из них Excell таблицу:
Field1 Fileld2;
Field1 Fileld2;
Field1 Fileld2;
Field1 Fileld2;
..............
Как с ёкселем работать?


propeller   (2002-08-21 23:46:00) [1]

Полагаю, беглое ознакомление с хелпом по Вижуал Барсику из Ёксельной справки сможет спасти гиганта мысли.
А после описанного Jeer ExcelApp:=... он возвращает Excel.Application и к нему весь Бурсик можно писать практически без изменений (с поправкой на встроенные константы и скобки в Дельфе квадратные для указания Cells[i,j] и т.п., а не круглые как в Вижауле)


Jeer   (2002-08-21 22:46:00) [2]

Примерно так

Var
ExcelApp: Variant;
..
ExcelApp:=CreateOleObject("Excel.Application");
ExcelApp.Visible:=True;
ExcelApp.Workbooks.add;
..
ExcelApp.ActiveSheet.Cells[i,j].Value := ..;


Наверх

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