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