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
[10967] 초간단 질문입니다. 비주얼베이직 포팅
레몬트리 [] 1749 읽음    2006-10-11 18:01
비베로 로 작성된 함수에 보면 As Any  자료형이 있는데 자료를 뒤져 보니 간단히 설명이 나와있긴 한데 먼지 모르겠습니다. 중요한건 비베로 작성된 모듈(dll호출에 관한) 을 델파이 pas 화일로 옮겨야 합니다.

#If ONO8D Then
Declare Function cnc_rdprogdir2 Lib "Fwlib32.dll" Alias "cnc_rdprogdir2o8" (ByVal FlibHndl As Integer, ByVal a As Integer, b As Long, c As Integer, Odb As Any) As Integer
#Else
Declare Function cnc_rdprogdir2 Lib "Fwlib32.dll" (ByVal FlibHndl As Integer, ByVal a As Integer, b As Integer, c As Integer, Odb As Any) As Integer
#End If

델파이로..

{$IFDEF ONO8D}
Function cnc_rdprogdir2 Alias "cnc_rdprogdir2o8" ( FlibHndl : Integer,  a : Integer, b : integer, c : Integer, Odb : Any) : Integer
{$ELSE}
Function cnc_rdprogdir2  ( FlibHndl : Integer,  a : Integer, b : Integer, c : Integer, Odb : Any) : Integer
{$ENDIF}

일케 바꾸어 봤지만 역시나 As Any  형에 걸립니다. 뭘로 대처해야 합니까..
위에 것은 맞게 포팅한겁니까? 역시나 도움을 바랍니다..

-여담입니다만..

왜 dll 을 제공하는 업체에선 비졀C++,VB  용 헤더화일과 모듈밖에 안주는 겁니까..샘플하고..
델파이는 전혀 언급이 없습니다..
델파이용 pas 화일을 주는 업체는 유럽쪽 기업에서는 있는데 일본과 우리나라(당황해 합니다. ㅡ,.ㅡ  델파이 파스 달라하묜..) 미국쪽 은 비졀만 제공하나요?

역시나 개발자 사용자들이 많은 언어에만 제공하는지..제 주위엔 다 델파이 쓰는데..
델파이 하면서 (2년차) 가장 힘들었던건 외부업체와 일할때 입니다. 혼자 죽이 되든 살이되든 할때도 있지만..
역시나 그렇게 하면서 공부가 되는것입니까.. 비졀 씨와 베이직을요..쩝..베이직은 보기만 해도 짜증나는데.. (건성건성1년 개발했음..쩝..)
델파이로만 했음 좋은데 저희회사는 PC  어플리케이션 프로그래머가 저 혼자 이다보니 너무 벅찹니다..

+ -

관련 글 리스트
10967 초간단 질문입니다. 비주얼베이직 포팅 레몬트리 1749 2006/10/11
10968     Re:초간단 질문입니다. 비주얼베이직 포팅 civilian,안영제 2230 2006/10/11
10971         Re:Re: 한번더 봐주시겠습니까? 조금 깁니다. ^^* 레몬트리 1817 2006/10/12
10972             Re:Re:Re: 한번더 봐주시겠습니까? 조금 깁니다. ^^* civilian,안영제 1744 2006/10/12
10973                 Re:Re:Re:Re: 무슨 말인지 알겠습니다. 한번 해보겠습니다. 감사합니다. ^^* 행복하세요~ (nil) 레몬트리 2017 2006/10/12
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.