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

小菜菜同学

<>我的bcb6怎么在函数外声明的变量，在函数内无法存储。也就是在一个函数中存后，无法在另一个函数中提取。若提取，则和没存一样等于零。</P>
" u: T! Q+ T7 H! n6 ?" y2 p; [- P. F<>是我的BCB的设置问题吗？</P>
<>如下中的ox,oy</P>
<>int ox,oy;
int x,y;
//---------------------------------------------------------------------------
7 o$ o/ Y( u' Z; K4 o  e) @4 N6 U/ hvoid __fastcall TForm1::Image1MouseDown(TObject *Sender,
6 z% Y3 _0 w; S  C. X0 X      TMouseButton Button, TShiftState Shift, int X, int Y)
2 R# K' E0 f8 `, a3 u6 y{ox=Image1-&gt;Left;
6 F6 V6 z5 S+ g) g, q" Moy=Image1-&gt;Top;
6 B% y' C+ H, n7 K$ wx=X;
y=Y;
}
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{
Image1-&gt;Left+=X-x;
Image1-&gt;Top+=Y-y;
7 v7 D* I: c, K  @3 ~. s}
0 w; u; ^8 h! O: X//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
3 s9 d( f. {3 |/ m6 l7 m6 y      TShiftState Shift, int X, int Y)
6 R/ s( n$ W& j' S* A  u3 Y+ J3 b! n{
if(Image1-&gt;Left&gt;Shape1-&gt;Left-20 &amp;&amp;
Image1-&gt;Left&lt;Shape1-&gt;Left+Shape1-&gt;Width+
8 g; d% h% T' Y$ s( V20&amp;&amp;Image1-&gt;Top&gt;Shape1-&gt;Top-20&amp;&amp;
1 c3 W. [+ n# A% R9 P4 X$ O0 q Image1-&gt;Top&lt;Shape1-&gt;Top+20+Shape1-&gt;Top){
Image1-&gt;Top=Shape1-&gt;Top;
Shape1-&gt;Visible=false;
1 s7 ^9 t& Y5 E; W" l: qImage1-&gt;Left=Shape1-&gt;Left;
}else{
Image1-&gt;Left=ox;
Image1-&gt;Top=oy;
}
}</P>
<>最后ox、oy竟然都等于0。在mousedown中怎么没存上呢？</P>

ilikenba

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

小菜菜同学

<>谢谢<b><FONT color=#000066>ilikenba的回答</FONT></b>，</P><>不过Image1-&gt;Left和Image1-&gt;Top的值不是0，是不是我的BCB设置的问题？</P>[em06]

ilikenba

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

小菜菜同学

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

ilikenba

<>project-&gt;option左下角有一个default的复选框！选中后点击确定！</P>

小菜菜同学

<>我恢复默认了，但还不行，我的全文是这样的，麻烦大侠再看一下：[em04][em04]</P><>int ox,oy;
int x,y;
' T4 o+ m9 |+ k- [7 W6 S! Svoid __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
) ~* ~8 v0 g0 }' K$ k% F' F# d% I{
4 p4 D; h( R) \if(Button=mbLeft){
2 b5 _" {7 h+ P1 [ ox=Image1-&gt;Left;
oy=Image1-&gt;Top;
3 [% }, ~$ X" j) N, y) K! nx=X;
& z) A8 e3 r) M1 Ky=Y;
$ w* X/ p6 |: j: |( [* w! ], @}
0 X1 W* @; O6 l& q4 e9 N) d( Y% W}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
9 _# N+ K; Y( @2 _- t' [  T{
+ f" ^& R: ~$ L$ y" Y8 Xif(Shift.Contains(ssLeft)){
0 V! _- p0 n/ A0 K* N6 CImage1-&gt;Left+=X-x;
Image1-&gt;Top+=Y-y;
}
}
//---------------------------------------------------------------------------
$ \4 l, W1 y4 wvoid __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
  D; G. ^; S9 C* a& A9 s2 m7 x      TShiftState Shift, int X, int Y)
) k: k- I3 K+ M{
1 X5 |1 b# z+ M3 o. iif(Image1-&gt;Left&gt;Shape1-&gt;Left-20 &amp;&amp;
Image1-&gt;Left&lt;Shape1-&gt;Left+Shape1-&gt;Width+
20&amp;&amp;Image1-&gt;Top&gt;Shape1-&gt;Top-20&amp;&amp;
Image1-&gt;Top&lt;Shape1-&gt;Top+20+Shape1-&gt;Top){
Image1-&gt;Top=Shape1-&gt;Top;
! S+ r7 |- M  O8 o, ~' ?Shape1-&gt;Visible=false;
* w% Y( G" A9 wImage1-&gt;Left=Shape1-&gt;Left;
}else{
+ l$ E, l8 U# ~8 w+ ~' D; X3 p# qImage1-&gt;Left=ox;
& g# ^" ?1 [% I/ L. @Image1-&gt;Top=oy;
2 S4 E5 w" n' }5 u, }5 w" L}
6 b+ K- ]. n5 n8 [}</P>

小菜菜同学

<>而且我要是定义 extern int ox,oy;</P><>[Linker Error] Unresolved external '_ox' referenced from D:\PROGRAM FILES\BORLAND\CBUILDER6\BIN\UNIT1.OBJ</P><>会有这样的错误信息</P>

ilikenba

<DIV class=quote><B>以下是引用<I>小菜菜同学</I>在2005-4-29 12:27:12的发言：</B>

' r. ~1 Z* b) `: l( z<>而且我要是定义 extern int ox,oy;</P>
<>[Linker Error] Unresolved external '_ox' referenced from D:\PROGRAM FILES\BORLAND\CBUILDER6\BIN\UNIT1.OBJ</P>
  a+ T4 L0 a3 c9 f  t! K- ]0 ~; t" _<>会有这样的错误信息</P></DIV>
<>当然了，这是声明ox是外部变量，而不是定义！</P>

小菜菜同学

那还有什么方法使它变成全局变量吗？