







|
MySQL.RU - Webboard
Вернуться
Нажатие button (111) 23/06/2005 - 17:11:12
Re: Незачот (Валентин) 23/06/2005 - 17:15:14
Re: Незачот (111) 23/06/2005 - 18:01:35
Re: Можно так (Валентин) 23/06/2005 - 18:20:21
Re: Можно и так (Валентин) 23/06/2005 - 18:33:36
> Original message text:
> From: 111 - 23/06/2005 - 17:11:12
> Subject:Нажатие button
> -----------------
> Вывожу записи на экране, напротив записей есть checkbox.
> При нажатии на button необходимо выполнить определенные действия с выделенными записями. Я пишу на onclick="func()"
> Понимаю, что нужно проверить массив checkbox и где стоит галочка запомнить в другой массив переменных, а потом в вызове функции проводить действия, но как ни кручу, ну никак... Помогите, плиз
>
>
From: Валентин - 23/06/2005 - 18:33:36
Subject:Можно и так
-----------------
пишу на паскале, на си сам напишешь, если надо. Это пример на случай, если в лом использовать sender :)))))
можно перерыть всю форму по чекбоксам и выснить кто из ний кликнут, а кто нет.
type arec=record
Key:Integer;//ключ ложим в tag чекбокса
Checked:Boolean;
Name://имя компонента
end;
var a:array of arec;
...
function func:integer;
begin
a:=nil;//очистка
for i:=0 to TForm(ThisForm).ComponentCount do
if TForm(ThisForm).Components[i] is TCheckbox then begin
//если это чекбокс
SetLength(a,length(a)+1);
a[length(a)-1].Key=TCheckBox(TForm(ThisForm).Components[i]).Tag;
a[length(a)-1].Checked=TCheckBox(TForm(ThisForm).Components[i]).Cheched;
a[length(a)-1].Name=TCheckBox(TForm(ThisForm).Components[i]).Name;
end;
end;
end;
все :) достаточно примеров?
[Это сообщение - спам!]
Последние сообщения из форума
Уважаемые посетители форума MySQL.RU!
Убедительная просьба, прежде чем задавать свой вопрос в этом форуме, обратите внимание на разделы:
- ответы на наиболее часто задаваемые вопросы - FAQ
- раздел документация
- раздел поиск по сообщениям форума и документации
Также, старайтесь наиболее подробно указывать свою ситуацию (версию операционной системы, версию MySQL,
версию программного обеспечения, по которому возникает вопрос, текст возникающих ошибок, и др.)
Помните, чем конкретнее Вы опишете ситуацию, тем больше шансов получить реальную помощь.
22714
|
|