Hola, no necesitas programar el Evento OnEnter y OnExit de cada Edit del form, puedes usar el mismo evento para todos los edits y dentro de cada edit puedes hacer algo así:
Código Delphi
[-]procedure TForm1.edit1Enter(Sender: TObject);
begin
if (Sender is TEdit) and (TEdit(Sender).Visible) then
TEdit(Sender).ColorEditbk := clGradientActiveCaption;
end;
procedure TForm1.edit1Exit(Sender: TObject);
begin
if sender is TEdit then TEdit(Sender).ColorEditbk := clWindow;
end;
Y todos los edits a los que tengas asignados el mismo OnEnter y OnExit cambiaran de color por separado cada vez que se entre o salga de uno.
Saludos