Initialisieren der Eigenschaften eines Active Server Objects

[Typhix]

Ich mache gerade meinen ersten Gehversuche mit Delphis Active Server Objects um diese in Zusammenhang mit ASP zu verwenden. Soweit funktioniert alles ganz gut, eine Kleinigkeit habe ich jedoch bisher nicht hinbekommen.

Beim Erstellen der Objekte sollen einige Eigenschaften gleich mit bestimmten Werten gefüllt werden. Normalerweise geschieht so etwas im Konstruktor, doch scheinbar ist es nicht möglich, einen eigenen Konstruktor für Active Server Objekte zu schreiben.
Beim Entwerfen der ASO-Klassen mit dem Delphi-Wizard gibt es die Möglichkeit den Active Server Typ zu wählen: Ereignisse auf Seitenebene und Objektkontext gibt es dort zur Auswahl. Wähle ich "Ereignisse auf Seitenebene", so erhalte ich OnStartPage- und OnEndPage-Events, in denen ich die Objekteigenschaften setzen könnte. Diese Verfahrensweise gilt aber im Allgemeinen als veraltet und es sollte der Objektkontext vorgezogen werden.

Bei der Recherche im Internet habe ich bereits einige Artikel über das ObjectContext-Objekt gelesen, die mir aber alle in diesem Zusammenhang nicht weiterhalfen.
In einem ca. 2 Jahre alten Newsgroups-Beitrag fand ich den Hinweis, den Initialization-Teil zum Setzen von Werten zu verwenden. Ich habe jedoch noch keine Möglichkeiten gefunden, im Initialization-Part auf das Object zuzugreifen.

Weiß jemand, wie ich die Objekteigenschaften beim Instanziieren initialisieren kann? Wäre dankbar für jeden Rat.

Grüße

[sakura]

Du musst die Initialize Methode überschreiben. Auf keinen Fall einen der Konstruktoren nutzen, da nicht garantiert werden kann, welcher aufgerufen wird.

Delphi-Quellcode:

  T.....=class....
  private
    ...
  protected
    ...
  public
    procedure Initialize; override;
    ...
  end;

......

[Typhix]

Ja, guck - doch so einfach.

Vielen Dank Sakura!