ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
Перезагрузить страницу как узнать что выделено 4 CheckBox
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

как узнать что выделено 4 CheckBox
  #1  
Старый 07.06.2010, 18:07
Leon2009
Новичок
Регистрация: 01.09.2009
Сообщений: 29
Провел на форуме:
20650

Репутация: 0
Smile как узнать что выделено 4 CheckBox
Здравствуйте! можно ли узнать? у меня на форме 30 CheckBox если из них выделить любые 4 как сделать чтобы хоть сообщение выдал что выделено 4 чекса? спасибо!
 
Ответить с цитированием

  #2  
Старый 07.06.2010, 18:12
sn0w
Статус пользователя:
Регистрация: 26.07.2005
Сообщений: 568
Провел на форуме:
1290766

Репутация: 1236


По умолчанию
переменную сделай++--

зы чтоб OnClick одинаковый обработчик у всех был

ззы вы меня паражаите)
__________________


snow white world wide
 
Ответить с цитированием

наверное так
  #3  
Старый 08.06.2010, 01:09
Leon2009
Новичок
Регистрация: 01.09.2009
Сообщений: 29
Провел на форуме:
20650

Репутация: 0
Post наверное так
Код:
var i:integer;
begin
i:=0;
if CheckBox1.Checked= true then i:=i+1;
if CheckBox2.Checked= true then i:=i+1;
if CheckBox3.Checked= true then i:=i+1;
if CheckBox4.Checked= true then i:=i+1;
if CheckBox5.Checked= true then i:=i+1;
if CheckBox6.Checked= true then i:=i+1;
label1.Caption:=inttostr(i);
if i>=3 then label2.Caption:='bolshe ili ravno 3';
спасибо!
а если 1000 чексов?
т.е одинаковый обработчик?
 
Ответить с цитированием

  #4  
Старый 08.06.2010, 01:32
diznt
Постоянный
Регистрация: 31.01.2008
Сообщений: 643
Провел на форуме:
6128108

Репутация: 445


По умолчанию
Цитата:
Сообщение от Leon2009  
Код:
var i:integer;
begin
i:=0;
if CheckBox1.Checked= true then i:=i+1;
if CheckBox2.Checked= true then i:=i+1;
if CheckBox3.Checked= true then i:=i+1;
if CheckBox4.Checked= true then i:=i+1;
if CheckBox5.Checked= true then i:=i+1;
if CheckBox6.Checked= true then i:=i+1;
label1.Caption:=inttostr(i);
if i>=3 then label2.Caption:='bolshe ili ravno 3';
спасибо!
а если 1000 чексов?
т.е одинаковый обработчик?
Код:
var
 i, i2: integer;
begin
 i2:=0;

 for i:=1 to 8 do
  begin
    if TCheckBox(FindComponent('CheckBox'+inttostr(i))).Checked=true then
     inc(i2);
  end;

 if i2 = 4 then ShowMessage('Выделенно 4 чекбокса');
end;
 
Ответить с цитированием

  #5  
Старый 08.06.2010, 10:25
M_script_
Постоянный
Регистрация: 29.10.2008
Сообщений: 306
Провел на форуме:
1819761

Репутация: 180
Отправить сообщение для M_script_ с помощью ICQ
По умолчанию
Цитата:
Сообщение от Leon2009  
спасибо!
а если 1000 чексов?
т.е одинаковый обработчик?
Пример на билдере
обработчик OnClick всех чекбоксов:
PHP код:
void __fastcall TMainForm::CheckBoxClick(TObject *Sender)
{
    pCheckBox = static_cast<TCheckBox *>(Sender);
    if(pCheckBox->Checked)
        Label1->Caption = IntToStr(++iCBCount);
    else
        Label1->Caption = IntToStr(--iCBCount);
} 
 
Ответить с цитированием
Ответ



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Если ты попал... (записки бывалого программиста) ErrorNeo Статьи 73 29.05.2010 13:44
F.A.Q по Пранку Nightmarе Статьи 43 28.03.2010 10:55
«Свиной» грипп как зеркало, в котором видно все… slesh Болталка 14 03.11.2009 23:55
Плакаль!!!! Бродил вчера по врачебным форумам, искал инфу про лопнувшие в глазах .... $G@mer Болталка 6 12.10.2006 17:12



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ