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

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

delfi выдает ошибку : project 1.exe raised exception class...


mike48 ©   (2006-01-17 09:56:00) 

delfi  выдает ошибку : project   1.exe raised exception class EOleSys with message 'недопустимая строка с указанием класса'. Process stopped. Use step or run to continue.
Оч прошу кто чё знает скажите, заранее благодарю.


Digitman   (2006-01-19 11:10:00) [1]


> на счет отладчика можно поподробнее


"Поподробнее" в каком смысле ?
Тебе прочитать лекцию об использовании встроенного в Делфи отладчика для отладки своих программ ? Или что ?


Mike48   (2006-01-19 11:00:00) [2]

эксель есть. А на счет отладчика можно поподробнее........


umbra   (2006-01-17 10:40:00) [3]

такая ошибка может означать, что на Вашем компе не установлен эксель


Digitman   (2006-01-17 10:36:00) [4]

Отладчик на что существует, как ты думаешь ?


Mike48   (2006-01-17 10:35:00) [5]

Исправил но эт не решило проблему........


Попов Виталий   (2006-01-17 10:22:00) [6]

Вместо 'exel.application' надо писать 'exсel.application'


Mike48   (2006-01-17 10:00:00) [7]

xlapp:=createoleobject('exel.application');
xlapp.visible:=true;
xlapp.workbooks.add(-4167);
xlapp.workbooks[1].worksheets[1].name:='отчет';
colum:=xlapp.workbooks[1].worksheets['отчет'].columns;
colum.columns[1].columnwidth:=20;
colum.columns[2].columnwidth:=20;
colum:=xlapp.workbooks[1].worksheets['отчет'].rows;
colum.rows[2].font.bold:=true;
colum.rows[1].font.bold:=true;
colum.rows[1].font.color:=clred;
colum.rows[1].font.size:=14;
sheet:=xlapp.workbooks[1].worksheets['отчет'];
sheet.cells[1,2]:='склад';
sheet.cells[2,1]:='цифры';
sheet.cells[2,2]:='наименование';
sheet.cells[2,3]:='дата';
sheet.cells[2,4]:='обоснование';
sheet.cells[2,5]:='кол-во';
index:=3;
datamodule2.bookname.First;
for i:=0 to datamodule2.bookname.RecordCount-1 do
begin
sheet.cells[index,1]:=datamodule2.bookname.fields.fields[2].asstring;
sheet.cells[index,2]:=datamodule2.bookname.fields.fields[3].AsString;
sheet.cells[index,3]:=datamodule2.bookname.fields.fields[4].asstring;
sheet.cells[index,3]:=datamodule2.bookname.fields.fields[5].asstring;
end;
end;

где-то тут......... точнее не знаю,


Johnmen   (2006-01-17 09:57:00) [8]

Осталось привести собственно строку кода.


Наверх

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