Abrir uma planilha Excel dentro de um exe

[Guest sllc]

Olá, Colegas

Fiz uma consulta no banco de dados e gerei um arquivo em DBF no formato que eu precisava. Só que agora, para facilitar o usuário, ele quer que a própria aplicação abra o Excel e mostre este arquivo DBF.

Eu já vi isso em algum lugar, mas não me lembro. Alguém aí pode ajudar?

Agradeço desde já.

Sds.

Sergio

[Jhonas]

Fiz uma consulta no banco de dados e gerei um arquivo em DBF no formato que eu precisava. Só que agora, para facilitar o usuário, ele quer que a própria aplicação abra o Excel e mostre este arquivo DBF.

Eu já vi isso em algum lugar, mas não me lembro. Alguém aí pode ajudar?

Use o componente OleContainer da paleta System

procedure TForm1.Button1Click(Sender: TObject);
begin
   if OpenDialog1.Execute then
      begin
         Edit1.Text := OpenDialog1.FileName;
         OleContainer1.CreateLinkToFile(trim(Edit1.Text),TRUE);
         Application.ProcessMessages;
         OleContainer1.SetFocus;
         OleContainer1.Run;
      end;

end;

abraço