Pessoal, tenho a seguinte estrutura:
Form
PageControl
GroupBox
ScroolBox
E tenho alguns Edits dentro deste ScrollBox, e gostaria de usar a seguinte
rotina que um colega Vitor passou algum tempo atras para limpar os edits
procedure LimparCampos(Sender: TComponent);
var
i : Integer;
begin
for i := 0 to
Sender.ComponentCount -1 do
if Sender.Components[i] is TEdit then
begin
TEdit(Sender.Components[i]).Text := '';
end;
end;
Mas acontece q se coloco LimparCampos(Scrollbox), mas naum funciona, coloquei
um showmessage para mostrar o conteudo do Sender.ComponentCount e esta sempre
zero, se coloco o GroupBox, mesma coisa, soh se colocar o nome do form
funciona, mas ai ele limpa os outros edits tb, e soh quero limpar os q estaum
dentro do ScrollBox.
Ser� que algu�m poderia me ajudar???
[]s
Nilson Chagas
"E Jesus, respondendo, disse-lhes: Porventura n�o errais v�s em raz�o de n�o
saberdes as Escrituras nem o poder de Deus?" Mc 12v24
__________________________________________________
Converse com seus amigos em tempo real com o Yahoo! Messenger
http://br.download.yahoo.com/messenger/
[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
