Hilfe beim "Glücksrad"

[Klaus01]

Delphi-Quellcode:

// GesuchtesWort initialisieren 
// die ganze Prozedure stellt Dir das gesuchte Wort als ____ ____ dar.
// also pro Buchstaben einen Unterstrich
// wobei GesuchtesWort und Wort jeweils ein String sind

GesuchtesWort:=wort;   // das ist nur um die Länge des Wortes zu haben
for i:=1 to length(gesuchtesWort) do 
  if gesuchtesWort[i] <> ' ' then    // erhalten der Leerzeichen
    gesuchtesWort[i]:='_';

...

Delphi-Quellcode:

// suche Button; 
//durchsuche das ganze Wort nach einem Buchstaben
// wobei Buchstabe ein Char ist, und der Buchstabe sein sollte der gerade "erdreht" wurde
for i:=1 to length(wort) do 
   if buchstabe = wort[i] then // Buchstaben gefunden
     begin 
       GesuchtesWort[i]:=buchstabe;    // das stellt sich dann z.B. so dar: ___e_ e___
     end;

Habe es einmal ein wenig mehr kommentiert.

Wenn noch Fragen sind, bitte etwas genauer beschreiben was denn nicht geht - oder nicht zum Laufen gebracht werden kann.
Vielleicht haben wir ja verschiedene Ansätze zu dem Problem.

Grüße
Klaus