Thiagão, acho uma boa idéia procurar a propriedade datasource do componente... Estava olhando aqui alguns componentes dataware, e algo em comum entre eles são as classes: TObject TPersistent TComponente. Daqui para baixo, as classes tornam-se específicas de cada componente... E olhando a classe TDataSource, ela tem a mesma hierarquia acima... Acho q dá pra fazer algo genérico a partir delas... Um abraço, Danilo
Francisco Thiago <[EMAIL PROTECTED]> escreveu: Pessoal, Preciso de uma ajuda de vocês. Baixamos aqui no escritório aquela dica do Luciano Pimenta da última edição da ClubeDelphi. Lá ele mostra como configurar restriçoes de campos no formulário. Estamos pensando em aprimorar o projeto do Luciano e começar a usar no que agente já tem. Só que existe um problema: Como identificar quais os controles que estão mostrando os campos? Temos os TDBedit, TDBGrids, TDBLabels... TQRLabels... TEvoDbEdit... Enfim, são muitos os componentes que podem ter essa função.... Logo, criar um if para cada tipo de objeto não dá. Daí pensei em ver a hierarquia deles.... Descobri que cada um vai pra um lado, ou seja, não tem uma classe comum (ou tem?).... Agora estou pensando em procurar nestes componentes a propriedade DataSource. O que vocês acham? Teria um jeito melhor de descobrir quais componentes são DataWare? No exemplo do Luciano, ele modifica o texto mostrado para '*'... (property PasswordChar)... Mas como fazer isso num TDBText por exemplo? Ou num Grid Então? Modificar a propriedade visivel do objeto seria uma saída, porém, o form não ficaria muito bem estéticamente.... O que vocês sugeririam? []'s Francisco Thiago de Almeida Enter & Plug Informática Divisão: Desenvolvimento e Banco de dados Franca / SP msn: [EMAIL PROTECTED] _______________________________________________________ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- <<<<< 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] Yahoo! Grupos, um serviço oferecido por:var target="_blank";var URL = new Array();URL[1] = "http://br.rd.yahoo.com/SIG=12f7sbi08/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1124470777/A=2932553/R=0/id=flashurl/SIG=10tift5qr/*http://br.movies.yahoo.com/";var link="javascript:openWindow(1)";var flashfile = 'http://br.i1.yimg.com/br.yimg.com/i/br/ads5/cinema_n_suspense.swf?clickTAG='+link+'';var altURL = "http://br.rd.yahoo.com/SIG=12f7sbi08/M=365837.7000707.7924794.2369893/D=brclubs/S=2137111264:HM/Y=BR/EXP=1124470777/A=2932553/R=1/id=altimgurl/SIG=10tift5qr/*http://br.movies.yahoo.com/";var altimg = "http://br.i1.yimg.com/br.yimg.com/i/br/ads5/cinema_n_suspense.gif";var width = 468;var height=60; --------------------------------- 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 Termos do Serviço do Yahoo!. --------------------------------- Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [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