[ART]

Ну вы пипец:

Код:

procedure TForm1.FormShow(Sender: TObject);
begin
 Form2.Listbox1.Items.Add(ParamStr(1));
end;