Deutsches Lazarusforum

Ich habe nur mal eine Überprüfung eingebaut, ob der entsprechende Index da ist und schon kommt es zu keinem SIGSEV mehr

Danke!!
Jetzt funktioniert das Sotieren wieder, aber sobald ich ein Wort hinzufüge (zb. "Affe - monkey" in "deutsch.txt" hinzufügen und dann die const "laenge:integer=5;" um ...

Hast Du meine Antwort verstanden, warum dieser Fehler (SIGSEGV) auftritt?


Ja ich verstehe was da deiner Meinung nach falsch ist, aber ich verstehe nicht warum? Ich gehe das Program wieder und wieder durch aber von der Logik her finde ich kein Fehler.. Ich frage immer nur von 0 bis 7 die Fekder ...

showmessage(german[strtoint(edit1.text)]);


ist quatsch

Das war nur eine Hilfsausgabe bei der Fehlersuche um zu gucken welche Felder des Arrays benutzt werden(und zwar german[0] bis german[7]), falls das Problem von den Arraygrenzen kommt.

Edit1 und "suchen" sind noch nicht deklariert.

Vielen Dank für die Antworten :)
@creed steiger ja der Befehl ist so gesehen unnötig, wollten aber nachschauen was uns ausgegeben wird, da es nicht funktioniert hat und wir es damit nur kontrollieren wollten.
@Michl Werd ich mir merken mit der .exe fürs nächstes mal :) Danke und das Problem liegt ...

unit Unit1;

{$mode objfpc}{$H+}

interface

uses
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
Menus;

type

{ TForm1 }

TForm1 = class(TForm)
Button1: TButton;
Edit1: TEdit;
Label1: TLabel;
Label2: TLabel;
MainMenu1: TMainMenu;
mDeutsch: TMemo ...

Hallo,
wir sollen in der Schule ein Wörterbuch programmieren, von der Logik her müsste es richtig sein, es lässt sich auf kompilieren aber stürzt beim ausführen immer ab.

Das Program ist komplett auskommentiert und basiert auf dem Quicksortalgorithmus.

Danke schonmal im vorraus
Toni