OnChange einer Trackbar löst AV aus

[omata]

Hallo Toxman,

ich habe irgendeinen Text probiert.
Bist du wirklich sicher, dass es eine AV ist und nicht ein Gleitkommafehler? Wenn bei deiner max-Berechnung Null rauskommt, wird eine Fehlermeldung ausgelöst, die du in der Delphi-IDE siehst und mit F9 gehts weiter. Da du diesen Fehler mit try-except abfängst kommt dieser Fehler nicht wenn du die EXE direkt startest.

Also dein Programm funktioniert so weit recht gut. Schau bitte nochmal genau nach was da bei dir passiert. Bist du auch mal beim Debuggen mit F7 in deine Draw-Methode abgestiegen und hast dort Zeile für Zeile ausgeführt?


Was mir an deinem Code nicht gefällt?
Deine Zeilen sind alle links an den Rand geklatscht (auch schon die erste Ebene). Du rückst ja (manchmal) nicht mal bei einer Schleife ein. Was soll das für ein Styleguide sein?

@Sharky:
Sorry, wollte das Thema auch nur im Nebensatz mal erwähnen.
Ja, so sollte der Code formatiert werden - wunderschön.
Und ich hatte keinen roten Balken

Verwunderte Grüsse
Thorsten

[Hawkeye219]

Der Fehler tritt an der markierten Stelle auf:

Delphi-Quellcode:

while i<=length(str) do
begin
o:=ord(upcase(str[i]))-ord('A')+1;
alist[o]:=alist[o]+1;  // <<---- hier
inc(i,step);                     
end;

Du gehst davon aus, daß hier nur Buchstaben ankommen, was aber definitiv nicht der Fall ist. Damit schreibst du lustig im Speicher herum und zerstörst dabei wahrscheinlich den einen oder anderen Zeiger...

Gruß Hawkeye

[omata]

Ja, Hawkeye219 hat recht.

Man kann daran auch sehen, dass du (Toxman) deine Bereichsprüfung nicht eingeschaltet hast. (sehr böse, wie man hier sieht). Ich habe es auch nur mit Buchstaben getestet, dann geht auch alles.

Fehler gefunden, danke Hawkeye219.

[Nikolas]

Vielen Dank.
So funktioniert es. In der Vegenere-Klasse gibt es eine Funktion die aus einem text alle NichtBuchstaben entfernt, und ich bin die ganze Zeit davon ausgegangen, dass ich beim Einlesen des Textes diese Funktion schon benutzt habe.
Jetzt versteh ich aber immer noch nicht, warum ich aber die ganze Zeit über den Zeichnen-Button benutzen konnte, ohne einen Fehler zu bekommen.

[Hawkeye219]

Bevor du dich jetzt allzu sehr auf die Funktion CleanText verläßt: ein "*" ist kein Buchstabe.

Gruß Hawkeye

[Nikolas]

Oh. Ich dachte das hatte ich schon entfernt. Ich weiss nicht mehr genau, warum das mal da reingeschrieben habe, vorgestern hatten wir einen Stromausfall und da wurde diese Änderung anscheinend nicht mehr gespeichert.
Vielen Dank für deine ausführliche Hilfe