Спасиба а всётаки хе чо за генератор и где достать.Хотелось бы 0000 цифры хе =Р до 99999999


а если я виду
var i:longint;
f:File;
Begin
Assign(F,'dict.txt');
ReWrite(F);
for i:=1 to 100000 do
WriteLn(F,i);
Close(F);
End;
в teхt файл то как переминовать .exe .ddl
или что что бы с генерировать