Параметр lcid в TExcelApplication.Workbooks

← →
clickmaker © (2003-07-07 20:24) [0]

Что такое сабж? И какие допустимые значения? На 0 ругается "неверный индекс"

← →
Vladymir (2003-07-08 02:24) [1]

lcid:=GetUserDefaultLCID;

← →
clickmaker © (2003-07-08 11:33) [2]

Тоже самое - "неверный индекс"

← →
MetalFan © (2003-07-08 11:44) [3]

....workbooks.item[i].save ?

← →
clickmaker © (2003-07-08 11:49) [4]

та же история. А вот ExcelApp.ActiveWorkbook.Save(GetUserDefaultLCID) работает

← →
MetalFan © (2003-07-08 11:50) [5]

sorry, это из другой оперы)))

← →
Sandman25 © (2003-07-08 11:54) [6]

LOCALE_USER_DEFAULT

Да, но почему такой код работает, а такой - нет:

for i := 0 to ExcelApplication.Workbooks.Count-1 do
ExcelApplication.Workbooks.Item[i].Save(GetUserDefaultLCID);

← →
Vladymir (2003-07-09 17:33) [8]

Если мне память не изменяет, то
ExcelApplication.Workbooks["Книга1"].Save(LCID);
Я делаю так:
try
Worksheet.SaveAs(FName);
finally
Worksheet.Disconnect;
while Excel.Workbooks.Count>0 do
begin
Workbook.ConnectTo(Excel.ActiveWorkbook);
Workbook.Close;
end;
end;
Workbook.Disconnect;
FreeAndNil(Worksheet);
FreeAndNil(Workbook);
Excel.Disconnect;
if Assigned(Excel) then FreeAndNil(Excel);
end;

А ларчик просто открывался... Оказывается воркбуки индексируются с 1, а не с 0

Параметр lcid в TExcelApplication.Workbooks Найти похожие ветки