Кружок нубов(Вопрос-Ответ)

[TAMBIK]

Подскажите как сделать ? пример:

1. при произведенном мною действии
2 . если нет ответа на действие
// вот здесь наверно надо мне чтобы высчитывалось время
// между п.1 и п.2 _ ток как сделать я невкурю
3. если время высчитаное более заданого то
4. произвести другое действие

[QaK]

TAMBIK, делаешь п1 - запускаешь таймер, в интервале ставишь, скклько надо тебе ждать, в обработчик таймера - п4 и стоп таймера, ну и проверяешь, если получил ответ на п1 и таймер.енабле = true тогда товет получили и тормозишь таймер.
Как-то так ... что непонятно - спрашивай

Добавлено через 38 секунд
newbie61, чем больше, тем лучше, ставь секунд 30, не промахнешься.

[TAMBIK]

[quote=QaK;35012]TAMBIK, делаешь п1 - запускаешь таймер, в интервале ставишь, скклько надо тебе ждать, в обработчик таймера - п4 и стоп таймера, ну и проверяешь, если получил ответ на п1 и таймер.енабле = true тогда товет получили и тормозишь таймер.
Как-то так ... что непонятно - спрашивай

вот так ?

// п.1
 procedure Action;
  begin
  timer5.enabled:=true;
  end; 
procedure OnTimer5(Sender: TObject);
 begin
  stopAttacka;
  end;
// п.4
  procedure stopAttaka;
   begin
   timer5.enabled:=false;
   end;
 procedure Init;
  begin
  timer5:=TTimer.Create(nil);
  timer5.OnTimer:=@OnTimer5;
  timer5.enabled:=false;
  timer5.interval:=6000;
  end;
 procedure Free; 
  begin
  Timer5.free;
  end;

// п.2
  begin
  if FromServer and(pck[1]=#$33)and(ReadD(2)=myID) then 

        if  timer5.enabled=true  then  timer5.enabled:=false;  
            end;

[QaK]

TAMBIK, ну, примерно, только нужно же еще включить таймер, ну и п4 - это же тоже какие-то действия, не просто тормознуть таймер. Ну и после условия
if timer5.enabled=true then
тоже надо какое-то действие совершить?
А так - в первом приближении, все норм.

[TAMBIK]

Сообщение от QaK

TAMBIK, ну, примерно, только нужно же еще включить таймер, ну и п4 - это же тоже какие-то действия, не просто тормознуть таймер. Ну и после условия
if timer5.enabled=true then
тоже надо какое-то действие совершить?
А так - в первом приближении, все норм.

действия есть так показал примерно
СПАСИБО

[newbie61]

Подскажите, играю на Грации Финал, использую пакет хак для точки скилов, вопрос в следующим: какую лучше поставить задержку отправления пакетов на сервер, чтобы меньше палиться в логах.

[alexteam]

изверг!
if timer5.enabled=true then timer5.enabled := false;
сводится к
timer5.enabled := false;

[QaK]

alexteam, не-не, нифига,там же надо проверку, если таймер активен - значит мы ждем этого действия, еслиине активен - значит не ждем,TAMBIK, не слушай этого язычника =)

[TAMBIK]

ЧТО БЫ ЭТО ЗНАЧИЛО ?
при сятии галочки со скрипта

[alexteam]

TAMBIK,

при сятии галочки со скрипта

выполняеться процедура описаная в free. проблема в ней ?.
dream0gG, в поиск.

tino4ek, http://l2phx.pp.ru/ файловый архив.