Hallo,
so geht es:
Delphi-Quellcode:
var zahl:tbignum;
zahlstring:string;
i:integer;
begin
zahlstring:='12345678901234567890'; // zum Beispiel
setlength(zahl,length(zahlstring));
for i:=1 to length(zahlstring) do
zahl[i-1]:=ord(zahlstring[i])-48;
listbox1.items:=BuildList(zahl,false,true); //irgendein tstrings
setlength(zahl,0);
end;
Naja bei der Variante fehlt aber noch die 890 zum Schluss als Wort(aber wahrscheinlich ist das Absicht, würde sich ja blöd anhören...). Es ist eher eine Semi-Wort Variante würde ich sagen. Und blondervolker hat nichts von einer Listendarstellung gesagt. Aber auch interessant.
Mfg