arka plan hareket

var 
  MyForm: TclGameForm;
  Timer: TclTimer;
  b: Boolean;

Procedure ProcOnGameTimer;
begin
  if b then
    MyForm.SetFormBGImage('c4gxsvt.png')
  else
    MyForm.SetFormBGImage('anhjtzn.png');
  
  b:= not b;
End;

begin
  b:= False;
  MyForm:= TclGameForm.Create(Self);
  MyForm.AddGameAssetFromUrl('https://i.hizliresim.com/c4gxsvt.png');
  MyForm.AddGameAssetFromUrl('https://i.hizliresim.com/anhjtzn.png');

  
  Timer:= MyForm.AddNewTimer(MyForm,'timer',500);
  Timer.Enabled:= True;  
  MyForm.AddNewEvent(Timer,tbeOnTimer,'ProcOnGameTimer');
  
  MyForm.Run;
End;