Fórum Listar DbEdits #331240
16/10/2006
0
Boa tarde a todos,
Tenho um painel, onde constam varios dbedits, e alguns bitbuttons tem como eu passar o painel para uma funcao e esta mudar a propriedade enabled somente dos dbedits contidos neste painel?
Abs
Tenho um painel, onde constam varios dbedits, e alguns bitbuttons tem como eu passar o painel para uma funcao e esta mudar a propriedade enabled somente dos dbedits contidos neste painel?
Abs
Felipeiw
Curtir tópico
+ 0
Responder
Posts
16/10/2006
Renato.pavan
tem como eu passar o painel para uma funcao e esta mudar a propriedade enabled somente dos dbedits contidos neste painel?
Abs
Colega, se eu entendi bem segue abaixo o codigo pra essa finalidade.
procedure EnableDisableEdits(aPanel: TPanel; aEnable: Boolean);
var
i: Integer;
begin
for i := 0 to aPanel.ControlCount - 1 do
if aPanel.Controls[i] is TEdit then
(aPanel.Controls[i] as TEdit).Enabled := aEnable;
end;
[]´s
Renato.
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)