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

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

Ошибка Undeclared identifier: 'CreateOleObject' [D6, WinXP]


Mr_Jack ©   (2005-01-20 18:23:00) 

вот кусок кода проги,незнаю вроде вы всё верно,а ошибка :Undeclared identifier: 'CreateOleObject',в строке омеч звездой.
var
               
 Vals: Variant;
 MSExcel: Variant;

 rows,Cells:integer;  
begin

 try
   Screen.Cursor := crHourGlass;
   Rows:= 10;
   Cells:= 12;  
   Vals := VarArrayCreate([0, Rows, 0, Cells], varVariant);
   try
    *** MSExcel := CreateOleObject('Excel.Application');***

   except
     raise Exception.Create('Ошибка Excel');
   end;

   MSExcel.Application.EnableEvents := False;
   MSExcel.WorkBooks.Add('test.xls');
   MSExcel.Range[MSExcel.Cells[1,1], MSExcel.Cells[Rows, Cells]].Value := Vals;
   // Vals := XL.Range[XL.Cells[1,1], XL.Cells[Rows, Cells]].Value;
   XL.Visible := True;

 finally
     Screen.Cursor := crDefault;
 end;
end;
МОЖЕТ Я ГДЕ-ТО ЧТО-ТО не объявил?


Poirot   (2005-01-20 18:25:00) [1]

Логично! Видимо в uses надо прописать что-то, что скажет где искать CreateOleObject


begin...end   (2005-01-20 18:25:00) [2]

> Mr_Jack   (20.01.05 18:23)

> МОЖЕТ Я ГДЕ-ТО ЧТО-ТО не объявил?

Может. ComObj, например.


Наверх

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