다시 질문이 있어서요..
a:= 'been';
b:= 'been';
try
shopdb.AliasName:= 'testbeen';
shopdb.DatabaseName:= 'cloth_master';
shopdb.Params.Add('USER NAME='+a);
shopdb.Params.Add('PASSWORD='+b);
shopdb.LoginPrompt:= False;
shopdb.Connected:= True;
except
//바로 여기에서 에러가 디비 접속 에러인지
//아님 테이블 에러인지를 구별해서
//각각에 맞도록 처리를 해줄려구요...
그러니까 에러 코드가 무엇인지를 변수에 담을 수 있으면 좋겠거든요
end;
..
..
..
except
on e:exception do
begin
// 방법1: 이것은 에러메시지가 영문으로만 출력되죠~~
ShowMessage(e.Message);
// 방법2: 시스템에 정의된 에러라면 한글로 에러메시지가 출력되져..
ShowMessage(SysErrorMessage(GetLastError()));
end;
end;
참고로 지금 오류처리를 오로지 DB의 오류만 처리를 하고자 하시는것 같은데..
이를 경우에는
try
..
..
..
except
on e:EDatabaseError do
begin
ShowMessage(e.Message);
end;
end;
..