Edit Box Inhalt in ein Array packen

L

Lumakrieger

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 :)
 

Chumper

Erfahrenes Mitglied
Du kannst das Edit-Feld mit dem Arrayindex ansprechen, also so
Code:
Buchstabe1 := Edit1.Text[1] // H
Zusammenfügen kannst du einen String so:
Code:
string := Edit1.Text[1] + Edit1.Text[2]

Beispiel dazu:
Code:
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;
 
Zuletzt bearbeitet:

Neue Beiträge