-
paint重写为什么卡死?Delphi(Pascal)codeprocedureTImageButton.paint;varpng:TPngImage;begininherited;png:=TPngImage.Create;png.Assign(Picture);withpngdobeginCanvas.Font:=Self.Flwsxln 时间:11-02 + 阅读全文
-
Dll封装dbexpress mysql?我用TSqlConnection连接mysql当将连接方法封装在DLL中时,在DLL中动态设置所有参数,当然参数都是正确的,最后 try FConnection.Connected:=true; except RaiseException.Create('Connerror'); end;便会出错?何jiang188136923 时间:11-02 + 阅读全文
-
delphi中自动提示信息数据表中,比如编号不为null,必须输入编号。现在在界面上对编号这个文本框加了判断,在保存信息时系统会判断该文本框是否为空,如果为空则会提示我做判断的信息,但是还提示系统自动提示的信息。问题:如何屏蔽掉系统自动提示的某某字段不允许为空的信息。用了try...exceptend;不管用imonsoft2011 时间:11-02 + 阅读全文
-
webbrowse怎么调用.do类型的地址?在webbrowse中登录之后,需要打开一个.do的路径,结果出现类似下载的对话框,请问这是怎么回事?scu96124678 时间:11-02 + 阅读全文
-
请教子窗口关闭的问题~~1:procedureTForm3.FormClose(Sender:TObject;varAction:TCloseAction);begin FreeAndNil(form3);end;我还想弄一个button关闭procedureTForm3.btn4Click(Sender:TObject);begin Close;//freeafky1989 时间:11-02 + 阅读全文
-
有无办法得到鼠标移动到的位置是不是菜单项。一个form,form上有一个TMainMenu,现在鼠标在窗体上移动,如何知道当前鼠标移动到的位置是不是菜单项?如果是,如何让其展开。zhouqinppq0830 时间:10-30 + 阅读全文
-
关于String[]的问题请问高手们,我做一个socket通信的程序,定义一个Buff:String[100]类型的,我怎么提取Buff里面每一个字符啊,也就是说Buff[1],Buff[2],还有就是我令Buff[1]=':',然后把这个':'给去掉,然后显示':'后面的Buff内容怎么实现。ifRet>0then//接收 begin ifBuff[1]=trim(jj0635 时间:11-01 + 阅读全文
-
初次使用RO Datanap,在服务器端中增加方法,如何在客户端访问呢?初次使用RODatanap,在服务器端中增加方法,如何在客户端访问呢?服务端DataSnapModule里增加一个方法:TDataSnapServerDataForm=class(TRODataSnapModule) private {Privatedeclarations} public {Publicdeclaratcase5166 时间:11-01 + 阅读全文