ouais tu peux faire un truc genre :
if Sender is TEdit then
with Sender as TEdit do
begin
Color := clYellow;
end;
|
dans un OnEnter relié à tous tes edits, et remettre en clWindow dans le OnExit, pour que l'Edit actif soit en jaune (c'est moche de le faire en clYellow mais c'est juste pour l'exemple
) , t'auras juste deux procédures pour l'ensemble de tes TEdit 
Message édité par antp le 26-06-2003 à 13:15:00
---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire