一个最简单的 uses问题,请教
sxbug 2013-05-17 04:37:38 我有一个单元:uDAUniDACDriver.pas
中间的一段定义:
{$IFDEF MSWINDOWS}
{$I ..\DataAbstract.inc}
{$ELSE}
{$I ../DataAbstract.inc}
{$ENDIF}
{.$DEFINE UNIDAC_NATIVE_ONLY}
interface
uses DB, Classes, uDAEngine, uROClasses,
uROBinaryHelpers, uDAUtils,
DBAccess, Uni, DASQLMonitor, UniSQLMonitor, MemUtils,
{$IF UniDacVersion > '4.1'}CRTypes,{$IFEND}//这里引用了crtypes单元
uDAInterfaces,
uDAADOInterfaces,
uDAIBInterfaces,
。。。。。
procedure OnSDACTrace(Sender: TObject; Text: _string; Flag: TDATraceFlag);//这里的_string是定义在 crtypes里面了
我在编译 uDAUniDACDriver.pas时,总提示 _string没有定义。
但是出现了很奇怪的现象,我把所有 crtypes.pas 和 crtypes.dcu都删除了,也没有提示 crtypes单元找不到。总提示 _string没有定义。
在crtypes中明明定义了,却总提示。
高手指教一下