Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Natcree**

Versuchsmal hiermit

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var

s : String;

e: array of char;

begin

s := edit1.text;

edit2.text:=s[1];

edit3.text:=s[2];

edit4.text:=s[3];

end;

Natcree Registriert seit: 5. Mär 2013 502 Beiträge Delphi 7 Enterprise	#5 AW: String Zeichen einzeln ausgeben 14. Mär 2013, 11:24 Versuchsmal hiermit markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); var s : String; e: array of char; begin s := edit1.text; edit2.text:=s[1]; edit3.text:=s[2]; edit4.text:=s[3]; end;
	Zitat

Einzelnen Beitrag anzeigen

AW: String Zeichen einzeln ausgeben