Fórum Duvidas a um novato!!! #178178
28/08/2003
0
Ae pessoal beleza ?
tipo assim
Tenho uma tela com cerca de 10 dbedit´s so que queria fazer com que logo que entrar o form,(form actvate) deixa-se eles disable, e so ficaria enable se eu clicase no botao NOVO, so que eu sei fazer na mao as dbedit 1 por uma... nao teria como fazer uma procedure ou algo assim que eu mandava habilitar e dasablitar os Tdbedit sei la ?
por favor ajudem pois preciso fazer um sistema de Farmacia pra novembro e eh TCC da minha facul
valeu
tipo assim
Tenho uma tela com cerca de 10 dbedit´s so que queria fazer com que logo que entrar o form,(form actvate) deixa-se eles disable, e so ficaria enable se eu clicase no botao NOVO, so que eu sei fazer na mao as dbedit 1 por uma... nao teria como fazer uma procedure ou algo assim que eu mandava habilitar e dasablitar os Tdbedit sei la ?
por favor ajudem pois preciso fazer um sistema de Farmacia pra novembro e eh TCC da minha facul
valeu
Fcunha
Curtir tópico
+ 0
Responder
Posts
28/08/2003
Barcelos
Olá amigo,
Tente o seguinte:
Procedure EnableDisable(Enab : Boolean);
var I : Integer;
begin
For I := 0 to ComponentCount -1 do
begin
IF Components[I] is TDBEdit then
TDBEdit(Components[I]).Enabled := E;
end;
end;
Basta você configurar a variável Enab para true ou false, de acordo com o que você precisar.
Qualquer coisa entra em contato.
Barcelos
osbarcelos@hotmail.com
Tente o seguinte:
Procedure EnableDisable(Enab : Boolean);
var I : Integer;
begin
For I := 0 to ComponentCount -1 do
begin
IF Components[I] is TDBEdit then
TDBEdit(Components[I]).Enabled := E;
end;
end;
Basta você configurar a variável Enab para true ou false, de acordo com o que você precisar.
Qualquer coisa entra em contato.
Barcelos
osbarcelos@hotmail.com
Responder
Gostei + 0
28/08/2003
Vander Batista
use a procedure do barcelos
mas use no evento onshow, pois no onactivate, pode dar um erro futuro.....
Vander Batista
mas use no evento onshow, pois no onactivate, pode dar um erro futuro.....
Vander Batista
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)