Delphi 7. как сохранить позицию курсора в листбоксе

[BOOGFud]

пример:
выбрал элемент в листбоксе потом нажал на image открылась форма2, закрыл форму2 и при возврате на форму1 позиция курсора в листбоксе сбрасывается а нужно чтоб она сохранялась на последнем выбраном элементе.

[Кольша]

global var
index:integer;
image1.click:index:=listbox1.itemindex;
from1.onactivate:listbox1.setfocus;
listbox1.itemindex:=index;

надеюсь понятно?