![]() |
TForm vererben
Musste nun meine Fragen unterteilen =)
(hab die texte nun aus dem alten Thread herausgeholt) [ Was war mit der DFM Datei gemeint?? das versteh ich net so :((( ] Ich mochte eine TForm vererben und ihr eine weitere Eigenschaft zuweisen, dies klappt auch wenn ich es mit einem Button doer anderem mache aber bei der Form gibt es immre ein Fehler das er es nicht finden kann :(( also die Form...
Code:
sobal ich nun mache "neueForm := TMyNewForm.create(self); kommt der fehler das er TMyNewForm nicht finden kann beim erstellen vom Bild :( aber bei anderen Controls geht es ja =)
type TMyNewForm = class(TForm)
private FImage: TImage; procedure SetImage(Value: TImage); public constructor Create(AOwner: TComponent); override; destructor Destroy; override; published property Hintergrundbild: TImage read FImage write SetImage; end; constructor TMyNewForm.Create(AOwner: TComponent); begin inherited Create(AOwner); FImage := TImage.Create(Self); FImage.Parent := Self; end; destructor TMyNewForm.Destroy; begin FreeAndNil(FImage); inherited Destroy; end; procedure TMyNewForm.SetImage(Value: TImage); begin if FImage <> Value then FImage.Assign(Value); end; |
Re: TForm vererben
Schaue mal unter Menü: File\New\Other
Dort dürfte ein Tab mit deinem Projektnamen auftauchen. Da wählst du das abzuleitende Form aus -> färrtigg. ;) |
Alle Zeitangaben in WEZ +1. Es ist jetzt 13:37 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz