Problem mit Speicherbezeichner "default" bei Properties

[skyobserver]

Hallo zusammen!

Ich habe ein Problem mit den Properties meines TTestForm welches ich von TForm abgeleitet habe:
Es gibt eine published Property "Test" (Boolean). Diese Property soll beim ersten Erstellen einen Default
Wert "True" bekommen und fortan den im OI eingestellten Wert speichern. Weiterhin sollte der OI anzeigen
ob im Moment der Wert auf standard bzw. nicht standard (Schrift normal bzw. fett) steht.

Wenn ich bei der Deklaration der Property "default True" angebe und im Constructor "FTest := True;"
setze wird nur zur Laufzeit die Einstellung von "Test" anscheinen nicht mehr geladen. Zur Designzeit ist
aber immer der richtige zuletzt gewählte Wert im OI zu sehen.
Ohne "default True" und "FTest := True" klappt es (allerdings ist dann immer "False" Vorgabe).


Hat Jemand eine Idee was ich falsch mache?


Das Form "TestFormObjRep" wird der Objektablage hinzugefügt und dann hinterher mit "kopieren" ins Projekt eingebunden

Hier ist mein TestPackage:

[skyobserver]

Keiner eine Idee?

[Hansa]

Zitat von skyobserver:

Ich habe ein Problem mit den Properties meines TTestForm welches ich von TForm abgeleitet habe:

Du gehörst zumindest zu dem 1 % der Leute, die wissen oder zumindest ahnen, wie mächtig die Objektablgae ist. Properties für Forms gehören aber leider nicht in diesen Kontext. Das passt nicht. Forms geniessen eine Sonderstellung.

[Muetze1]

1. TestForm fehlt die DFM (die braucht er immer!)
2. TestFormObjRep ist nicht richtig abgeleitet! Es steht kein "inherited" sondern noch "object" im DFM file. Kann mit 1. zusammen hängen.

[Ralf Kaiser]

Zitat von skyobserver:

Hat Jemand eine Idee was ich falsch mache?

Hab mir das Package noch nicht angesehen aber meine spontane Idee war: Hast du schon mal versucht die Initialisierung in der Methode "Loaded" (überschreiben und vorher inherited aufrufen) zu machen?

Ralf

[skyobserver]

@Muetze1: Danke, werde ich am Abend mal testen

@Alfi001: Zuerst dachte ich auch das Problem wäre der Zeitpunkt wann ich die
Property abfrage (habe daher schon versucht "Loaded" zu überschreiben).

Wenn ich einen Button auf das Form setze und bei "ButtonClick" in Abhängigkeit von "Test" ein
ShowMessage('True' bzw. 'False') ausgebe müßte die Property auf jeden Fall geladen sein bevor
ich den Button anklicken kann - aber genau das klappt schon nicht.

-Ich öffne das Projekt in Delhi und im OI ist der richtige Wert gesetzt!
-Ich starte das Projekt und klicke den Button und die Property ist falsch gesetzt!!

Dieser Fehler tritt nicht auf, wenn ich "default True" und "FTest := True" im constructor entferne!!!

Diesen Zusammenhang verstehe ich nicht

Ich habe entweder meine geänderte Property (aber keinen Default beim ersten Erstellen)
oder meinen Default beim ersten Erstellen (aber keine geänderte Property)

Ich weigere mich zu glauben, daß nicht beides gleichzeitig gehen soll gggggrrrrrrrr...

[jim_raynor]

Spannender ist die Frage, wann die Property im constructor gesetzt wird, und wann sie aus der Resourcendatei geladen wird.

Ich würde dir empfehlen, dass FTest:=true vor das inherited zu setzen. Es ist nämlich wahrscheinlich, dass im inherited Create auch die Eigenschaften gelesen werden

[skyobserver]

JAWOHL DAS IST ES!!!

"FTest := True" muß vor dem "inherited Create" stehen!

Das Ganze erscheint mir auch irgendwie unglaublich logisch...

Und ich war mir sicher das schon versucht zu haben...

Habe wohl beim vielen Testen den Überblick verloren...

@Hansa: Sorry! Das geht einwandfrei!

Danke für alle Hinweise!

Mein Glaube an Delphi wurde erneuert - mein Leben hat wieder einen Sinn!

Also hier das ganze nochmal als Download so wie es richtig ist!

1. Package compilieren
2. Package installieren
3. TestFormObjRep Form mit rechts anklicken und "Der Objektablage hinzufügen"
4. Neues Projekt erstellen
5. Datei-> Neu -> Weitere -> TestForm (kopieren) -> OK

[Muetze1]

Zitat von jim_raynor:

Ich würde dir empfehlen, dass FTest:=true vor das inherited zu setzen. Es ist nämlich wahrscheinlich, dass im inherited Create auch die Eigenschaften gelesen werden

Aber doch nur die Eigenschaften der Vererbungsvorfahren. Das macht überhaupt keinen Unterschied. Grundlegend gibt es keine Probleme mit solchen Vererbungen.

@skyobserver: Meine beiden Anmerkungen mal umgesetzt und alleinig ausprobiert (mit Hinzunehmen deiner im obigen Download auskommentierten Anweisungen)? Das alleine sollte richtig klappen und benötigt kein setzen der Eigenschaft vor inherited Create (noch nie benötigt oder gemacht)

[jim_raynor]

Zitat von Muetze1:

Aber doch nur die Eigenschaften der Vererbungsvorfahren. Das macht überhaupt keinen Unterschied. Grundlegend gibt es keine Probleme mit solchen Vererbungen.

Na dann bin ich mal auf die Erklärung gespannt, warum es so funktioniert