Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

функция определения выбранного item-a [D7, XP]


tytus ©   (2007-10-11 16:04:00) 

Доброго дня всем. Вот забыл как обзывается сия ф-я... А суть вот в чем.
Имеется GroupBox,  а в нем несколько CheckBox-ов. Так вот, данная ф-я определяет какой из чекбоксов установлен, и возвращает его номер.


tytus   (2007-10-11 16:23:00) [1]

>DVM ©   (11.10.07 16:14) [4]
-))))))))))))))))
огроменное спаисбо всем, но.... увы и ах! все не то.
ф-я - стандартная.... вот роюсь в инете и не нахожу, решил спросить у ВАС, но... все не то...
Сия ф-я выгодна есче и тем, что для любого чекбокса можно прикрутить одну и ту-же про-ру обработки OnClick, а в ней в зависимости от результата этой ф-ии и рулить куда надо!
Но ничего, нарою - обезательно напишу!
See ya!


Leonid Troyanovsky   (2007-10-11 16:19:00) [2]


> Palladin ©   (11.10.07 16:15) [5]

> Нет такой функции... хотя...

Тогда лучше TCheckListBox взять.

--
Regards, LVT.


AIK   (2007-10-11 16:16:00) [3]

Var i,X:integer;
begin
Memo1.Clear;
X:=3;  // Количество CheckBox-ов для примера взял 3
For i:=1 to x do
if (FindComponent('CheckBox'+inttostr(i))as TCheckBox).Checked=true then
Memo1.Lines.Add('CheckBox'+inttostr(i));


Palladin   (2007-10-11 16:15:00) [4]

Нет такой функции... хотя...

Function GetChecked(g:TGroupBox):String;
Var
i:Integer;
Begin
Result:='';
For i:=0 to g.ControlCount-1 Do
 If (g.Controls[i] is TCheckBox) Then
  If TCheckBox(g.Controls[i]).Checked Then Result:=Result+IntToStr(i)+',';
If Result<>'' Then SetLength(Result,Length(Result)-1);
End;


DVM   (2007-10-11 16:14:00) [5]


> tytus  

Ты с TRadioGroup перепутал, там действительно есть TRadioGroup.ItemIndex


clickmaker   (2007-10-11 16:13:00) [6]

функция API?
с RadioGroup не путаешь?


tytus   (2007-10-11 16:10:00) [7]

>Palladin ©   (11.10.07 16:07) [1]
да непомню ! Вопрос ведь не в том что ф-я возвратит, а как онная называется!?


Palladin   (2007-10-11 16:07:00) [8]

а если несколько установлено, то какой номер она должна возвращать?


Наверх

Титульная страница Поиск, карта сайта Написать письмо