OnChange zweier Felder soll die gleiche Prozedur auslösen

[MetalAddict]

Hallo,

ich würde gerne dem OnChange-Event zweier Edit-Felder die gleiche Prozedur zuweisen, und zwar (vereinfacht) soll eine Ampel grün werden, wenn der Quotient eine gerade Zahl ist, und rot wenn nicht. Die Prozedur an sich ist kein Problem, nur will ich weniger Code haben.

Gibt es etwas wie:

Code:

if Sender = Edit1,Edit2 then
   begin
   [...]

Danke für eure Antworten

Grüße