捐赠 | 广告 | 注册 | 发布 | 上传 | 关于我们    
  粤ICP备10103342号-1 DELPHI盒子 | 盒子文章 | 盒子问答悬赏 | 最新更新 | 盒子检索 | 下载中心 | 高级搜索    
  精品专区 | 繁體中文 | 奖励公告栏 | 直通车账号登陆 | 关闭GOOGLE广告 | 临时留言    
 
广告
评论:C++ 头文件转换为Delphi接口文件的工具
yzsind 20880 2006/1/12 9:31:25
在D7中将所有的{$IFDEF VER140}改为{$IFDEF VER150}
hhqbox 18115 2005/9/26 9:20:23
我怎么不能编译啊?
  {$include  string.h}
总是提示错误
koman 13295 2005/3/17 15:18:08
   楼上的,很简单,我用D7编译出错明明说了出来,无法分配值给左边的标识,明显标识是有定义的,找找看而且是采用预编译选择,多数是在给出的预编译没有写好,常量当变量用,作者愿意是作为变量的吧,不然也不会给它赋值,把其出错的在HeadVars.pas里面的补充或改过来就行了,若有误解请指正。我这里有两处:
{$IFDEF VER140}
var Start: Boolean; //初值默认为false
{$ELSE}
var Start : Boolean= True; //补回个var
{$ENDIF}

{$IFDEF VER140}
var
  LeadingSpace: Boolean; { 3.10 }
  InArray: Boolean;
  Comment: Boolean; {!ACM -- processing a comment }
  CDECL: Boolean; {!ACM -- seems to be a reserved word }
  Emptytype: Word;
  Nested: Integer; {!ACM -- current level of nesting }
{$ELSE}
var  //const改为var
  LeadingSpace: Boolean = TRUE; { 3.10 }
  InArray: Boolean = FALSE;
  Comment: Boolean = FALSE; {!ACM -- processing a comment }
  CDECL: Boolean = FALSE; {!ACM -- seems to be a reserved word }
  Emptytype: Word = 0;
  Nested: Integer = 0; {!ACM -- current level of nesting }
{$ENDIF}
iloveqq 13271 2005/3/16 15:08:14
我怎么不能编译啊?
if Str = _START then Start := True
      else
        if Str = _STOP then Start := False;

总是提示错误
tim001 13225 2005/3/15 10:56:49
thank you!
leaya00 13147 2005/3/12 10:48:24
不错,很有价值呀!你自己写的?还是搜集的?哪来的?
第一页 上一页 下一页 最后页 有 6 条纪录 共1页 1 - 6
 用户名:
 密 码:
自动登陆(30天有效)
 
  DELPHI盒子版权所有 技术支持:深圳市麟瑞科技有限公司 1999-2024 V4.01 粤ICP备10103342号-1 更新RSS列表