Validar Edit Delphi

[Algoritmo Napster 0]

Ola galera bom estou iniciando a linguagem Pascal agora e tenho que desenvolver uma aplicação, neste projeto queria eu fazer com que quando os campos estiverem vazios a borda do edit fique vermelho e enquanto todos os campos não estiverem preenchidos o botão de cadastrar não fique disponível. Obrigado galera

[bdexterholland 0]

A cor da borda eu não lembro como trocar, mas é possível trocar o fundo.

 

for i:= 0 To Self.ComponentCount - 1 do
 if Self.Component[i].ClassName = "TEdit" then //Preciso confirmar se a comparação é esta mesmo.
   if Trim((Self.Components[i] as TEdit).Text) = EmptyStr Then
     (Self.Components[i] as TEdit).Color := clRed
   else
     (Self.Components[i] as TEdit).Color := clWindow;