Du sorry bei mir klappt das nicht, wenn ich es hier hin mache:
Delphi-Quellcode:
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
XPManifest1: TXPManifest;
RadioButton1: TRadioButton;
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
private
{ Private declarations }
public
{ Public declarations }
end;
kommt die Fehlermeldung:
Zitat:
[Error] Unit1.pas(20): '=' expected but identifier 'public' found
[Error] Unit1.pas(22): ';' expected but 'END' found
[Error] Unit1.pas(27): '.' expected but 'IMPLEMENTATION' found
[Error] Unit1.pas(16): Unsatisfied forward or external declaration: 'TForm1.CreateParams'
[...]
und wenn ich es hier hin mache:
Delphi-Quellcode:
type
TForm1 = class(TForm)
Label1: TLabel;
Label2: TLabel;
XPManifest1: TXPManifest;
RadioButton1: TRadioButton;
private
{ Private declarations }
public
{ Public declarations }
protected
procedure CreateParams(var Params: TCreateParams); override;
end;
end;
kommt die:
Zitat:
[Error] Unit1.pas(23): 'IMPLEMENTATION' expected but ';' found
[Error] Unit1.pas(28): '.' expected but 'IMPLEMENTATION' found
[...]