저두 잘 모르지만.. ^^
server.ini 데신 Server.udl 화일을 하나 만드세요 그리구 화일을 더블클릭하면 Data Link Properties 란 창이 나옵니다. 거시서 Provider Tab 에서 "Microsoft OLE DB Provider fo SQL Server" 을 선택하시고 Connection Tab에서 SQL Server, User, Password 입력하시고 Allow saving password를 체크해주세요 그리구 Select the database on the server 에서 사용할 DB를 선택한 다음 Test Connection 버튼을 클릭해서 연결이 정상적으로 되는지 확인 하신 다음  확인을 클릭해서 창을 닫아주세요.

그리고 프로그램에서는
ADOConnection1.ConnectionString := 'FILE NAME='+GetCurrentDir+'Server.udl';
이렇게 써주시면 됩니다.
Database 정보가 변경될 경우  Server.udl을 더블클릭해서 변경해주시면 되겠죠..

udl  화일은 텍스트 문서를 만들어서 그냥 확장자만 udl 로 변경해주시면 됩니다.

고니님 답변 감사합니다..
아주 좋은 팁이네여 ^^

근데 문제가 있습니다....
최초에 Server.udl 파일이 없을 시에는 DB Connect Error가 뜨죠..
그래서 연결하기 전에 파일 있는지 여부를 체크하여 파일을 생성하고
그 파일을 실행하는 프로그램을 했는데..
쉽게 안됩니다......
혹시 방법을 아시는지.... 소스 첨부합니다..


---------------------------------------------------------------------
  if not (FileExists(GetCurrentDir+'Server.udl')) then
  begin
    ShowMessage('file not found');
    AssignFile(F, 'server.udl');
    ReWrite(F);
    WinExec('server.udl',SW_SHOWNORMAL);
  end ;

  with EMS_Connection do
  begin
    ConnectionString := 'FILE NAME='+GetCurrentDir+'Server.udl';
    ConnectionTimeout := 15;
    KeepConnection := True;
    LoginPrompt := False;
    Mode := cmShareDenyNone;
    Provider := 'SQLOLEDB.1';

    try
      Connected := True;
    except
      on E: Exception do
      begin
        Application.MessageBox(' DB connection error. ','DB',MB_ICONERROR);
      end;
    end;  // try
  end;  // with
---------------------------------------------------------------------