팁란에 올려 주신 디비 로그인에 대한 질문입니다.
저는 오라클을 사용하구 있구요. 아래 같은 방법으로 로그인 폼을 작성해서
사용하는데요.. 접속이 완료될때는 상관없지만 접속이 실패될경우 보여지는
다음과 같은 메시지를 showmessage로 처리할수 없을까요?
-------------------------------------------------------------
----Unknown user name or password.                                  --
----ORA-01017 : 사용자명/암호가 부적합,로그온할 수없습니다.  --
----Alias : myDB                                                                --
-------------------------------------------------------------

=====================================================================
TDatabase 컴포넌트를 사용하면 사용자가 서버 데이터에 로그인하는 과정을 직접 제어할수 있슴다. 기본 로그인 대화상자는 사용자 이름과 패스워드만을 묻지만, 특정한 상황에서는 그 이외의 정보를 사용자에게 물을 수도 있슴다. 아니만 단지 대화상자의 모습을 좀더 멋지고 예쁘게 꾸미고 싶을 수도 있슴다. 어쨌든 기본 로그인 대화상자가 마음에 들지 않는다면 로그인 대화상자를 직접 작성해서 사용할수도 있슴다.

우선, TDatabase.LoginPrompt 속성을 True 로 함다. 그담에 TDatabase.OnLogin 이벤트에서 사용자 로그인 대화상자를 띄웁니다. OnLogin 이벤트는 TDatabase.loginPrompt 속성이 True인 상태에서 TDatabase.Connected 속성이 True가 되면 실행됨다.

다음이 사용자 로그인 폼

function OKLogin(AloginParams: TStrings): word;
var
FrmLogin : TFrmlogin;
begin
FrmLogin := TFrmlogin.Create(Application);
try
Result := Frmlogin.ShowModal;
if Result = mrOK then
begin
ALoginParams.Values['USER NAME'] := Frmlogin.edtUserName.Text;
ALoginParams.Values['PASSWORD'] := Frmlogin.edtPassWord.Text;
end;
finally
Frmlogin.Free;
end;
end;

다음에 TDatabase.Onlogin 이벤트에서..