Ver Mensaje Individual
  #8  
Antiguo 19-12-2008
Avatar de Caral
[Caral] Caral is offline
Miembro Premium
 
Registrado: ago 2006
Posts: 7.659
Reputación: 27
Caral Va por buen camino
Hola
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;
Saludos
__________________
Siempre Novato
Responder Con Cita