안녕하세요?

각 쓰레드에서 세션과 데이터베이스를 다음과 같이 생성해주는데
항상 로그인패스워드를 묻는군요.
급한데.. 방법이 없는지요?

procedure InitDB(var ss:TSession; var db:TDatabase);
begin
  str := IntToStr(thread.ThreadID);
  ss.SessionName := 's'+IntToStr(thread.ThreadID);  //Thread마다 다른 Session 이름부여.

  db.LoginPrompt:=false;
  db.params.add('USERNAME=<'+db_user+'>');
  db.Params.Add('PASSWORD=<'+ db_pass + '>');
  db.SessionName:=ss.SessionName;

end;