Delphi - eliminar mensaje confirmacion grabando Excel

   
Vista:

eliminar mensaje confirmacion grabando Excel

Publicado por Jose Martinez (1 intervención) el 23/11/2010 14:14:13
Hola a todos, Quisiera consultar algo que no puedo darle solucion. Estoy trabajando con planillas excel a travez de un COMOBJ (appExcel := CreateOleObject('Excel.Application') desde delphi 6 y todo me funciona ok, Pero cuando grabo, me sale el tipico mensaje de confirmacion, donde pregunta, desea grabar el archivo FILE.XLS? con las opciones de si, no y cancelar. Quisiera que ese mensaje no saliera y grabara automaticamente, Les dejo un codigo de ejemplo

// no olviden : uses comobj

procedure TForm1.SpeedButton1Click(Sender: TObject);
var
appExcel: Variant;
BEGIN
appExcel := CreateOleObject('Excel.Application');
appExcel.WorkBooks.Open(ExtractFilePath (Application.ExeName) +'Operacion.XLS');
appExcel.WorkBooks[1].Worksheets[1].Cells[pos_xls,1]:=inttostr(OPER); // grabo
appExcel.Quit;
appExcel := Unassigned;

Espero se entienda, Muchas Gracias de antemano.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder