Hallo @all,
ich habe mir eine Komponente erstellt und diese registriert, abgeleitet habe ich sie von TForm.
Es klappt auch alles prima,ich kann mir die Komponente auf meine Form draufziehen ABER ich bekomme sie nicht wieder runter, ich kann sie zwar schieben aber nicht mehr löschen????
Vielleicht hat ja jemand einen Tip für mich, ich finde leider nicht vielen Dank
ich habe mir eine Komponente erstellt und diese registriert, abgeleitet habe ich sie von TForm.
Es klappt auch alles prima,ich kann mir die Komponente auf meine Form draufziehen ABER ich bekomme sie nicht wieder runter, ich kann sie zwar schieben aber nicht mehr löschen????
Vielleicht hat ja jemand einen Tip für mich, ich finde leider nicht vielen Dank
Code:
unit comTest; interface uses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TTestKompo = class(TForm) private { Private-Deklarationen } protected { Protected-Deklarationen } public { Public-Deklarationen } constructor Create(AOwner: TComponent); override; published { Published-Deklarationen } end; procedure Register; implementation procedure Register; begin RegisterComponents('Beispiele', [TTestKompo ]); end; constructor TTestKompo.Create; begin inherited Create(AOwner); Canvas.Rectangle(5, 5, 10, 10); end; end.
Comment