procedure TFormProperties.ButtonOKClick(Sender: TObject);
begin
  FormMain.ListViewServers.Items.Item[0].SubItems[0] := 'test';
  FormProperties.Hide;
end;