Guten Tag,
meinst du etwa so hier:
Die zahl lautet : 345629 zum beispiel und du willst jetzt die erste Zahl ins Edit feld schreiben. Dann steht jetzt die 3 im Feld. Danach die 4 also steht dann 43 im Editfeld, so ungefähr ?
Dann lautet die Procedure so:
Delphi-Quellcode:
var zahl : string;
i : integer;
ziff_table : char;
begin
zahl := '345629';
for i:=1 to length(zahl) do
begin
ziff_table := zahl[i];
edit1.text := ziff_table + edit1.text;
end;
Dann müßte im EditFeld dann das stehen : '926543'
Habs jetzt nicht ausprobiert, da ich nicht zu hause bin, aber dürfte funktionieren.
schönen tag noch.