excel

← →
PsoFT (2003-08-14 13:42) [0]

Привет народ !
Имеется код

var
Excel: variant;
i, j: word;
S: string;
begin
Excel := CreateOleObject("Excel.Application");
Excel.Workbooks.Open(FileName);
Excel.Visible:=True;
for i := 1 to 5 do
for j := 1 to 5 do
begin
S := Excel.Sheets[1].Cells[i,j].Text;
ShowMessage(S);
end;
end;

но он не работает, т.е. пишет неописана переменная CreateOleObject, подскажите ,что нужно добавить ?????

← →
Denkop (2003-08-14 13:45) [1]

Попробуй в uses добавить ShellApi

← →
sniknik (2003-08-14 13:48) [2]

на все подобного рода случаи, встаеш на CreateOleObject/функцию курсором нажимаеш ctrl и не опуская F1. увидиш в каком модуле описан и вставляй его в uses.

для данного случая ComObj

← →
PsoFT (2003-08-14 13:49) [3]

не помогло :(

← →
DenKop (2003-08-14 23:30) [4]

Посмотри comobj.pas и oleauto.pas. На крайняк поищи по вхождению текста createoleobject

excel Найти похожие ветки