[angvelem]

Не ставил.

Из вопроса теперь понятно почему не работает.
В свойствах формы (Object Inspector) щёлкаем мышкой по событию OnShow и получаем заготовку:

Код:

procedure TForm2.FormShow(Sender: TObject);
begin
  
end;

её заполняем нужным кодом.