A bueno y si la cuestión no es de año bisiesto y todo el asunto, si no que solo quieres saber si un numero es multiplo de 4 o no, pues bastara con averiguar si ese numero dividido por 4 arrojara un resto de 0, un ejemplo:
Código Delphi
[-]
if (16 mod 4 = 0) then
ShowMessage('Es Multiplo de 4');
else
ShowMessage('No es Multiplo de 4');