Abrir uma planilha do excel

[Marostegan 0]

pessoal, eu preciso fazer o seguinte:dentro do delphi criar um botão e quando eu clicar nesse botão abra uma planilha do excel...alguem pode dar essa força?valews...bom fds pra todos!abraços

[bdexterholland 0]

winexec(<nome do arquivo>);

[Marostegan 0]

winexec(<nome do arquivo>);

+ é só digita isso no botão??ou tem mais alguma coisa?valwess...[ ]´sss

[MARCOS MARTINS 0]

Eu fiz dessa forma e acho que ficou legal;

declarei na sessão

 

public

procedure ExecutePrograma(Nome, Parametros: String);

{ Public declarations }

end;

 

 

 

implementation

 

{$R *.dfm}

 

 

 

procedure T_Form1.ExecutePrograma(Nome, Parametros: String);

Var

Comando: Array[0..1024] of Char;

Parms: Array[0..1024] of Char;

begin

StrPCopy (Comando, Nome);

StrPCopy (Parms, Parametros);

ShellExecute (0, Nil, Comando, Parms, Nil, SW_ShowMaximized);

end;

 

Para chamar o arquivo, você coloca no seu botão assim;

 

procedure TForm1.Button1Click(Sender: TObject);

begin

ExecutePrograma('Excel.Exe', ''); // se quiser chamar um arquivo novo.

end;

 

agora p/ chamar um arq. existente coloque assim

procedure TForm1.Button1Click(Sender: TObject);

begin

ExecutePrograma('Excel.Exe', ' nome do arquivo.xls');

end;