Einzelnen Beitrag anzeigen

scp

Registriert seit: 31. Okt 2003
1.120 Beiträge
 
Delphi 7 Personal
 
#5

Re: Problem mit Freigabe von Objekten

  Alt 21. Nov 2003, 00:49
Also, habs mal getestet:
Ich habe mal irgendwelche Phantasie-Zahlen verwendet und es durchlaufen lassen (soweit es ging).

Bei TLoesungssystem.istgeloest() tritt ein Fehler auf, wenn Parameter X 0 (null) ist, weil dann die erste j-Schleife nicht durchlaufen wird, des halb musst du nach der Schleife
    If (X = 0) then j := 0; einsetzen.

Wenn TLoesungssystem.einfachstezeilefinden() als Ergebnis -1 zurückgibt, wird ein Fehler ausgelöst, weil in TLoesungssystem.Systemloesen() ja dann Matrix[line,j] nicht funktioniert = ausserhalb des zulässigen Bereichs der Array.

Weiter bin ich noch nicht gekommen, weil ich auf die Schnelle nicht darauf komme, was gemacht werden soll, wenn line -1 ist.

[edit]
So, habs mal mit nem If gelöst, das er die nä. drei Zeilen nicht aus führt, wenn line -1 ist. Danach kommen keine Fehler mehr. Erstellen und Freigeben der Klasse und beenden des Programms gehen jetzt ohne Fehler.
[/edit]
  Mit Zitat antworten Zitat