Verifica se Algum Edit está em branco

Delphi

27/04/2005

Olá galera, mais uma vez preciso de uma ajuda

Gostaria de criar uma função para verificar se algum Edit ficou em branco

se alguem puder me ajudar eu agradeço muito !

Um grande abraço a todos os Colegas !!!!


Fabiano Góes

Fabiano Góes

Curtidas 0

Respostas

Bruno Belchior

Bruno Belchior

27/04/2005

function FicouEmBranco: Boolean;
var
  Cont: Smallint;
begin
  for Cont := 0 to ComponentCount-1 do
    if Components[Cont].ClassType = TEdit then
      if (Components[Cont] as TEdit).Text = ´´ then
        Result := True
end
atenção só varre os Edit´s do [b:3be4e76ef3]atual[/b:3be4e76ef3] formulário...


GOSTEI 0
Fabiano Góes

Fabiano Góes

27/04/2005

Olá Brunão, como vai ? Beleza ?

Só queria te agradecer pela atenção que me deu sobre a função para verificar edits em branco ( e mudar cor dos Edits )

agora sim consegui entender, você me ajudou muito valeu mesmo.

um grande abraço!!!!!!!!


GOSTEI 0
POSTAR