Código Delphi [-] procedure TfrmReportes.LbSpeedButton3Click(Sender: TObject); begin If FileExists('D:\Giros\'+edtBusqueda.text+'.xls')= True begin shellexecute(Handle, 'open', +edtBusqueda.text+'.xls', '', '', SW_show); end;
procedure TfrmReportes.LbSpeedButton3Click(Sender: TObject); begin If FileExists('D:\Giros\'+edtBusqueda.text+'.xls')= True begin shellexecute(Handle, 'open', +edtBusqueda.text+'.xls', '', '', SW_show); end;