как воплотить принцип двух экранов Image (Delphi)?

[FrankyKaup]

Подскажите пожалуйста как на делфи воплотить принцип двух экранов: когда есть 2 Image лежащем друг на друге, и надо чтобы они чередовались в своем свойстве Visible: то 1-й экран(Image1) видимый и на нем отображается текущее положение кружка, а на втором(Image2) невидимом рисуется уже следующая позиция кружка, то затем второй становиться видимым, а первый нет и т.д. Таким образом получается движение. Вот код этого принципа на бэйсике:

Frm1.picScreen(iVis).Visible=True ‘показать экран
iVis = Abs(iVis-1)  'перейти к следующему экрану
frm1.picScreen(iVis).Visible = False ‘скрыть экран
frm1.picScreen(iVis).Cls    ‘отчистить его сразу весь

iVis - это номер экрана. Как этот номер присвоить к Image в виде такой же переменной? Вопрос чисто синтаксический вроде как...Заранее спасибо!

[GoodDA]

начальные условия:

Image1.Visible := True;
Image2.Visible := False;

изменение

Image1.Visible := not Image1.Visible;
Image2.Visible := not Image2.Visible;