QQ登录

只需要一步,快速开始

 注册地址  找回密码
查看: 12681|回复: 18
打印 上一主题 下一主题

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

[复制链接]
字体大小: 正常 放大

22

主题

2

听众

72

积分

升级  70.53%

该用户从未签到

新人进步奖

跳转到指定楼层
1#
发表于 2005-4-29 10:23 |只看该作者 |正序浏览
|招呼Ta 关注Ta
<>我的bcb6怎么在函数外声明的变量,在函数内无法存储。也就是在一个函数中存后,无法在另一个函数中提取。若提取,则和没存一样等于零。</P>
; K: a  N( d6 S/ K<>是我的BCB的设置问题吗?</P>
$ F/ a, @: _' i7 K<>如下中的ox,oy</P>
& h2 [+ t- w& f" \9 R" {- E. Q<>int ox,oy;7 U. x+ h* r# P3 x7 z
int x,y;# {$ k9 o0 R0 I. k
//---------------------------------------------------------------------------, D, ~9 n! a+ @% p
void __fastcall TForm1::Image1MouseDown(TObject *Sender,9 v& F8 ]5 K* Q# f' R
      TMouseButton Button, TShiftState Shift, int X, int Y)% y- l5 Z1 T5 x, D
{ox=Image1-&gt;Left;
( x6 y0 P" a( i, ~3 ?oy=Image1-&gt;Top;
8 B5 x  f8 X/ r8 J* |9 l+ Ex=X;
: u$ H' D! i: y, G/ K& t0 Py=Y;
' d4 C. @; X+ d& M& K9 x8 d}. J. I2 L9 L+ g) l" D5 m
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
3 W/ a4 O4 P$ I3 m! f  f6 i) J      int X, int Y)# D4 k) E. D( Q" \: Y- w
{3 [* I8 }+ Y" D% X7 X' B; p% k+ d
Image1-&gt;Left+=X-x;; g- }4 ~9 g( |; B6 K" b. I( F! B1 b
Image1-&gt;Top+=Y-y;3 d1 L+ x4 Y+ Q+ C
}/ y! f; k+ G9 d' |$ e
//---------------------------------------------------------------------------
; l$ V8 G7 q, C5 {void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,2 X( p  D% \3 p- t& N& Y8 u
      TShiftState Shift, int X, int Y)
  B. D. N/ m8 H- D; u{
* N4 R3 z9 W0 c5 Z  y& Y! ~if(Image1-&gt;Left&gt;Shape1-&gt;Left-20 &amp;&amp;9 L! ]$ O% ]8 q- @
Image1-&gt;Left&lt;Shape1-&gt;Left+Shape1-&gt;Width+0 D' U6 _& P* i& e9 h7 \; V" E6 V
20&amp;&amp;Image1-&gt;Top&gt;Shape1-&gt;Top-20&amp;&amp;
2 d$ z; q: b" T. e' l, U- f! @ Image1-&gt;Top&lt;Shape1-&gt;Top+20+Shape1-&gt;Top){! @  M# a- E9 j% D6 N
Image1-&gt;Top=Shape1-&gt;Top;- E( I: n. B: [# Y5 v* Q- A6 p
Shape1-&gt;Visible=false;' L- V1 V: c2 `/ X, L1 b* r2 I1 L  J
Image1-&gt;Left=Shape1-&gt;Left;  |& O' K* k$ r1 b$ n0 L5 O5 O
}else{
6 ^5 M% H8 u' W8 a# s. v2 j2 uImage1-&gt;Left=ox;% p, w2 b9 l- |- d" {& T7 f
Image1-&gt;Top=oy;* g9 B7 k& u5 D$ Y- K
}0 V0 D, C) i" y2 ^2 U
}</P>- {+ v! P! ?3 S7 z, P5 ?# f
<>最后ox、oy竟然都等于0。在mousedown中怎么没存上呢?</P>
zan
转播转播0 分享淘帖0 分享分享0 收藏收藏0 支持支持0 反对反对0 微信微信

22

主题

2

听众

72

积分

升级  70.53%

该用户从未签到

新人进步奖

<>不过,几乎废了3、4个小时,还算有点收获。写出来大家是新手的共勉。就是知道:</P><>1、怎么一步一步找错误了</P><>2、知道了怎么恢复默认设置——谢谢</P><><TABLE cellSpacing=0 cellPadding=4 width="100%"><TR><TD glow(color=#9898BA,strength=2)" vAlign=center width=*><FONT color=#000066><B>ilikenba</B></FONT> </TD><TD vAlign=center width=25></TD><TD vAlign=center width=16></TD></TR></TABLE></P><>- w; U6 q8 [; P7 }# }! M6 I
少校 的指导</P><>3、熟悉了全局变量的用法</P><>4、让我花1个小时想想4是什么,还有5....  (3、4个小时可不能白费呀......4是什么呢?伤脑筋呀)
9 U9 _& i$ X1 I. r3 b/ A/ e4 t, Y ) @7 h: p% A; c( U) l1 X
</P>
回复

使用道具 举报

ilikenba 实名认证       

1万

主题

49

听众

2万

积分

  • TA的每日心情
    奋斗
    2024-6-23 05:14
  • 签到天数: 1043 天

    [LV.10]以坛为家III

    社区QQ达人 新人进步奖 优秀斑竹奖 发帖功臣

    群组万里江山

    群组sas讨论小组

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

    群组C 语言讨论组

    群组Matlab讨论组

    <>晕!判断是否相等要用两个等号!</P><>呵呵!我回答的晚了!BCB的编译器的错误检查不严,你可以通过设置加强!</P>
    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    <>对,去掉mousedown中的if(Button=mbLeft){}就实现了拖动图片到图形中的功能了。</P><>总算喘口气。但if(Button=mbLeft){}没什么毛病呀?</P><>刚写到这,一看书,我恨不得打我自己一巴掌!</P><>应该是if(Button==mbLeft){}。</P><>[em06][em06]</P><>这种错误BCB6怎么不拦住我呀!?</P><>让各位见笑了</P>[em04][em04]
    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    <>重大发现:以下不是0。而加上if(Button=mbLeft){就为零了。病根找到了,但怎么回事呢?</P><>int ox,oy;
    " g. ^7 u& H. H/ q5 ^$ o( D7 |void __fastcall TForm1::Image1MouseDown(TObject *Sender,
    / Y& b1 `. r( j( t      TMouseButton Button, TShiftState Shift, int X, int Y)
    0 w/ U) B8 c1 I- B# t{
    ! Y) Q9 H: h1 R4 X6 i4 A- Z) eox=Image1-&gt;Left;9 L) D: S0 n! n- Q
    oy=Image1-&gt;Top;
    ( b1 k9 W4 p% k" H0 D/ h}
    9 [" V( M& O* D% i$ F, H//---------------------------------------------------------------------------$ f: A2 p8 e# u1 L7 F
    void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
    & B' P. ?' d2 Q      TShiftState Shift, int X, int Y)
    ; h! B: Q0 T! I2 Y- Z+ X' L{
    ) Y2 t$ x- J& D& |/ s1 d7 WShowMessage("ox="+IntToStr(ox) +"oy="+IntToStr(oy) );5 r7 I9 L7 n; R+ C* _$ \# L( m
    }</P>
    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    <>简化成这样:还是都等于零,我要吐了[em06]</P><>int ox,oy;
    ' j) w" r3 M) _1 vint x,y;
    3 E$ s* F( _0 V& n' vvoid __fastcall TForm1::Image1MouseDown(TObject *Sender,( @9 d( h+ M7 i4 O" o$ e
          TMouseButton Button, TShiftState Shift, int X, int Y)
    0 y" ~) P- ~0 b6 s$ h% n9 U) b" R{5 g' H' [& g! A+ z
    if(Button=mbLeft){
    ( Z/ w0 h9 Z8 K0 A3 `) _: `5 gox=Image1-&gt;Left;
    % J% L7 p  _$ H/ p! Voy=Image1-&gt;Top;
    $ `2 Z/ }! I( _' j6 C$ F9 m' W8 xx=X;( [1 c: H( S5 g) Z( W
    y=Y;+ T7 V  o- o3 g
    }/ ]4 R4 U4 F8 H" k, L2 Y; ^) i
    }
    8 r7 F: ?. I9 ^//---------------------------------------------------------------------------/ O6 D* A9 }8 ?: Y+ h- |. Y
    void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
    " I: G4 z6 ]* g  N8 A: f$ |      TShiftState Shift, int X, int Y)
    6 A) W6 U2 i9 o{5 Q% J% F( I! s( b, u- N# H
    int x1,y1;</P><>x1=ox;
    $ Z, e6 B, P: y7 m' s1 Y1 S# q. @y1=oy;
    , ~' k0 K! T* q: xShowMessage("ox="+IntToStr(x1) +"oy="+IntToStr(y1) );
    + ]/ h: {8 m4 \- q$ L$ j6 f}</P>
    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    <>总提示[C++ Warning] Unit1.cpp(28): W8060 Possibly incorrect assignment</P><>定位在 if(Button=mbLeft){</P>
    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    回复

    使用道具 举报

    22

    主题

    2

    听众

    72

    积分

    升级  70.53%

    该用户从未签到

    新人进步奖

    <>1、1、1、1、
    : m: i/ x8 _  V$ k4 ]6 h//---------------------------------------------------------------------------</P><>#include &lt;vcl.h&gt;4 v  ^2 k; Y1 L$ U# U5 u- q
    #pragma hdrstop</P><>#include "Unit1.h"
    8 p, J6 G9 n& N& t0 f$ o+ |8 _8 \* F//---------------------------------------------------------------------------/ W/ {) O3 n4 o: F1 D
    #pragma package(smart_init)* `2 V" E! d4 K& l
    #pragma resource "*.dfm"( R2 Y3 I! M3 b2 V
    TForm1 *Form1;& d7 c, T- R+ K7 N
    //---------------------------------------------------------------------------
      }5 X! t4 p3 w' N: @& p- u7 K__fastcall TForm1::TForm1(TComponent* Owner)# k! K- H2 z9 ^0 Q. A8 l
            : TForm(Owner)
    2 R! H! V+ K1 F4 N{) |3 Q7 s6 x0 l4 Y3 w6 H% ?  I* x7 F, W$ i
    }% l% _' g* }4 X4 q' N8 U/ u
    //---------------------------------------------------------------------------
    / q7 x6 S9 j; v) u! Y% `5 d# cclass cla{
    $ i4 e5 X; k4 t; u( Xpublic:
    2 a( j9 U$ x) o; B' M& Aint ox,oy;
    ! q! i2 O2 \5 ~' X};
    & P6 M+ A9 L6 S5 @: J/ B$ i' \. Icla *a=new cla;. A. w, d% v8 c% V3 C$ |
    int x,y;3 w2 o8 D- P, o. Y
    void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      C$ I4 g3 o$ m- x& {) c      TMouseButton Button, TShiftState Shift, int X, int Y)
    - Q- F" O  u# l6 P' S{
    5 a2 V" D1 Q! W9 P* M if(Button=mbLeft){
    . Y5 T& H8 U# C  Ya-&gt;ox=Image1-&gt;Left;. @, Y5 n5 O) m; l5 ?  z
    a-&gt;oy=Image1-&gt;Top;6 ]$ ^( F! j% i! [! B
    x=X;
    + U% t- ?) Y' qy=Y;
    2 E. U% @$ ]$ u) L/ @1 t  }}
    ! E6 h8 r" T; a* ?, B! f}
    * U" A. Y3 I2 D//---------------------------------------------------------------------------! ?/ E- k2 U- t+ i% |1 {, R
    void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
    4 g2 M5 F0 v  Q) |6 Y1 G0 {" W      int X, int Y)( s/ N9 Y0 B$ n  N5 y4 ?- B
    {  s. c/ ]3 m7 ~* S) X
    if(Shift.Contains(ssLeft)){2 h1 q3 v% ], Y# ]8 S* v: m3 w/ c
    Image1-&gt;Left+=X-x;3 y* J% `6 n4 z2 T& E: U6 t
    Image1-&gt;Top+=Y-y;
    0 i) S, n8 ~1 `2 M& M- C! [}& n) s( u* Q# Z5 K3 U% \) {
    }: E8 p3 K. s! s8 m% s% t! x
    //---------------------------------------------------------------------------
    2 _, m! y& s2 \% Jvoid __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
    ( X' t; ~9 Y1 T4 H0 C      TShiftState Shift, int X, int Y)9 K% r! q1 G9 {  r# f8 q8 U" d
    {1 x3 y$ a' {1 {' c
    if(Image1-&gt;Left&gt;Shape1-&gt;Left-20 &amp;&amp;9 }, }. ?- [+ a5 b: }8 U
    Image1-&gt;Left&lt;Shape1-&gt;Left+Shape1-&gt;Width+6 ~- W! Q; a' s5 k
    20&amp;&amp;Image1-&gt;Top&gt;Shape1-&gt;Top-20&amp;&amp;
      L* d5 `/ [; k# S1 T3 | Image1-&gt;Top&lt;Shape1-&gt;Top+20+Shape1-&gt;Top){# W  ~5 V4 K4 i1 p- g" z
    Image1-&gt;Top=Shape1-&gt;Top;5 K2 P5 y- e/ L6 d3 D' A
    Shape1-&gt;Visible=false;
    - W$ h. N: F  p9 U% D4 H- U7 bImage1-&gt;Left=Shape1-&gt;Left;- ~% w' W8 H4 [
    }else{
    / k2 y- e0 ^* n1 P6 XImage1-&gt;Left=a-&gt;ox;9 ], R3 |$ e3 O( L7 k5 i
    Image1-&gt;Top=a-&gt;oy;
    9 ?# J- n! l5 w2 Z- e: Z2 D}( X  Y# b' P- ]& B8 ^& x* Y
    }</P><>2、2、2、2、2、2、2、2、2、、2、2、2、2、2、、2、2、2、2、2、2、2、2、2//---------------------------------------------------------------------------</P><>#include &lt;vcl.h&gt;! `! g8 }0 V1 y/ E/ S/ U  L
    #pragma hdrstop</P><>#include "Unit1.h"  P  [1 _  S7 E' p7 H
    //---------------------------------------------------------------------------
    - U7 c3 X& z* G3 i8 l#pragma package(smart_init)
      J# u9 H. y5 Z* ^% b#pragma resource "*.dfm"
    ; p6 M6 g; i# STForm1 *Form1;
    ! w4 `8 Y+ ]$ X- {* N: u4 q//---------------------------------------------------------------------------6 C  z5 x: |6 V9 z1 @7 y
    __fastcall TForm1::TForm1(TComponent* Owner)
    8 V! A; Y' V+ t+ T* h8 N3 x" h        : TForm(Owner), s# J# u8 J1 G3 X! Z. p
    {
      q6 y, @9 l" Q- c$ ^}
    ! h# Q  M$ O" H1 K0 A! M/ Y7 [: F//---------------------------------------------------------------------------( |3 [! f5 D& ?6 o+ [, p# T+ R7 R
    class cla{
    9 U0 a' ^' h! P$ G2 {" Z1 Rpublic:
    ' D5 A8 l# G2 F) _' t2 K+ Jint ox,oy;
    9 V7 P: j9 z% _' g% X1 n) Hint get_x(){return ox;}
    # z* k  U* U. [int get_y(){return oy;}# `9 B! g" _6 c1 |
    };
    1 y6 g. V3 H" y6 vcla *a=new cla;- J0 ]7 p- c0 r% M
    int x,y;: n% _' r+ S& O, _# z
    void __fastcall TForm1::Image1MouseDown(TObject *Sender,, e" ?8 {% }. O8 b
          TMouseButton Button, TShiftState Shift, int X, int Y)  X4 T3 m1 s/ \( U$ G
    {
    # c0 @/ r; V& j# ]7 L- _2 h% J if(Button=mbLeft){% q8 W  A* j' k5 V9 j/ q8 i
    a-&gt;ox=Image1-&gt;Left;) Y! {: Z3 v5 ^: Q) F: v
    a-&gt;oy=Image1-&gt;Top;
    $ I% q1 L( S/ ?5 r) |x=X;
    " D; B) L4 f- W0 u; py=Y;+ m4 ]: J$ a; i
    }
    # p: g( k7 F7 K/ _: Z* m( H}
    ; }8 G4 d! [  ]& X) i//---------------------------------------------------------------------------
    % a. [; b( p9 }! A' W' vvoid __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
    4 a5 s+ Q; D% j! G4 |5 y, q      int X, int Y)0 P1 _: r6 f1 J5 t  }+ w$ y
    {7 V- P  V. M4 J( X" o" x
    if(Shift.Contains(ssLeft)){' f9 N% d- N! c* m* a, I
    Image1-&gt;Left+=X-x;+ i& v' \' D8 K! U; e
    Image1-&gt;Top+=Y-y;
    - P2 X- d" r- G- W}
    * @2 j! D0 v  ^. d- N, a# }  r}; s9 a/ B& {) Y& W
    //---------------------------------------------------------------------------
      ?$ G% J" N) P7 q- C+ |void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,7 P" S, S; d$ W* f+ I# }
          TShiftState Shift, int X, int Y)- V' s$ Y: ^0 V; h3 M( y, o  K
    {  q. p) X2 M  S
    int x1,y1;6 [0 Y* @1 M- c
    if(Image1-&gt;Left&gt;Shape1-&gt;Left-20 &amp;&amp;2 K. p6 V+ s2 S: d% R
    Image1-&gt;Left&lt;Shape1-&gt;Left+Shape1-&gt;Width+
    $ i7 Z) G. F* w: V& S4 ^20&amp;&amp;Image1-&gt;Top&gt;Shape1-&gt;Top-20&amp;&amp;
    8 z- p5 X/ C) P7 v Image1-&gt;Top&lt;Shape1-&gt;Top+20+Shape1-&gt;Top){* I+ P8 ?8 _" t5 f6 \  u
    Image1-&gt;Top=Shape1-&gt;Top;, d" [8 T3 a' z( n; I, t: |
    Shape1-&gt;Visible=false;; d& n- Z% G2 h( ]/ m8 y, |# \
    Image1-&gt;Left=Shape1-&gt;Left;, |% X5 S! _- K8 Q1 C" z5 m
    }else{
    + ^# i' z5 p$ {  W$ T4 C* q* ex1=a-&gt;get_x();
    6 r0 R( E1 P! ^/ z5 Wy1=a-&gt;get_y();
    # Q' i2 j; }0 t1 S( r7 [; J! Y: yImage1-&gt;Left=x1;, N$ G) p! D1 G/ N( v
    Image1-&gt;Top=y1;- l  P6 F+ Q* L2 m& j; h9 i  b6 J
    }2 Z/ R! R. q5 A8 T
    }</P>
    回复

    使用道具 举报

    ilikenba 实名认证       

    1万

    主题

    49

    听众

    2万

    积分

  • TA的每日心情
    奋斗
    2024-6-23 05:14
  • 签到天数: 1043 天

    [LV.10]以坛为家III

    社区QQ达人 新人进步奖 优秀斑竹奖 发帖功臣

    群组万里江山

    群组sas讨论小组

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

    群组C 语言讨论组

    群组Matlab讨论组

    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | 注册地址

    qq
    收缩
    • 电话咨询

    • 04714969085
    fastpost

    关于我们| 联系我们| 诚征英才| 对外合作| 产品服务| QQ

    手机版|Archiver| |繁體中文 手机客户端  

    蒙公网安备 15010502000194号

    Powered by Discuz! X2.5   © 2001-2013 数学建模网-数学中国 ( 蒙ICP备14002410号-3 蒙BBS备-0002号 )     论坛法律顾问:王兆丰

    GMT+8, 2025-7-8 10:43 , Processed in 0.624698 second(s), 98 queries .

    回顶部