Форум: "Прочее";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];
Вниз
Где-то ошибка... Найти похожие ветки
← →
eXPell © (2007-03-03 22:58) [0]Подскажите как проблему разрешить.
В общем прога генерит последовательности чисел и записывает в файл.
Так вот, думаю что-то долго она работает, прерываю прогу, и начинаю исправлять код.
После чего замечаю, что система просто на тормозит. Запускаю диспечер: файл подкачки - 980 МБ (в обычном режиме работы едва до 250 доходит).
В чем может быть проблема?
ЗЫ. если надо я поясню)))
ЗЫЫ. на всякий случай код)))):
h:=100;
assignfile(n,"D:\7\1.txt");
rewrite(n);
repeat
write(n,inttostr(h),"-");
for i:=1 to 20 do
for j:=1 to 20 do
begin
write(n,inttostr(h),"-");
if i<=9 then
s1:="00"+inttostr(i)
else
if i<=99 then
s1:="0"+inttostr(i)
else
s1:=inttostr(i);
write(n,s1,"-");
if j<=9 then
s2:="00"+inttostr(j)
else
if j<=99 then
s2:="0"+inttostr(j)
else
s2:=inttostr(j);
write(n,s2,#13+#10);
end;
h:=h+1;
until h=109;
closefile(n);
end;
← →
Palladin © (2007-03-03 23:17) [1]ошибка не здесь
← →
eXPell © (2007-03-03 23:21) [2]
> Palladin © (03.03.07 23:17) [1]
дык, это единственный код в проге(!?). Я вот на форму кинул кнопку и в онклике написал выше приведенный код и все. Больше ничего в коде нет!
← →
eXPell © (2007-03-03 23:24) [3]вот болван: я ж предварительно создавал .txt в блокноте, сохранил где надо пустой файл, а блокнот не закрыл с ним.
От этого скорее всего "подкачка" возросла?!
Страницы: 1 вся ветка
Форум: "Прочее";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.246 c
