[Goto13]

проблема в следуюшим не как не могу понять почему при таком коде все равно при запуске выскакивает Excel и просит ввести пароль! помогите пожалуйста!
XL:=CreateOLEObject('Excel.Application');
XL.WorkBooks.Open(excel);
XL.ActiveWorkbook.Unprotect('1');

[Kailon]

А у меня вот при таком коде все нормально открывется без всяких паролей

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 XL: Variant;
begin
 XL:=CreateOLEObject('Excel.Application');
 XL.WorkBooks.Open('e:\excel');
 XL.ActiveWorkbook.Unprotect('1');
 XL.Visible := True;
end;