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).