Ich habe einige Klassen(Objecte) von einer Klasse csMessage Abgeleitet!
ich möchte jetzt verschiedene Klassen in eine FiFo Menge schreiben, alle Klassen haben die Basisklasse TCSMessage!
Ich wollte jetzt eine TObjectQueue instanz nehmen um meine Messages anzuhängen!
Hirezu gehe ich wie folgt vor :
1. ich erzeuge das jeweils gewünschte Objekt und ordne dieses einer Variable vom Typ
TCSMessage zu.
2. ich wende folgenden Code an um dieses Object an die Queue anzuhängen!
Quelltext
1:
| VAR messObj : TCSMessage; |
Quelltext
1: 2:
| messObj := TCSDBMessage.create; // Abgeleitet von TCSMessage requestQueue.Push(messObj); |
3. Dieser Fehler erscheint!
Zitat: |
Zugriffsverletzung bei Adresse 0042C8CD in Modul 'test.exe'. Lesen von Adresse 00000000. |