我在Form1上添加了两个Button按钮，程序中也有他们的事件代码。可是一运行其中一个按钮就不见了，怎么回事？

Question

可见属性是不是被改成False了呀

Answer 1

你是不是设计时将两个 BUTTON 重叠啦！或者是你的 CODE 不行。最后就是你的 属性设置问题啦

Answer 2

Visible ＝ False 属性的问题

Answer 3

Private Sub Form_Load() '请加上这个 2 句看看
    Command1.Visible = True
    Command2.Visible = True
End Sub

Answer 4

同上，可能是Visible要设成TRUE
你也可以在属性框中设置

Answer 5

建立的要
showwindow(hwnd,sw_show)来显示

Answer 6

你把它的visible属性设置为false了吧？

Answer 7

按钮的visible是true,没错的.
      void __fastcall TForm1::Button1Click(TObject *Sender)
{     Drawing=true;
     MyDlq1=new TDlq(1,Canvas,true);//TDlq是我自定义的类.}
//------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{        Moving=true;}
//------------------------------------------------------------------
void __fastcall TForm1::Image1MouseDown(TObject *Sender,
      TMouseButton Button, TShiftState Shift, int X, int Y)
{      for(int k=0;k<i;k++)
    {
      if(X>=(a[k]-15)&&X<=(a[k]+15)&&Y>=b[k]&&Y<=(b[k]+60))
          {   Drawing=false;
              if(Moving)
                 {Draging=true;
                  X0=X;
                  Y0=Y;
                  j=k;}
              else
               { Dlqdlg->Hide();//Dlqdlg是我自创建的对话框
                 Dlqdlg=new TDlqdlg(this);
                 Dlqdlg->Show();}
             }
    }
     if(Drawing)
      {MyDlq1->DrawDlq(X,Y);//DrawDlq是类TDlq中的画图函数.
       a[i]=X;
       b[i]=Y;
       i=i+1;
      }
}
//-下面我想实现用鼠标拖动所画元件的功能,不知对不对?请指教!-----------------------------------------------------------------
void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,
      int X, int Y)
{       if(Draging==true)
          d1=X-X0;
          d2=Y-Y0;
          MyDlq1->DrawDlq((a[j]+d1),(b[j]+d2));
          SelectRect=(TRect((a[j]-7+d1),(b[j]+d2),(a[j]+7+d1),(b[j]+60+d2)));
          Image1->Canvas->CopyMode=cmWhiteness;
          Image1->Canvas->CopyRect(SelectRect,Image1->Canvas,SelectRect);
          Image1->Canvas->CopyMode=cmSrcCopy;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Image1MouseUp(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{       if(Draging==true)
           Draging=false;}