HM da kommt die gleiche fehlermeldung ....
muss ich bei CreateNew was beachten ?
ich hab das mal so eingebunden:
Delphi-Quellcode:
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls,Menus,Grids;
type
TimportForm =
class (TForm)
close : TButton;
data : TStringGrid;
data_menue : TPopupMenu;
private
public
constructor createNew(AOwner : TComponent;Dummy : Integer = 0;typ : Integer =0);
overload;
end;
implementation
constructor TimportForm.createNew (AOwner : TComponent;Dummy : Integer = 0 ;typ : Integer = 0);
begin
inherited CreateNew(AOwner,Dummy);
self.close := TButton.Create(self);
self.Width := 200;
self.Height := 200;
self.Position := poMainFormCenter;
self.close.Left := 150;
self.close.Top := 150;
self.close.Width := 30;
self.close.Height := 15;
end;
end.