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
[15458] VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다.
첫눈 [hadugo] 1747 읽음    2015-04-08 18:09
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을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 첫눈 1747 2015/04/08
15461     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 정영훈 1901 2015/04/09
15462         Re:Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 오랑캐꽃 1995 2015/04/09
15460     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 오랑캐꽃 2747 2015/04/09
15459     Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 정영훈 1854 2015/04/09
15464         Re:Re:VC++에서 만든 DLL을 델파이에서 불러올때 데이터형을 어떻게 해야 할지 모르겠습니다. 첫눈 2039 2015/04/09
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.