Dificuldade com GroupBox

09/12/2003

2

Senhores, tenho 1 groupbox e dentro dele 14 checkbox contendo nomes de escolas, e tenho 1 tabela contendo :
codigo +
escola a25
data date

Tenho que ao clicar no CheckBox := checked em todas que quizer
gravar dentro de minha tabela com um loop todos os captions dos CheckBox := checked.

alguém sabe se tem como gravar todas com uma rotina só, sem ter que ir de CheckBox em CheckBox?

Obrigado

Eugênio


Responder

Posts

09/12/2003

Motta

seria mais fácil usando um TCheckListBox


procedure TForm1.SpeedButton1Click(Sender: TObject);
var i:integer;
begin
for i:=0 to (CheckListBox1.Items.Count - 1) do
begin
if CheckListBox1.Checked[i] then ....
end;

end;


Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários. Para saber mais sobre o uso de cookies,
consulte nossa política de privacidade. Ao continuar navegando em nosso site, você concorda com a nossa política.

Aceitar