같은 에러가 나네요... PAnsiChar로 선언된 매개변수에 PAnsiChar()로 캐스팅해 넘기면 마지막에 널문자가 들어가지 않아서 문제가 될까요? 장비제조사에서 받은 샘플 프로그램에서는 BK_ScanToBMPFile() 프로시져를 콜하면 바로 장비가 작동하는데 저는 BK_ScanToBMPFile()을 호출하면 약 4~5초간 프로그램이 응답없음이 되다가 그후 result :='스캔실패';로 넘어가 실행되고 바로 Access Violation이 발생합니다. 제가 직접 dll을 컨트롤 하는것이 처음이라 너무 힘들어요... 혹 전체 소스와 dll을 올리면 도움주실수 있을까요? 원래 제가 델파이 파트가 아닌데 어쩌다가 델파이를 하게되어 요즘 부족함을 많이 느끼고 있습니다... 도와주세요.


DigitalNomad 님이 쓰신 글 :
: DLL 헤더 선언부와 델파이 소스를 살펴보니 선언부는 문제는 없어 보이는데요..
: 다음과 같이 한번 바꿔서 해보세요.
:
: BKV3_API int  WINAPI BK_ScanToBMPFile(char *upperName, char *bottomName);
:
: //델파이 소스
:

 
:  function  BK_ScanToBMPFile(upperName:PAnsiChar; bottomName:PAnsiChar):integer cdecl; external 'BKV3.dll';
:   
:  procedure TForm1.Button1Click(Sender: TObject);
:   var FrontFilePath, 
:         BackFilePath:AnsiString;
:  begin
:        FrontFilePath := 'aaa.jpg'+#0 ;
:        BackFilePath  := 'bbb.jpg'+#0 ;
:        if BK_ScanToBMPFile(PAnsiChar(FrontFilePath),PAnsiChar(BackFilePath))<>1 then   
:               //정상 실행되지 않아 에러체크루틴으로 들어갑니다.
:        begin
:            result := '스캔실패';     //<<====에러 메세지 출현 지점
:            exit;
:        end;
:  end;
: 
: 

:
:
:
:
: 라미엘 님이 쓰신 글 :
: : 염치불구하고 다시 질문올립니다. 아래 dll관련 파라메터 질문을 올렸는데 다른 부분에서 에러가 나서 답답한 마음에 재질문올립니다. dll개발사에서 보내준 vc6.0샘플 소스에는 dll함수를 external선언할때 char*로 파라메터를 설정했는데 델파이2009로 설정할때 PChar 또는 PAnsiChar로 설정해도 access violation에러가 납니다. 특이한 것은 델파이 자체에서 나는 에러가 아니라 dll내부에서 나는 에러같습니다. 디버깅을 하면 다음 루틴(에러확인 루틴)으로 넘어가는데 그 이후 첨부파일과 같은 메세지가 뜹니다.
: : 고수님들 다시한번만 도와주세요...
: :
: : //VC소스
: :
: : #ifdef __cplusplus
: : extern "C"
: : {
: : #endif
: :  BKV3_API int  WINAPI BK_ScanToBMPFile(char *upperName, char *bottomName);
: : #ifdef __cplusplus
: : }
: : #endif
: :
: :
: : void aaaDLG::OnScan()
: : {
: :     int rc;
: :
: :
: :     rc = BK_ScanToBMPFile((char *)(LPCSTR)m_strUpperName, (char *)(LPCSTR)m_strBottomName);
: :     if (rc != 1) {
: :         EndWaitCursor();
: :         sprintf(szString, "No Paper or Scan Error !, rc = %d", rc);
: :         MessageBox(szString, "BKV3", MB_OK);
: :         return;
: :     }
: : }
: :
: :
: : //델파이 소스
: :
: : function  BK_ScanToBMPFile(upperName:PAnsiChar; bottomName:PAnsiChar):integer cdecl; external 'BKV3.dll';
: :
: :
: : procedure TForm1.Button1Click(Sender: TObject);
: :
: : var FrontFilePath, BackFilePath:String;
: : begin
: :
: :       FrontFilePath := 'aaa.jpg' ;
: :       BackFilePath  := 'bbb.jpg' ;
: :       if BK_ScanToBMPFile(PAnsiChar(AnsiString(FrontFilePath)),PAnsiChar(AnsiString(BackFilePath)))<>1 then    //정상 실행되지 않아 에러체크루틴으로 들어갑니다.
: :       begin
: :           result := '스캔실패';     //<<====에러 메세지 출현 지점
: :           exit;
: :       end;
: : end;
: :