[delphi-br] Verificar propriedade dos componentes - intraweb

Wed, 16 Jun 2010 19:51:27 -0700 

Colegas,

eu preciso setar todos os fontes dos componentes automaticamente:

Estive pesquisando e achei isto:

for i := 0 to Form.ComponentCount - 1 do
    if IsPublishedProp(Form.Components[i], Propriedade) then
      if TVarRec(Valor).VarType = vtObject then
        Form.Components[i].Assign(TComponent(TVarRec(Valor).vtObject)
      else
        SetPropValue(Form.Components[i], Propriedade,
TVarRec(TVarRec(Valor).VVariant^));



Porém, a função isPublishedProp não existe. Alguma idéia colegas, de
como resolver isto?


Obrigado a todos,


-- 
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br


[As partes desta mensagem que não continham texto foram removidas]

Responder a