Eine EAccessviolation die ich mir nicht erklären kann

[multiplatform-coder]

Hier habe ich eine EAccessViolation dokumentiert, deren Ursprung ich mir nicht erklären kann, zumal die bei einer Vergleichsoperation geworfen wird, nicht bei der eigentlichen Zugriffsverletzung:
https://disk.yandex.com/i/Q6d99XBXaQMxlg

Code: Alles auswählen

x:=10;
y:=10;
tycoonTUIbox := MyComponent.Create(Application,MyDesktop.Create(vscreen,AppFont),30,30,500,300,'Stammfenster');
//MyComponent.UseFont('c:\Users\Konta\Desktop\myCode\userinterface-code\src\arial.ttf',20);
//MyComponent.Desktop := Application.Desktop;
Application.CreateWindow(MyComponent);
Application.Run; 

///////Hier bei Application.Run wird die Exception geworfen, ich komme auch mit F7 gar nicht erst in die   
///////Procedure Run rein, um zu sehen was dort passiert, kann also auch DoRun nicht aufrufen.

//vscreen ist für das Versändnis des Debug Vorganges nicht nötig, Desktop auch nicht
//ich verstehe nur nicht wieso die Exception zum Zeitpunkt des Vergleiches und nicht während des 
//Zugriffsversuches geworfen wird.

[theo]

1. Wieso tust du das Bild auf Yandex? Das kannst du einfach hier anhängen.
2. Aus dem Bild kann ich nichts schliessen. Schau doch mal den Aufrufstack an.

[multiplatform-coder]

@theo:

weil ich einen Scrennshot gemacht habe der auf Yandex gespeichert ist. Ich will eine Erklärung für diese Exception, allgemein, nicjt projektbezogen und habe daher keine Lust, hetzt erst rumzubasteln um das Bild von Yandes auf meinen Rechner offlinr zu kriegen. Habe doch das Bild hochgeladen, wo das Proble dargestellt ist bei dem Ich Hilfe brauche. Aber gut, für das nächste Mal, wie krige ich das dann hin?

[theo]

Es gibt keine "allgemeinen Erklärungen" für Zugriffsverletzungen. Da muss man den Code anschauen und z.B. den Aufrufstack.
Grundsätzlich greifst du auf etwas zu, wofür kein Speicher reserviert wurde oder wo der Speicher schon freigegeben wurde.
Was ist denn bei dir "MyComponent"? Das müsste nach den Regeln "TMyComponent" heissen bei Create.
Bilder kannst du bei "Dateianhänge" hochladen.

[multiplatform-coder]

Okeeee, dann bleibt mir wohl nichts anderes übrig, als meinen Quellcode noch mal Stück für Stück zu durchforsten. Blöd nur dass der Debugger da nicht immer weiter hilft. Ich habe eine eigene DoRun Methode geschrieben, Run ruft die auf, aber nur DoRun ist virtual, Run aber nicht und wird deshalb nicht überschrieben, nur DoRun, die wird aber intren von Run aufgerufen. Wenn dann TCustomApplication ohne DebugInfo übersetzt ist, kann ich lange suchen, nur mein eigener Quellcode hat Debuginfo. Nun gut, Danke dennoch, da muss ich halt selber gucken.

[af0815]

Für so tiefe Zwecke kann man die LCL und Lazarus auch mit Debugginnginfos erstellen. Ich würde mir da einfach eine neue Umgebung einrichten.

[Zvoni]

Du erzeugst eine tycoonTUIBox, indem du den Create-Constructor deines Klassen-Typs "MyComponent" aufrufst, und das Ergebnis an tycoonTUIBox zuweist.
In den auskommentierten Zeilen weist du der Klassen-Variablen "Desktop" deines Klassen-Typs (!!) den Application.Desktop zu?

und in Application.CreateWindow übergibst du den Klassen-Typ anstatt der instanzierten tycoonTUIBox?

EDIT: Und wo machst du einen Vergleich?
Unabhängig davon: In der Zeile in der du die tycoonBox erzeugst, erzeugst du innerhalb der Parameter auch eine MyDesktop-Instanz.
Das riecht nach einem Speicherleck, es sei denn du verwaltest diese Instanz innerhalb von MyComponent (und gibst sie ggfs. dort wieder frei)