Exe Datei von FTP herunterladen = Broken ???

[MaToBe]

Delphi-Quellcode:

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, inifiles, Grids, XPMan, StdCtrls, jpeg, ExtCtrls, ShellApi, ComCtrls,
  ShellCtrls, URLMon, Menus, IdFtp,  Registry, IdBaseComponent,
  IdComponent, IdTCPConnection, IdTCPClient, IdExplicitTLSClientServerBase;

type
...

  private
    ftp: TidFtp;
  public
    { Public-Deklarationen }
  end;

var
  frmMain: TfrmMain;

implementation

{$R *.dfm}



procedure TfrmMain.FormCreate(Sender: TObject);
var i: integer;
begin
      ftp:=TidFtp.Create;
      with ftp do begin
        Host := '***';
        Username := '***';
        Password := '***';
        Passive := true;
        Connect;
        if FileExists('D:\Sonstiges\Mhl.exe') = false then
        begin
          TransferType := ftBinary;
          Get('Mhl.exe', 'D:\Sonstiges\Mhl.exe', true, true);
        end;
        Disconnect;
        ftp.Free;
      end;
    end;
end;

genau so gehts ja eben nicht =(

was ich vielleciht dazu sagen muss, was mich selbst wundern...

ich verwende ja theoretisch die Komponente TidFTP, allerdings habe ich gar keine solche Komponente auf meinem Form.
Ich habe einfach oben bei Uses idFTP hingeschrieben und dann eben diesesn Code und alles funktioniert wunderbar.
Liegt es vielleicht daran, dass ich die TidFTP erst in einer Prozedur erstelle? Oder hab ich hier einen Grundlegenden Denkfehler, wenn ja klärt mich bitte auf denn ich arbeite das erste mal mit den Indys.