Форум: "Основная";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];
ВнизЧто случилось с Excel.Application? Найти похожие ветки
← →
Aleksandr. (2004-10-12 16:33) [0]У меня уже давно был написан экспортер в Excel, прекрасно работал, засасывая csv. А тут поставил Office 2003, и работать он перестал. Раньше код был:
var
XLApp : Variant;
Sheet : Variant;
Range : Variant;
I : integer;
RangeStr : string;
begin
XLApp:=CreateOleObject("Excel.Application");
if VarIsEmpty(XLApp) then begin
RiMessage(0,h_Error,sNoExcel);
FExcelExists:=false;
Exit
end;
try
XLApp.DisplayAlerts := False;
if NOT FileExists(CheckDir(FTempDir)+ExtractFileName(FFileName)) then
Exit;
XLApp.WorkBooks.Open(CheckDir(FTempDir)+ExtractFileName(FFileName), , , 2, , , , , ,true);
Sheet:=XLApp.Workbooks[1].Worksheets[1];
Sheet.Cells.Font.Name:=FFont.Name;
Sheet.Cells.Font.Size:=FFont.Size;
Sheet.Cells.Font.Bold:=fsBold in FFont.Style;
Sheet.Cells.Font.Italic:=fsItalic in FFont.Style;
Sheet.Cells.Font.Underline := fsUnderline in FFont.Style;
Range:=Sheet.Range["A1:"+TExcelLetters[eColCount]+"1"];
Range.Font.Bold:=True;
Range.Font.Italic:=false;
... и т.д.
При WorkBooks.Open в RT стал ругаться на неверное количество параметров. Убрал все, кроме имени файла - стал выдавать Range Check Error наRange.Font.Bold:=True;
Причем программы, скомпилянные с Office XP, продолжают нормально работать, а после новой компиляции перестают. RCE, разумеется, вырублен (разумеется, потому что новомодные контролы типа TActionMainMenuBar и т.д. и MIDAS со включенным вообще не работают).
Что с ним такое могло случиться и как это лечить?
← →
Amoeba © (2004-10-12 17:15) [1]Наверное надо импортировать библиотеку типов Excel2003 и изрядно править код.
← →
П7 (2004-10-12 17:15) [2]Нужно руки кое кому оторвать за 2003 OFF"ис. Более глючной проги я в жизни не видел!!! ): У меня постоянные проблемы с моей прогой из-за этого, мать его, офиса.
← →
Grrey (2004-10-12 20:41) [3]Для этих целей я использую vtkExport.
Он бесплатый и не зависит от версии. Для его работы даже сам Excel не нужен. Ну разве что потом прочитать его не сможешь.
Ссылку не дам. Искать неохота.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.10.31;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.039 c