///
Как зациклить выполнение скрипта
Автор D_N_A, 25 мар 2005 10:57
Сообщений в теме: 3
#2
Scorp-13
-
- Members
-
- 285 сообщений
Co-Moderator: Спорт, Кино и музыка
- ФИО:Евгений
- Город:Украина, Запорожье
Отправлено 25 марта 2005 - 11:11
procedure Test1; forward;
procedure Main;
var
i: byte;
begin
try
for i := 1 to (сколько надо) do
Test1;
except
Log.Error('Exception', ExceptionMessage);
end;
end;
procedure Main;
var
i: byte;
begin
try
for i := 1 to (сколько надо) do
Test1;
except
Log.Error('Exception', ExceptionMessage);
end;
end;
Ab altero expectes, alteri quod feceris
#3
Scorp-13
-
- Members
-
- 285 сообщений
Co-Moderator: Спорт, Кино и музыка
- ФИО:Евгений
- Город:Украина, Запорожье
Отправлено 25 марта 2005 - 11:13
Выполнять, соответственно, нужно процедуру main.
Ab altero expectes, alteri quod feceris
#4
D_N_A
-
- Members
-
- 6 сообщений
Новый участник
- ФИО:*
Отправлено 25 марта 2005 - 11:25
большое спасибо.Выполнять, соответственно, нужно процедуру main.
Количество пользователей, читающих эту тему: 0
0 пользователей, 0 гостей, 0 анонимных
