DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: steven7890
今日帖子: 7
在线用户: 9
导航: 论坛 -> DELPHI技术 斑竹:liumazi,sephil  
作者:
男 yuanlai (lai) ▲△△△△ -
注册会员
2021/2/8 17:00:02
标题:
求教 XE10.2 private 、 public 變數值問題 浏览:286
加入我的收藏
楼主: 小弟 在 .h 檔中定義一個變數 
private:
  UnicodeString xpA = "1";

Form 的 formStyle = fsMDIChild
在 .cpp 檔中
FormCreate(TObject *Sender)
{xpA = "2";


BitBtn2Click(TObject *Sender)
{ShowMessage(xpA); //顯示值為 1,並不是 2,不知為何?
}
 
BCB 6 不會有如此問題
----------------------------------------------
-
作者:
男 dbyoung (dbyoung) ★☆☆☆☆ -
普通会员
2021/2/8 17:20:23
1楼: 修改常量:{J+}
----------------------------------------------
Delphi7爱好者
作者:
男 yuanlai (lai) ▲△△△△ -
注册会员
2021/2/9 10:38:17
2楼: 感謝 dbyoung 先進 回覆
小弟 找了一天,不知從何修改常量 {J+}
----------------------------------------------
-
作者:
男 nevergrief (孤独骑士) ★☆☆☆☆ -
盒子活跃会员
2021/2/9 22:13:31
3楼: 就是临时开启编译器标志,允许修改
FormCreate(TObject *Sender)
{
{J+}
xpA = "2";
{J-}
}
----------------------------------------------
只有偏执狂才能生存!
作者:
男 yuanlai (lai) ▲△△△△ -
注册会员
2021/2/18 11:01:17
4楼: 感謝先進回復
FormCreate(TObject *Sender)
{
{J+}
xpA = "2";
{J-}
}
//--- 編譯時,出現下列錯誤,使用未宣告 J,請問如何解決
[bcc64 Error] Lordship_U.cpp(53): use of undeclared identifier 'J'
----------------------------------------------
-
作者:
男 keymark (keymark) ▲▲△△△ -
注册会员
2021/2/18 11:20:07
5楼: $
----------------------------------------------
播客
作者:
男 wenyue0811 (wenyue0811) ★☆☆☆☆ -
普通会员
2021/2/18 12:43:51
6楼: 应是写成...好像如下吧?

FormCreate(TObject *Sender)
{
{$J+}
xpA = "2";
{$J-}
}
----------------------------------------------


美国国务卿蓬佩奥回答大学生提问时说,“我曾担任美国中央情报局(CIA)的局长。我们撒谎、我们欺骗、我们偷窃。我们还有一门课程专门来教这些。这才是美国不断探索进取的荣耀
作者:
男 yuanlai (lai) ▲△△△△ -
注册会员
2021/2/18 15:48:50
7楼: //依然出現下列錯誤
FormCreate(TObject *Sender)
{
{$J+}
xpA = "2";
{$J-}
//--- 編譯時,依然出現下列錯誤,使用未宣告 $J
[bcc64 Error] Lordship_U.cpp(53): use of undeclared identifier '$J'
----------------------------------------------
-
作者:
男 keymark (keymark) ▲▲△△△ -
注册会员
2021/2/19 9:31:27
8楼: procedure TForm1.Button1Click(Sender: TObject);
{$J+}
const
 I: Integer = 1;
{$J-}
begin
  Inc(I);
  ShowMessage(IntToStr(I));
end;
这是delphi得,至于bc能不能用?  你也得告诉编译器 变量类型扒?
----------------------------------------------
播客
作者:
男 iamdream (银河恒久远,梦想无止境!) ★☆☆☆☆ -
大贡献会员
2021/2/19 10:38:54
9楼: 既然要修改,就不要定义成常量。虽然编译器可能允许你通过某些开头修改常量,但不推荐这样做。
----------------------------------------------
-广袤璀璨的银河,永无止境的梦想(梦无止境游银河) 博客挂了……
作者:
男 sspeak (sspeak) ★☆☆☆☆ -
盒子活跃会员
2021/2/19 13:43:15
10楼: 如果没有绝对必要不要用private,得不偿失.可以用protected.
教科书上的不一定正确.
----------------------------------------------
-
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v2.1 版权所有 页面执行42.96875毫秒 RSS