Ver Mensaje Individual
  #8  
Antiguo 05-11-2010
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Cita:
Empezado por saulcell Ver Mensaje

@ecfisa. Mira este es el error que me vota
Código Delphi [-]
[Error] Unit1.pas(27): Declaration expected but 'USES' found
[Error] Unit1.pas(30): Undeclared identifier: 'ShellExecute'
Hola saulcell.

Veo que estas en las mejores manos y difícilmente pueda aconsejarte mejor. Así que sólo voy a ejemplificar lo que te dijeron sobre la
ubicación de la clausula uses .
Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls{, ShellApi};{  puede ir aquí (seguí más abajo...) }

type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
  public
  end;

var
  Form1: TForm1;

implementation  {$R *.dfm}

uses ShellApi; { o puede  ir aquí. No se puede declarar en ambos sitios, la declaración es excluyente }

procedure TForm1.Button1Click(Sender: TObject);
{ Nunca dentro de un procedimiento o función }
begin
  ShellExecute(Handle, nil , PChar('C:\Boxes\Shell.exe'), nil, nil, SW_SHOWNORMAL);
end;
end.

Saludos.

Última edición por ecfisa fecha: 05-11-2010 a las 03:39:43.
Responder Con Cita