273700707
273700707
关注数: 1
粉丝数: 18
发帖数: 109
关注贴吧数: 3
1神关羽 加 2个貂蝉 与 3换装剑士 哪个更好一些 阵容一: 1神关羽 加 2个貂蝉 阵容二: 3换装剑士 上阵哪一组好
这阵容尴尬啊,只能组出杂牌军吗?
领个礼包这么难吗? 输错了几次,然后在输入就提示‘’短时间内输入错误过多请重新在试‘’。 等了一上午了还是这样
我也发一个 84男未婚,老家辽宁抚顺农村,目前在杭州工作,程序员一枚,月薪20K+无车无房,找一比我小,性格好相处的未婚女士。
怎么进不去了 突然进不去了
有没有减少医馆建造费用的科技 有没有减少医馆建造费用的科技
同等级内政顾问用哪个划算? 同等级内政顾问用哪个划算?
你们有没有发现! 顾问放在里面,非常不方便,时代目标放在外卖界面没什么用。 放个每日任务还差不多
升级后,科技的顺序变了 好坑啊,技能树点偏了
纪元ol国服什么时候可以玩??? 纪元ol国服什么时候可以玩???等了好几年了。。。。
【01-17】百度怎么还没更新 百度怎么还没更新
才发现大地天使有二段变身。。。。 才发现大地天使有二段变身。。。。
王者之章换矿石包换哪个合适?? 王者之章换矿石包换哪个合适??
末日使者有什么好的打法没有? 末日使者有什么好的打法没有?一个u概率太低了。
在 vss check out 下修改代码会出错,不用就不会 在 vss check out 下修改代码,在窗体添加3个edit控件,保存后,关闭form,在重新打开form,会出错F12 切换不到design页面。分步跟踪后发现,再加前2个edit控件时是好的,加到第三个会出错。同事的电脑业出现在这个问题。我要怎么出查找问题根源呢???
美国队长是不是bug? 美国队长是不是bug? 技能上写的是加1王者加1防御,实际效果是加1王者减1防御
北方海域怎么过???
海妖族和它后面的怎么打??求攻略。。。 海妖族和它后面的怎么打??求攻略。。。
人品终于爆发了
1月合战 福小咪值得换吗
求助!!!!!!!!! 单击form A 的 button 打开 form B,现要在form A控制 form B的ToolbarButton.enabled:=false;(form B的ToolbarButton是动态创建的),求助button 的onClick代码要怎么写。
求助右键移动panel的问题!!! {鼠标左键可以正常移动,右键会飘(鼠标已经松开了,panel还是可以一定),怎么解决???? 怎么使右键可以像左键一样正常正常拖动????? } unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls; type TForm1 = class(TForm) Panel1: TPanel; procedure Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); procedure Panel1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); procedure Panel1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); private leftstartdrag:boolean; xstart,ystart:integer; { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.Panel1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin (Sender as Tpanel).BringToFront(); //总在最前 leftstartdrag:=true; xstart:=x; //记录鼠标在控件(panel)中的位置 ystart:=y; end; procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer); begin if leftstartdrag then begin (sender as tpanel).left:=(sender as tpanel).Left+x-xstart; //执行move时,控件初始位置+(x-xstart),使控件位置同步 (sender as tpanel).Top:=(sender as tpanel).Top+y-ystart; end end; procedure TForm1.Panel1MouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); begin leftstartdrag:=false; end; end.
求助!求助!求助!求助!求助!求助!求助! 怎么让edit 能记住上次修改后的内容(控件的记忆功能)i 例如:edit 的内容是123,修改成456,关掉程序后年在打开程序 让edit 的内容显示456(如何实现?????) (不能通过数据库,ini配置文件,写注册表这些类似的方式,只能通过程序本身来实现)
1
下一页