Beschreibung des Symptoms
Es liegt eine initialisierte lokale Variable g des Typs IGPGraphics vor, die bereit ist, in eine Steuerelement der Klasse TPaintBox Bildschirmausgaben zu tätigen. Wenn nach der Initialisierung von g ein Zugriff auf die Felder von Instanzen der Klassen TComboBox, TListBox oder TMemo erfolgt, wird die nachfolgende Zeichenoperation mittels g mit der Fehlermeldung „(
GDI+Error) Generic Error“ abgebrochen. Wird nach dem Zugriff g neu initialisiert, dann tritt der Fehler nicht mehr auf.
Interpretation
Offensichtlich hat der lesende Zugriff auf die Klassen TComboBox, TListBox und TMemo einen schreibenden Seiteneffekt auf die lokale Variable g zur Folge. Aufgrund der Kapselung dürfte ein solcher Effekt nicht eintreten. Die Klassen TComboBox, TListBox und TMemo enthalten alle eine Klasse vom Typ TStringlist. Wenn man auf eine separate Instanz des Typs TStringList vor der
GDI-Operation einen Zugriff ausführt, dann tritt kein Fehler auf. Der Code von Erik van Bilsen ist minimalistisch und offensichtlich fehlerfrei. Kommt der Seiteneffekt aus dem Betriebssystem oder aus der
VCL?
Demonstrationsprogramm
Rechts auf dem Formular befindet sich ein Optionsfeld, in dem der Fall ausgewählt werden kann. Die Schaltfläche „
GDI Test“ bringt dann die Zeichenoperationen zur Ausführung. Es wird ein Kreuz in der Zeichenfläche im Formular unten ausgeführt. Bei den Optionen „Kein Zugriff“ und „Zugriff mit Neuinitialisierung“ wird, ohne eine Fehlermeldung hervorzurufen, gezeichnet. Quellcode befindet sich in der angehängten .zip-Datei.