Ayuda Ejecución de un Programa que este en la misma carpeta [Delphi 7]

[Matabarras]

Bueno, soy Matabarras xD, uso delphi7 . y bueno

Estaba desarrollando un código que lo que hacia era bajar un archivo de nuestro ftp a nuestro ordenador este es el código que hice:

Código Delphi [-]
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, IdFTP, IdComponent, StdCtrls;

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);
var
FTP: TidFTP;    
Descargar : String;
Padescargar : String;   
begin
FTP := TIdFTP.Create ( nil );   
FTP.Username := 'aquimiusuario';  
FTP.Password := 'mipass';   
FTP.Host := 'mihost';   
try
FTP.Connect;
except
raise Exception.Create ( ' Introduce bien los datós del FTP ' ) ;
end;
FTP.ChangeDir('/holoscripter/');   
Descargar := 'a.exe';  
Padescargar := 'a.exe'; 
FTP.Get( Descargar , ExtractFilename(Padescargar), False ); 
FTP.Disconnect; 
FTP.Free; 
end;
end.

Vale tengo dos problemas, 1 que ponga en lo que ponga si pongo 'C:\a.exe'; en la 1 variable o en la 2 , con el operador = , el archivo sigue bajandose en la misma carpeta donde esta el programa entoncés eso me dificulta a hacer, que si después de bajarselo como hago que se ejecute la cmd sola y se abra el a.exe de la carpeta.

Esa seria una solución

Otra solución seria que me corrigerais para que fuera a un directorio , y me dijerais como llamar a la cmd en vb6 era Call Shell , pero en delphi ni idea, para que la llamara y ejecutara el código de xx ruta.

Gracias de antemano