Na Form1 budes mit udalost OnButtonClick. Tu si vytvor napr. vlozenim buttonu a napsanim udalosti. Pak button smaz.
V ni budes mit ten svuj kod, jen si IP adresu prectes z Hintu buttonu, ktery ji zavolal.
Procedure PridejButton(AForm: TForm; const ACaption, AHint: string; const X, Y: integer);
begin
with TButton.Create(AForm) do
begin
Parent := AForm;
Left := X;
Top := Y;
Caption := ACaption;
Hint := AHint;
OnClick := AForm.OnButtonClick;
end;
end;
Volat to pak budes treba: PridejButton(Form1, 'Server 1', 'http://192.168.15.44', 20, 50);
Do INI si zapises to same, co posilas do procedury na vytvoreni buttonu. Form tam zapisovat nemusis, ten znas.
P.S. je to z hlavy, takze pripadne chyby si oprav.