Hi,
ich habe mir vor einiger Zeit mal eine eigene Komponente geschrieben (habe die aber bisher nie eingesetzt). Auf Basis eines TCustomPanel. Inhaltlich funktioniert auch alles wie es soll.
Was nicht funktioniert und mir nicht ganz klar ist, ist das verwenden der im IO eingestellten Properties.
Zwar tauchen sie alle auf, aber die dort eingestellten Werte werden dann zur Laufzeit immer gegen sie Defaultwerte ersetzt.
Wo ist der richtige Punkt erst einmal die Defaultwerte für den
OI festzulegen, damit sie nicht zur Laufzeit die im IO eingestellten Werte überschreiben?
In der Property?
property ShowCaption: boolean read FShowCaption write SetShowCaption Default true;
oder im Create über csDesigning?
Zur Zeit werden sie gar nicht festgelegt. Trotzdem haben die Einstellungen im
OI keinerlei Wirkung auf den Wert zur Laufzeit. Sprich ich stelle einen Boolwert im
OI ein, zur Laufzeit hat er dann aber wieder den Wert, den er beim einfügen der Komponente auf der Form hatte.
Und zu allem Überfluss habe ich noch ein paar Klassen da drin, über die ich mir Properties im
OI als Gruppe zusammenhalten will z.B: verschiedene Fonts.
Delphi-Quellcode:
TFonts=class
private
FDateFont: TFont;
procedure SetDateFont(const Value: TFont);
public
constructor Create;
destructor Destroy;
published
property DateFont: TFont read FDateFont write SetDateFont;
end;
(Ich habe das hier mal auf nur einen Font eingekürzt, damit der Quelltext nicht so lang ist)
Dieses ist auch im Komponentensource wie folgt eingebunden:
property Fonts: TFonts read FFonts write SetFonts;
Wo würde man für die Fonts nun die Defaultwerte festlegen?
Im Create von TFonts?
Dann dort ebenfalls über csDesigning?
Zur Zeit werde die Defaults von TFont verwendet, die automatisch beim erzeugen vorhanden sind. Aber egal, was ich bei den Fonts im
OI einstelle, zur Laufzeit hat er dann wieder nur seine Default.