먼저, 메인폼이 있고, 데이터 모듈을 포함하고, 데이터 모듈에서
이렇게 Create Event에 이렇게 작성하고요,
type
TformDatamodule = class(TDataModule)
DB : TDataBase;
end;
procedure TformDatamodule.DataModuleCreate(Sender: TObject);
begin
with DB do
begin
KeepConnection := False;
LoginPrompt := False;
Connected := False;
Params[0] := 'USER NAME';
Params[16] := 'PASSWORD';
KeepConnection := True;
try
Open;
except
ShowMessage('연결이 안되었습니다.')
end;
end;
end;
그리고, project파일에서 이렇게 실행하였습니다.
begin
Application.Initialize;
Application.CreateForm(TformDatamodule, formDatamodule);
Application.CreateForm(TformMain, formMain);
//여기서 데이터 모듈과, 메인폼의 실행위치를 바꾸어도 같은 에러가 나더군요.
Application.Run;
end;
이러면, 'Your Application is not enabled for use with this driver'이라는 에러 메시지가 뜨네요..
DB 는 DB2고요, Database Editor에서 Alias 콤보박스말고, DriverName 콤보박스에서 DB2를 선택하고 default setting를 선택하고요.
흠, 무슨 문젠가요...