stirnglänge erfahren??

[Nooa]

hallo... es mag jetzt vielleicht ein wenig dumm klingen, doch ich bin anfänger.. ich darf mir das erlauben *g*

mein problem:

ich möchte die anzahl der zahlen aus einer editbox erfahren, damit ich diese verarbeiten kann.

ich weis aber nicht wie ich dies bewerkstellige...

mien bisheriger quellcode:
<PRE>
var i,j : integer;
begin
zahl1:=1000;
for i:= 0 to zahl1 do
begin
j:=Random(9);
if i = 0 then
begin
TextBox1.Text := inttostr(j);
end
else
begin
TextBox1.text := TextBox1.text + inttostr(j);
if TextBox1.text.Length &gt;= TextBox1.Width then
TextBox1.text := Copy(TextBox1.Text,1,TextBox1.Text.Length);
end;
end;
end;
</PRE>

P.s.:

Es soll eine art laufschrift werden

[Nooa]

ftwhlwe meinerseitz... hätte in der abfrage so lauten sollen:

<PRE>
if TextBox1.text.Length &gt;= (TextBox1.Width / TextBox1.Font.Size) then
</PRE&gt