12 / 2 页下一页

查看: 13007|回复: 18

我的bcb怎么在函数外声明的变量，在函数内无法存储

[复制链接]

字体大小: 正常放大

小菜菜同学

22 主题	2 听众	72 积分

升级 70.53%

该用户从未签到

电梯直达

1^#

发表于 2005-4-29 10:23 |只看该作者 |倒序浏览

|招呼Ta 关注Ta

<

>我的bcb6怎么在函数外声明的变量，在函数内无法存储。也就是在一个函数中存后，无法在另一个函数中提取。若提取，则和没存一样等于零。
<

>是我的BCB的设置问题吗？
<

>如下中的ox,oy
<

>int ox,oy;
int x,y;
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
 TMouseButton Button, TShiftState Shift, int X, int Y)
{ox=Image1->Left;
oy=Image1->Top;
x=X;
y=Y;
}
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
 int X, int Y)
{
Image1->Left+=X-x;
Image1->Top+=Y-y;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
 TShiftState Shift, int X, int Y)
{
if(Image1->Left>Shape1->Left-20 &&
Image1->Left<Shape1->Left+Shape1->Width+
20&&Image1->Top>Shape1->Top-20&&
Image1->Top<Shape1->Top+20+Shape1->Top){
Image1->Top=Shape1->Top;
Shape1->Visible=false;
Image1->Left=Shape1->Left;
}else{
Image1->Left=ox;
Image1->Top=oy;
}
}
<

>最后ox、oy竟然都等于0。在mousedown中怎么没存上呢？

zan

转播0 淘帖0 分享0 收藏0 支持0 反对0 微信

使用道具举报

ilikenba

1万主题	49 听众	2万积分

TA的每日心情

	奋斗 2024-6-23 05:14

签到天数: 1043 天

[LV.10]以坛为家III

群组: 万里江山

群组: sas讨论小组

群组: 长盛证券理财有限公司

群组: C 语言讨论组

群组: Matlab讨论组

2^#

发表于 2005-4-29 10:44 |只看该作者 |招呼Ta 关注Ta

<

>道理上应该是全局变量，不会存不上的！是不是本身Image1->Left和Image1->Top的值就是0

我也说一句

发表

使用道具举报

小菜菜同学

22 主题	2 听众	72 积分

升级 70.53%

该用户从未签到

3^#

发表于 2005-4-29 10:59 |只看该作者 |招呼Ta 关注Ta

<

>谢谢ilikenba的回答，<

>不过Image1->Left和Image1->Top的值不是0，是不是我的BCB设置的问题？[em06]

我也说一句

发表

使用道具举报

ilikenba

1万主题	49 听众	2万积分

TA的每日心情

	奋斗 2024-6-23 05:14

签到天数: 1043 天

[LV.10]以坛为家III

群组: 万里江山

群组: sas讨论小组

群组: 长盛证券理财有限公司

群组: C 语言讨论组

群组: Matlab讨论组

4^#

发表于 2005-4-29 11:43 |只看该作者 |招呼Ta 关注Ta

我这里测试没有问题，应该是你的设置的问题！我这里都是默认的设置没有问题！

我也说一句

发表

使用道具举报

小菜菜同学

22 主题	2 听众	72 积分

升级 70.53%

该用户从未签到

5^#

发表于 2005-4-29 11:58 |只看该作者 |招呼Ta 关注Ta

怎么能恢复成默认设置呢？[em02]

我也说一句

发表

使用道具举报

ilikenba

1万主题	49 听众	2万积分

TA的每日心情

	奋斗 2024-6-23 05:14

签到天数: 1043 天

[LV.10]以坛为家III

群组: 万里江山

群组: sas讨论小组

群组: 长盛证券理财有限公司

群组: C 语言讨论组

群组: Matlab讨论组

6^#

发表于 2005-4-29 12:04 |只看该作者 |招呼Ta 关注Ta

<

>project->option左下角有一个default的复选框！选中后点击确定！

我也说一句

发表

使用道具举报

小菜菜同学

22 主题	2 听众	72 积分

升级 70.53%

该用户从未签到

7^#

发表于 2005-4-29 12:17 |只看该作者 |招呼Ta 关注Ta

<

>我恢复默认了，但还不行，我的全文是这样的，麻烦大侠再看一下：[em04][em04]<

>int ox,oy;
int x,y;
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
 TMouseButton Button, TShiftState Shift, int X, int Y)
{
if(Button=mbLeft){
ox=Image1->Left;
oy=Image1->Top;
x=X;
y=Y;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
 int X, int Y)
{
if(Shift.Contains(ssLeft)){
Image1->Left+=X-x;
Image1->Top+=Y-y;
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
 TShiftState Shift, int X, int Y)
{
if(Image1->Left>Shape1->Left-20 &&
Image1->Left<Shape1->Left+Shape1->Width+
20&&Image1->Top>Shape1->Top-20&&
Image1->Top<Shape1->Top+20+Shape1->Top){
Image1->Top=Shape1->Top;
Shape1->Visible=false;
Image1->Left=Shape1->Left;
}else{
Image1->Left=ox;
Image1->Top=oy;
}
}