I have to use VC function in Delphi.

Article View: comp.lang.pascal.borland

Article #803

Back to comp.lang.pascal.borland Previous Next

#803

From: iceGEO
Date: Wed, 31 Jul 2002 11:08

41 lines
2014 bytes

hi..

I am novice in both Delphi and Visual C++.

but I have to use VC function in Delphi.
(I use Delphi 6 edition.)

how can I use this function (written in VC , GEO3D.dll)


 XIS_EXPORT BOOL X3DGTF_SetPlaneTableInfo( HGTFWND _GTFWnd, char*
_strTableName )

  XIS_EXPORT BOOL    X3DGTF_Invalidate( HGTFWND hGTFWnd )

 XIS_EXPORT void X3DGTF_SetPlane( HGTFWND _hGTFWnd, BOOL _bflag, BOOL
_bUpdate )

        XIS_EXPORT BOOL    X3DGTF_Invalidate( HGTFWND hGTFWnd )

I tried to use like this

//in declare unit
 function X3DGTF_SetPlaneTableInfo( hGTFWnd:HGTFWND ; strTableName:Pchar ):
BOOL; cdecl; external GEO3D;

// in main unit
 BoolsetPlane:=X3DGTF_SetPlaneTableInfo( hGTFWnd ,pchar('Plane'));  // 486
Line

but it cannot work..

error message like below.
//[Error] Main.pas(486): '(' expected but ',' found

how can I do..


Sorry for my poor English....

JJ

Technical Details

Message-ID: <KyP19.827$Bq.716@news.hananet.net>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!logbridge.uoregon.edu!newsfeed.dacom.co.kr!newsfeed.hananet.net!news.hananet.net!not-for-mail

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: fd817,d66e6530ce95245,start
X-Google-Attributes: gidfd817,public
X-Google-Thread: 115f97,d66e6530ce95245,start
X-Google-Attributes: gid115f97,public
X-Google-Thread: 111659,d66e6530ce95245,start
X-Google-Attributes: gid111659,public
X-Google-ArrivalTime: 2002-07-31 04:08:27 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!logbridge.uoregon.edu!newsfeed.dacom.co.kr!newsfeed.hananet.net!news.hananet.net!not-for-mail
From: "iceGEO" <icetiger@hananet.net>
Newsgroups: comp.lang.pascal.borland,alt.comp.lang.borland-delphi,han.comp.devtools.delphi
Subject: I have to use VC function in Delphi.
Lines: 48
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
Message-ID: <KyP19.827$Bq.716@news.hananet.net>
Date: Wed, 31 Jul 2002 20:08:22 +0900
NNTP-Posting-Host: 218.55.123.125
X-Trace: news.hananet.net 1028113706 218.55.123.125 (Wed, 31 Jul 2002 20:08:26 KST)
NNTP-Posting-Date: Wed, 31 Jul 2002 20:08:26 KST