救命啊，100分！

单独写过程，然后赋给那些image。

解决方案 »

  1.   

    请不要这样做，你学VC是这样写的码？
    应该用一个Timage就可以拉
    画好一个棋盘用程序，然后判断鼠标的位置定位好坐标
    比如image空间高宽为100,100
    然后你的棋盘就是10，10为一个数组。
    0。0-10。10 就是a[0][0],然后再mousedown里面判断鼠标的坐标
    就知道在那个方格里面单击拉，这样是最好的藏眼法。
    这样你的数组和棋盘就分开啦，
      

  2.   

    用Action或自定涵数
    procedure imgPro(sender : Tobject);
    方法
    ImageList[i].OndbClick := imgPro;
      

  3.   

    image1.onclick:=procedurename;
    注意procedure的参数必须和onclick的参数相同
      

  4.   

    TImage.Click:= MyClick;form1.MyClick;
    begin
    end;
      

  5.   

    建议使用ActionList来专门放Image的事件
    维护方便
    当然用自定的过程也是一样的
    方法
    Procedure imgPro(Sender : TObject);
    ImageList[i].OnDBClick := imgPro;
      

  6.   

    这样做是错的，先用程序画一个棋盘
    比如image的高和宽 是100,100
    然后0,0--10,10 尾数组的 a[0][0]这样在image的 mousedown里面判断
    鼠标的位置，然后除10就是相应的数组的位置拉
    数组事在一开始负号值的，然后判断数组的值就知道是那个象棋拉
    这样才是写棋类游戏，方块，扫雷的最好方法，不知道还有那位大哥有更好的想法
      

  7.   

    如果写好了，能不能发给我研究研究
    [email protected]
    先谢谢了
      

  8.   

    我也要!谢谢了
    [email protected]
      

  9.   

    用vb写的话
    利用控件的Index属性可以从click事件的参数中传入该值
      

  10.   

    拜托各位先帮忙想想办法了，我可是在这星期六前拿不出东西就得吃不了兜着走了，这是给女朋友做的作业啊，唉，不幸，她老师教什么我就得学什么，现在被碧无奈的学了Photoshop、Visual C++、Visual Basic、Visual FoxPro、PHP，然后还有作网页。太苦了我，拜托帮忙了，如果想要的话，你们发信到[email protected]了，不用谢，如果连实验报告也要的话，顺便也送你们了
    ^_^