Hi,

angenommen ich habe eine EditBox und möchte den Inhalt (String) in die einzelnen Buchstaben aufsplitten und diese in einen array packen. Wie geht das in Delphi.
Bsp.:
edit1.text:="Hallo";
Dann muss der Array namens x so aussehen:
x[0] = 'H';
x[1] = 'a';
x[2] = 'l';
x[3] = 'l';
x[4] = 'o';

Und wie füge ich so einen Array dann wieder zu einem String "Hallo" zusammen?

Vielen Dank für Eure Antworten im Vorraus

Du kannst das Edit-Feld mit dem Arrayindex ansprechen, also so

Code :

1	Buchstabe1 := Edit1.Text[1] // H

Zusammenfügen kannst du einen String so:

Code :

1	string := Edit1.Text[1] + Edit1.Text[2]

Beispiel dazu:

Code :

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

var   wort1, wort2, wort3 : string;   wort1 := 'Haus'; wort2 := 'Mann';   wort3 := 'Donald ist ein ' + wort1 + wort2;       for i := 1 to Length (wort3) do begin    wort1[i] := upcase (wort3[i]); end;

Cool, das ist ja easy

Vielen Dank

Dann klicke bitte noch kurz auf erledigt und alle sind glücklich