Как создать настройки подключения из проекта DBFunc

This is an old version of this page. You can view the most recent version or browse the history.

Подразумевается, что будет визард для этих настроек, который будет сохранять их в ini файл рядом с exe. Но что делать, если этого визарда ещё нет, а подключиться надо ?

Для этого один раз выполняем такой код (на примере Postgre)

  LPGConnectionSettings := Service<IConnectionSetting>();
  LPGConnectionSettings.Ip := 'localhost';
  LPGConnectionSettings.Port := 5432;
  LPGConnectionSettings.Login := 'login';
  LPGConnectionSettings.Password := '';
  LPGConnectionSettings.Name := 'Postgres5432';

  LSettings := Service<TSettings>();
  LSettings.Add('Postgres5432', LPGConnectionSettings);
  LSettings := nil;

После этого наше подключение должно отработать нормально FConnectionPostgres := Service<IConnection>([], S_FD_PGId);