Simple program to create animation framewise. Delphi