Fórum É possível e como abrir um arquivo .Xls com um OpenDialog? #373160

05/08/2009

0

Oi pessoal ! tenho mais essa dúvida agora !!

Preciso abrir um arquivo usando um OpenDialog..sei que é uma dúvida boba mas como sou iniciante, estou me aventurando pelo Delphi ainda!
Eu consegui criar um procedimento para abrir txt, é possível abrir tb .xls?

Agradeço se puderem me ajudar !


Iza

Iza

Responder

Posts

05/08/2009

Osocram

E possivel sim...
pode ser usar o comando ShellExecute para usar o proprio windows p abrir isso p vc.

procedure TForm1.btnClick(Sender: TObject);
var
  vo_opendlg :TOpenDialog;
begin
  vo_opendlg := TOpenDialog.Create(self);
  try
    if vo_opendlg.Execute then begin
      ShellExecute(handle,´open´,pchar(vo_opendlg.FileName),´´,´´,SW_NORMAL);
    end;
  finally
    FreeAndNil(vo_opendlg);
  end;

end;



Não esqueça de adicionar o shellapi no uses.

Qualquer duvida estamos ae.


Responder

Gostei + 0

06/08/2009

Iza

Muito obrigada !! me salvou de novo..rsrs deu certinho !! =)


Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar