AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Spezieller TFrame

Ein Thema von hzzm · begonnen am 19. Mär 2019 · letzter Beitrag vom 22. Mär 2019
 
hzzm

Registriert seit: 8. Apr 2016
103 Beiträge
 
Delphi 10 Seattle Professional
 
#1

Spezieller TFrame

  Alt 19. Mär 2019, 10:15
Delphi-Version: 10 Seattle
Guten Morgen,

ich steh grad irgendwie auf dem Schlauch:

Gibt es eine Moeglichkeit, einen TFrame zu definieren, bei dessen Kindern klar ist, dass sie immer ein
Code:
Icon: TImage;
haben?

Im constructor einer Klasse, wo ich normalerweise einen TFrame erstelle, moechte ich einfach TMeinSpeziellerFrame neben der Angabe eines AIcon: TImage erstellen, so dass dem Frame das Icon direkt mitgegeben wird:

Code:
TMyFrameClass = class(TFrame)
  Icon: TImage;
end;

TMyClass = class
public
  FMyFrameList: TObjectDictionary<String, TMyFrameClass>;
  constructor Create(AOwner: TComponent; AIcon: TImage);
end;

implementation

constructor TMyClass.Create(AOwner: TComponent; AIcon: TImage);
begin
  FMyFrameList := TObjectDictionary<String, TMyFrameClass>.Create;
  FMyFrameList.Add('ExampleFrame', TMyFrameClass.Create);
  FMyFrameList['ExampleFrame'].Icon := AIcon;
end;
Das Urproblem ist also, dass ich den TFrame im Formdesigner in der .dfm nicht von TMyFrameClass ableiten kann.
Der muss erzwungenermassen von TFrame abgeleitet werden (nicht von dessen Nachfahren), sonst spackt die IDE und ich kann den Frame im designer nicht mehr oeffnen.

Wie wuerdet Ihr diese Sachlage loesen?
  Mit Zitat antworten Zitat
 


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 12:43 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz