procedure TForm1.Button1Click(Sender: TObject); begin if IsLeapYear(2001) then showmessage('bisiesto') else showmessage('No bisiesto') end;
Ważne artykuły
S’amuser et perdre du poids
Convertir BMP a JPG