ANTICHAT.XYZ    VIDEO.ANTICHAT.XYZ    НОВЫЕ СООБЩЕНИЯ    ФОРУМ  
Баннер 1   Баннер 2
Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей. Здесь обсуждаются безопасность, программирование, технологии и многое другое. Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
Вернуться   Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
Перезагрузить страницу Срочно!! нужна помощь по Delphi !
   
Ответ
 
Опции темы Поиск в этой теме Опции просмотра

Срочно!! нужна помощь по Delphi !
  #1  
Старый 17.04.2010, 11:26
Voland-791
Познающий
Регистрация: 01.05.2009
Сообщений: 40
Провел на форуме:
333392

Репутация: 3
Exclamation Срочно!! нужна помощь по Delphi !
Сталкнулся с такой проблемой пишу программу проблема в компонентах CheckBox (галочки) и Button хочу сделать так
напремер предоставлен большой список в виде "CheckBox" если выбрано 5вещей и это должно быть задействовано при нажатии "Button" да знаю что эт работает через усливия... вот ток как их составить?
 
Ответить с цитированием

  #2  
Старый 17.04.2010, 12:01
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344

Репутация: 259
Отправить сообщение для EndLeSSDre@M с помощью ICQ
По умолчанию
Пробуй так:

PHP код:
var k:integer;
begin
k:=0;
if checkbox1.checked then k:=k+1;
if checkbox2.checked then k:=k+1;
if checkbox3.checked then k:=k+1;
if checkbox4.checked then k:=k+1;
if checkbox5.checked then k:=k+1;
if checkbox6.checked then k:=k+1;
if checkbox7.checked then k:=k+1;

if k>=5 then showmessage('Выбрано 5') else showmessage('Выбрано меньше 5') 
пробовал через циклы чтоб было, но не получилось...
 
Ответить с цитированием

  #3  
Старый 17.04.2010, 12:27
cheater_man
Постоянный
Регистрация: 13.11.2009
Сообщений: 437
Провел на форуме:
709575

Репутация: 17
По умолчанию
Цитата:
Сообщение от EndLeSSDre@M  
Пробуй так:

PHP код:
var k:integer;
begin
k:=0;
if checkbox1.checked then k:=k+1;
if checkbox2.checked then k:=k+1;
if checkbox3.checked then k:=k+1;
if checkbox4.checked then k:=k+1;
if checkbox5.checked then k:=k+1;
if checkbox6.checked then k:=k+1;
if checkbox7.checked then k:=k+1;

if k>=5 then showmessage('Выбрано 5') else showmessage('Выбрано меньше 5') 
пробовал через циклы чтоб было, но не получилось...

А если я выберу 1,2 и 7 то он будет считать,что я выбрал 1,2,3
 
Ответить с цитированием

  #4  
Старый 17.04.2010, 12:35
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
Провел на форуме:
3055344

Репутация: 259
Отправить сообщение для EndLeSSDre@M с помощью ICQ
По умолчанию
ну пусть пробует через массив, куда будет записываться номер выбранного.. тут же в массиве можешь проверять ключ i на количество выбранного! как мне кажется это тупой вариант, но работать должен))

PHP код:
var i:integer; 
k:array[1..10] of integer;
begin 
i:=1; 
if checkbox1.checked then k[i]:=1 and i:=i+1; 
if checkbox2.checked then k[i]:=2 and i:=i+1; 
if checkbox3.checked then k:[i]=3 and i:=i+1; 
if checkbox4.checked then k:[i]=4 and i:=i+1; 
if checkbox5.checked then k:[i]=5 and i:=i+1; 
if checkbox6.checked then k:[i]=6 and i:=i+1; 
if checkbox7.checked then k:[i]=7 and i:=i+1; 
 
Ответить с цитированием

  #5  
Старый 17.04.2010, 15:54
Voland-791
Познающий
Регистрация: 01.05.2009
Сообщений: 40
Провел на форуме:
333392

Репутация: 3
По умолчанию
Списибо за ответы нашел выход в током виде

if CheckBox22.Checked = true then
memo1.Lines.Add(metalcore[3]);
 
Ответить с цитированием
Ответ



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Срочно! Нужна помощь... Chack. Болталка 60 13.02.2010 11:52
Срочно нужна помощь по экселю! gold-goblin Болталка 9 18.12.2009 04:07



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


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




ANTICHAT.XYZ