Tenho as procedures abaixo nos meus botões funciona bem
Pra gravar no banco ele não grava as alterações....soh grava quando eu
click nas DBChebox com o mouse
procedure TfrmAcesso.BitBtn1Click(Sender: TObject); >>> Quando clico aki
as DBCheckbox habilitam
var
i: Integer;
begin
for i:=0 to ComponentCount -1 do
begin
if Components[i] is TDBCheckBox then
begin
TDBCheckBox(Components[i]).Checked := True;
end;
end;
end;
procedure TfrmAcesso.BitBtn2Click(Sender: TObject); >>> Quando clico aki
as DBCheckbox desabilitam
var
i: Integer;
begin
for i:=0 to ComponentCount -1 do
begin
if Components[i] is TDBCheckBox then
begin
TDBCheckBox(Components[i]).Checked := False;
end;
end;
end;
>>> Aki era pra gravar as alterações, soh grava quando eu clico em cada
dbcheckbox
quando executo as procedures acima não grava.
tenho um botão para gravar
DM.qrPermissao.Edit;
DM.qrPermissao.UpdateRecord;
DM.qrPermissao.Post;
Rodrigo
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
