Olá Rafael,
Bom os componentes que possuem a propriedade Text a exemplo do Edit são
herdados da Classe TEditCustom. Por isso você póderá utilizar o seguinte:
for i:=0 to TForm(sender).ComponentCount-1 do
if TForm(sender).Components[i] is TCustomEdit then begin
como eu faço pra saber se tal compomente tem uma determinada propiedade??
exemplo eu quero varrer o form e apagar os textos de todos os compomentes
que tem a propiedade text.
ai faria assim...
for i := 0 to self.componentscount -1 do
if (fu) self.components[i] (funcao que diz se tem a proiedade
Rafael Jorge wrote:
como eu faço pra saber se tal compomente tem uma determinada propiedade??
exemplo eu quero varrer o form e apagar os textos de todos os compomentes
que tem a propiedade text.
ai faria assim...
for i := 0 to self.componentscount -1 do
if (fu) self.components[i] (funcao
3 matches
Mail list logo
