Delphi Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
델파이 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
FreePascal/Lazarus
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
델마당
볼랜드포럼 광고 모집

델파이 Q&A
Delphi Programming Q&A
[15460] Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다.
오랑캐꽃 [oranke] 2743 읽음    2015-04-09 00:02
흠냐리... 호출규약을 맞춰주는건 둘째치고...
작성하신 코드는  캐릭터형 포인터 Str1과 Str2 번지가 가리키는 위치의 바이트값 두 개를
0~255 사이의 숫자값으로 간주해 더한 다음 Result 라는 캐릭터형 포인터에 담아 리턴하라는...
음... 저거 뭐라 뭐라 경고라도 뜰텐데 말이죠...
왜 저런 괴랄한 코드를...

C에는 더하기 연산자로 문자열 변수를 연결한 뒤 새로 메모리를 할당해주는 기능같은건 없습니다.
먼저 다음 강좌를 읽어보시구요...
http://soen.kr/lecture/ccpp/cpp1/12-1-2.htm
저런 함수를 만드실 때는... 넘겨줄 문자열 메모리는 누가 할당하고 어디서 해지할지 고민도 해주셔야 하는데...
며칠 전에 답글달았던 libcurl 의 curl_escape(), curl_unescape() 라는 유틸리티 함수를 예로 들어보죠. 
이 함수들은 "(" 를 "%28" (맞나..?)  같은 문자열로 변환/역변환해 리턴하는 역할을 하는데
여기서 리턴된 문자열에 할당된 메모리를 해제하기 위해 curl_free() 함수를 함께 제공하고 있습니다.
받아 쓰는 쪽에서 쉼게 가져가라고 메모리를 잡아 넘기긴 하지만... 어떻게 잡은 메모리인지는 curl만이 알고 있으니
해제하는 기능도 curl이 제공하고 있는 거지요.
이 말의 의미가 와 닿지 않으신다면... 일단 C를 빠르게 복습을 하셔야... ㅠㅠ;

굳이 C를 고집해야 할 상황이 아니면... 그냥 C++ 에서 std::string 쓰시는 것 추천.

두번째 질문은... char ** 를 인자로 받도록 만들어 주시거나 -->> void test(char ** a) ...
C++에서 레퍼런스를 인자로 받도록 해주시면 되는데... -->> void test (char *& a)...

델파이에서 사용할 표준 DLL에 구겨넣으시려면 char ** 로 하셔야 합니다. 
코딩 편의상 레퍼런스를 쓰시더라도 어차피 dll_export 하실때는 char **로 해주셔야 하구요.

덤으로 C++에서 레퍼런스 사용은 다음 강좌를 참고하시구요.
http://soen.kr/lecture/ccpp/cpp2/15-4-2.htm



첫눈 님이 쓰신 글 :
: VC++에서 DLL을 만들었습니다.
: 그리고 그것을 델파이에서 DLL안에 있는 함수를 불러들이는건데요.
:
: 그냥 단순한 함수입니다.
:
: 인수로 전달받은 두개의 문자열을 합쳐서 리턴해주는건데요.
: 문자열 처리를 어떻게 해야 할지 모르겠습니다.
:
:
: char *UserFunc(char *Str1, char *Str2)
: {
:         char *Resule = *Str1 + *Str2;
: 	return Result;
: }
: 
: 

:
: 이렇게 하고 델파이에서는
:
: procedure TForm1.Button2Click(Sender: TObject);
: type
:   TFunc = function(Str1, Str2 : PAnsiChar):PAnsiChar;
: Var
:   hDll: THandle;
:   Parsing : TFunc;
:   Str1, Str2 : PAnsiChar;
:   Result : PAnsiChar;
: begin
:   hDll := LoadLibrary('Test.dll');
:    if HDll < 32 then Exit;
: 
:    Parsing := GetProcAddress(hDll, 'UserFunc');
:    Str1 := 'aaaa';
:    Str2 := 'bbbb';
:    Result := Parsing(Dic);
: end;
: 
: 

:
: 이렇게 하면 원하는 결과가 안나오고 이상한 문자가 나옵니다.
:
:
:
:
:
: 그리고 두번째 질문은
:
: TFunc = function(Str1, Str2 : PAnsiChar):PAnsiChar;
: 

: 이렇게 하지 않고
:
: TFunc = function(var Str1 : PAnsiChar; var Str2 : PAnsiChar):PAnsiChar;
: 

: 이렇게 하여
:
: 전달된 인수의 값이 바뀌면 DLL함수 안에서 바뀌면 그 값을 그대로 다시 돌려 받고 싶은데
: 이건 어떻게 처리해야 할지 모르겠습니다.

+ -

관련 글 리스트
15458 VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 첫눈 1744 2015/04/08
15461     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 정영훈 1898 2015/04/09
15462         Re:Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 오랑캐꽃 1993 2015/04/09
15460     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 오랑캐꽃 2743 2015/04/09
15459     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 정영훈 1850 2015/04/09
15464         Re:Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 첫눈 2036 2015/04/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.