Problem mit einer Unit

[LoW_FloW]

Ich habe eine Unit erstellt, die mir Objekte für das HaputFormblatt erstellen soll...

Der folgende Quelltext funktioniert aber nicht so recht:

Delphi-Quellcode:

unit CreateForm;

interface
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ExtCtrls, Menus, Buttons, ImgList, ComCtrls;

procedure CreateLoadingForm;

var lblLade2: TLabel;

implementation 

uses uForm1;

procedure CreateLoadingForm;
begin
  lblLade2.Create(nil);
  with lblLade2 do
  begin
    Caption := 'Lade...';
    Font.Color := clWindow;
    Font.Name := 'Comic Sans MS';
    Font.Size := 30;
    Font.Style := [fsBold];
    Left := 442;
    Top := 688;
    Transparent := true;
  end;
end;
  

end.

Ich habe mal nen Screenshot vom Fehler gemacht und zu diesem Thread angehängt.

Vielen Dank im Vorraus 8).