Foros Club Delphi - Abrir un fichero desde Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)

- - Abrir un fichero desde Delphi (https://www.clubdelphi.com/foros/showthread.php?t=48039)

jocey

13-09-2007 21:19:15

Abrir un fichero desde Delphi

Hola, necesito ver un ejemplo de como abrir un fichero cualquiera desde Delphi, se que utiliza la funcion ShellExecute, pero please ponganme un ejemplito sencillo.

Gracias Amigos

Caral

13-09-2007 21:37:23

Hola
Perdona mi ignorancia, un fichero es un archivo text o ini o bat ?
Saludos

marcoszorrilla

13-09-2007 21:37:44

A ver si esto lo que pides:

Código Delphi [-]unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  StdCtrls, ShellApi;

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.Button1Click(Sender: TObject);
begin
ShellExecute(0, 'open', 'mailto:pepeperez @asucorreo.com', nil, nil,0);
end;

end.

Un Saludo.

jocey

13-09-2007 21:41:20

Cita:

Empezado por Caral (Mensaje 230884)

Hola
Perdona mi ignorancia, un fichero es un archivo text o ini o bat ?
Saludos

caral mira lo que necesito hacer es abrir un video a una hora determinada, yo se trabajar con temporalizadores, ahora lo que quiero saber como abro el video.....

Gracias

Caral

13-09-2007 21:43:12

Hola
marcoszorrilla te dio la respuesta correcta.
Saludos

Delphius

13-09-2007 21:45:11

Hola jocey,
¿Y no te vale lo que ofrece marcoszorrilla? ¿Por otro lado.. si sabes que se emplea ShellExecute() porque no vas a la ayuda y te fijas como se emplea?

Y por si fuera poco, hay infinidades de ejemplos en los foros... haz una búsqueda con dicha palabra y obtendrás no pocos resultados.

Saludos,

jocey

13-09-2007 21:49:52

Gracias

Cita:

Empezado por marcoszorrilla (Mensaje 230886)

A ver si esto lo que pides:

Código Delphi [-]unit Unit1;

interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ShellApi; type TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private { Private declarations } public { Public declarations } end;

var Form1: TForm1; implementation {$R *.DFM} procedure TForm1.Button1Click(Sender: TObject);
begin ShellExecute(0, 'open', 'mailto:pepeperez @asucorreo.com', nil, nil,0);
end;

end.

Un Saludo.

Gracias Muchas

La franja horaria es GMT +2. Ahora son las 11:51:16.