Hallo!
Ich habe einen String.
Aus diesem will ich ein einziges Zeichen herausschneiden.
Irgedwie funkitioniert das mit meinem Code nicht.
Ich hab wahrscheinlich nur nen Denkfehler.
Hier der Code:
Delphi-Quellcode:
function TForm1.GetZeichen(Text:String;Nummer:Integer):String;
begin
delete(Text,0,Nummer-1);
delete(Text,Nummer+1,length(Text));
result:=Text;
showmessage(result);
end;
Text ist der String, Nummer gibt an, welches Zeichen ich zurückgeliefert haben möchte.
Bsp: Text: Delphi-Praxis Nummer: 4 Ergebnis: p