procedure TFormMain.ListViewServersDblClick(Sender: TObject);
begin
  if ListViewServers.Selected.Caption <> '' then
  begin
    FormProperties.Show;
    FormProperties.EditComputerName.Text := ListViewServers.Selected.Caption;
    FormProperties.EditIPAddress.Text := ListViewServers.Selected.SubItems.Strings[0];
  end
end;