Вернуться   CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг
Войти через OpenID

Скриптинг Форум посвещенный созданию скриптов для L2PacketHack

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
Ответ
 
Опции темы Опции просмотра
Старый 08.12.2010, 19:30   #1
Местный
 
Регистрация: 11.06.2010
Сообщений: 644
Сказал Спасибо: 119
Имеет 85 спасибок в 77 сообщенях
dyh9l пока неопределено
По умолчанию Как сделать чтоб не спамило ?)

DELPHI Код:
var Main : Tform; combo : TComboBox; procedure Init; //Вызывается при включении скрипта begin Main := TForm.Create(nil); Main.BorderStyle := bsSizeable; Main.Position := poDesigned; Main.Color :=      clLime; Main.Left :=1082; Main.Top :=0; Main.Width :=200; Main.Height :=990; combo := TComboBox.Create(Main); combo.Parent := Main; combo.Left := 0; combo.Top := 0; combo.Width := 100; combo.Height := 17; combo.Name := 'cbTwinks'; // имя элемента, по которому мы потом будем обращаться к нему combo.Items.Clear; combo.Items.Add('НикТвинка1'); combo.Items.Add('НикТвинка2'); combo.Items.Add('НикТвинка3'); Main.show; end; procedure test; begin     sendmsg('что-то выбрано'); end; begin if combo.itemindex > -1 then test; end.
sendmsg('что-то выбрано'); - много много спамит)
__________________
dyh9l вне форума   Ответить с цитированием
Старый 08.12.2010, 20:13   #2
Местный
 
Аватар для Nickers
 
Регистрация: 23.11.2009
Сообщений: 574
Сказал Спасибо: 134
Имеет 117 спасибок в 82 сообщенях
Nickers пока неопределено
По умолчанию

"Что-то выбранно" спамит?
Я конечно нуб но может поставить переменную булиан
Код:
Var 
   Stop:boolean
и добавить:
Код:
begin
   if (combo.itemindex > -1) and (Stop) then test;
      begin
         test;
         Stop:=false;
      end;
end.
Или переменную combo.itemindex после выполнения if'a делать меньше -1го (Но это плохой вариант)
__________________
Пишу что думаю, но ничего не знаю...
[LameGuard|Скрипты l2phx]
Nickers вне форума   Ответить с цитированием
Старый 08.12.2010, 20:28   #3
Местный
 
Регистрация: 11.06.2010
Сообщений: 644
Сказал Спасибо: 119
Имеет 85 спасибок в 77 сообщенях
dyh9l пока неопределено
По умолчанию

все ) тема разобрана)
__________________
dyh9l вне форума   Ответить с цитированием
Ответ

  CoderX :: Forums > Lineage II > L2PacketHack > Скриптинг



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 03:27.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!