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

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

Как можно изменить свойства ячейки Excel с помощю DDE [D7, MSSQL]

Jamik ©   (2005-07-29 10:24:00) 

Как можно изменить свойства ячейки Excel с помощю DDE (компонентами).. или вооообше другими способами?
Или ещё.. как можно создать документ Excel из delphi.

---

Savek   (2005-07-29 14:14:00) [1]

ExcelApp:=CreateOleObject('Excel.Application');
ExcelApp.WorkBooks.Add(1);
ExcelApp.WorkBooks[1].WorkSheets[1].Name:=sheet[1];
ExcelApp.WorkBooks[1].WorkSheets.Add;
ExcelApp.WorkBooks[1].WorkSheets[1].Name:=sheet[2];
ExcelApp.WorkBooks[1].WorkSheets.Add;
ExcelApp.WorkBooks[1].WorkSheets[1].Name:=sheet[3];
ExcelApp.WorkBooks[1].WorkSheets.Add;
ExcelApp.WorkBooks[1].WorkSheets[1].Name:='Режим работы';

ExcelApp.WorkBooks[1].WorkSheets[Sheet[i]].Range['B1','B2'].ColumnWIdth:=60;
ExcelApp.WorkBooks[1].WorkSheets[Sheet[i]].Range['A1','A'+IntToStr(RowCont)].Font.Bold:=true;
ExcelApp.WorkBooks[1].WorkSheets[Sheet[i]].Range['A1','D1'].Font.Bold:=true;
ExcelApp.WorkBooks[1].WorkSheets[Sheet[i]].Range['A1','D1'].Font.Color:=clRed;
ExcelApp.WorkBooks[1].WorkSheets[Sheet[i]].Range['A1','D1'].HorizontalAlignment:=3;

---

RusLAN_   (2005-07-29 11:04:00) [2]

ИМХО про DDE лучше уже забыть

используй компоненты TExelApplication, TExcelWorkBook, TExcelWorkSheet из вкладки Servers

---

Наверх