Morgen liebe Community,
tut mir leid falls ich eine ungeschickte Anfängerfrage stelle,
allerdings habe ich neulich angefangen in Delphi zu programmieren und wolle mit einem
kleinen Programm starten, in diesem Fall: Hangman.
Dabei habe ich in einem Edit-Feld die Länge des gesuchten Wortes in _ Zeichen
Ein Buchstabe wird eingegeben und das Zeichen soll durch den Buchstaben ersetzt werden.
Das Kompilieren ist kein Problem, doch wenn ich auf den Button klicke der die Funktion ausführen soll
bekomme ich folgende Fehlermeldung:
"Zugriffsverletzung bei Adresse 005115DE in Modul 'ProjectHangman.exe'. Schreiben von Adresse 00000000."

Die Variablen habe ich folgender Maßen deklariert:

markieren

Delphi-Quellcode:

var buchstabenLaenge : integer;
var buchstabe : string;
var I : integer;
var count : integer;
var lösung : string

WortLaenge ist eine globale Variable

Der Fehler findet in dieser Schleife statt:

markieren

Delphi-Quellcode:

  for I := 1 to wortLaenge do
  begin
  if eingabe1[count]=buchstabe[1] then
  begin
     lösung[count]:=buchstabe[1];
  end;
  count := count +1;
  end;

Konnte mit Google den Fehler nicht finden^^
Wenn ich den Debugger benutze, werde ich an folgende Stelle gebracht

markieren

Delphi-Quellcode:

begin
  Application.Initialize;
  Application.MainFormOnTaskbar := True;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

Thread-Start: Thread-ID: 1728. Prozess ProjectHangman.exe (1284)

Kann damit nichts anfangen

Wärt ihr so nett mich aufzuklären?^^

markieren

Delphi-Quellcode:

  for I := 1 to wortLaenge do
  begin
  if eingabe1[count]=buchstabe[1] then
  begin
     lösung[count]:=buchstabe[1];
  end;
  count := count +1;
  end;

Deine Schleifevariable heißt I
Du nutzt aber das nicht initialisiert count um auf einzelne Zeichen Deines Strings
zuzugreifen.

Grüße
Klaus

meinst du ich sollte count durch I ersetzen?
in dem fall bekomme ich allerdings die gleiche fehlermeldung

Zeig doch mal die ganze Methode. Ist Buchstabe initialisiert, und wieso ist das ein String, würde Char nicht genügen?

markieren

Delphi-Quellcode:

  
for i := 1 to length(eingabe1) do
  begin
    if eingabe1[i]=buchstabe[1] then
      begin
        lösung[i]:=buchstabe[1];
      end;
  end;

Welche Delphi-Version nutzt Du >= 2009 dann hat Dein String pro Buchstaben zwei 2Byte.
Dann könntest Du auf AnsiString ausweichen.

Eingabe1 ist ein String - oder ist es eine Edit-Componente?

Grüße
Klaus

Hast du Count initialisiert?
Setz mal vor der Schleife Count auf 1!

Zitat von Klaus01:

Welche Delphi-Version nutzt Du >= 2009 dann hat Dein String pro Buchstaben zwei 2Byte.
Dann könntest Du auf AnsiString ausweichen.

Er greift doch nicht byteweise auf den String zu, daher dürfte Unicode hier nicht das Problem sein.

was noch fehlt ist die Länge von Lösung zu setzen.

setLength(Lösung,length(Eingabe1)); @DeddyH: Ja, da hast Du Recht.

Grüße
Klaus

anscheinend hab ich noch viel zu lernen

setLength(Lösung,length(Eingabe1));

wo soll ich das einsetzen? in der schleife?

Wie ich schon sagte:

Zitat von DeddyH:

Zeig doch mal die ganze Methode.