07 2016 档案

delphi截取指定字符空格或-符号前面 中间 后面字符串
摘要：Edit1.Text:='abcd-12ab-59cd';procedure TForm1.Button1Click(Sender: TObject); var List: TStringList;begin List := TStringList.Create; List.Delimiter := 阅读全文

posted @ 2016-07-23 16:27 那里的天空 阅读(1873) 评论(0) 推荐(0)

delphi 强制退出死循环，要设置label标签
摘要：delphi 强制退出死循环，要设置label标签 unit Unit2;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, ADODB, StdC 阅读全文

posted @ 2016-07-18 08:13 那里的天空 阅读(967) 评论(0) 推荐(0)

用Delphi画圆角Panel的方法
摘要：用Delphi画圆角Panel的方法 procedure TForm1.Button5Click(Sender: TObject);var fhr :Thandle;beginfhr:=createroundrectrgn(0,0,panel1.width,panel1.height,4,4);se 阅读全文

posted @ 2016-07-14 20:12 那里的天空 阅读(1997) 评论(0) 推荐(0)

delphi sql中加like 写法
摘要：'FROM (SELECT hetongbianhao, zhiwu, xingming, shigongfenlei,'+ 'SUM(shuliang) 设备数量, SUM(yingtichenge) 应提成额 '+ 'FROM Y_shigongpaigong where zhiwu=''监理' 阅读全文

posted @ 2016-07-05 17:07 那里的天空 阅读(562) 评论(0) 推荐(0)

delphi7 同时按下Ctrl+H键写法，键值
摘要：OnKeyDown事件： if (ssctrl in shift) and (key = $48) then begin ShowMessage('1111'); endelsebeginend; 阅读全文

posted @ 2016-07-05 10:17 那里的天空 阅读(588) 评论(0) 推荐(0)

windows server 2008 增加远程桌面连接数
摘要：你好 . 组策略中设置一下来解决问题：单击“开始 → 运行”，输入“gpedit.msc”，回车后打开组策略窗口，然后依次定位到“计算机配置 → 管理模板 → Windows 组件 → 终端服务 → 会话”，然后在右侧窗口中双击“为断开的会话设置时间限制”，在打开的窗口中将“结束断开连接的会话”时间 阅读全文

posted @ 2016-07-04 15:58 那里的天空 阅读(6916) 评论(0) 推荐(0)

sql语句更改年月日，年加一年或减一年，月、日相同原理
摘要：SQL更改年，年加一年或减一年，月、日相同原理 CONVERT(varchar(12),DATEADD(year,1,要改的字段),23) as 字段别名 阅读全文

posted @ 2016-07-04 15:03 那里的天空 阅读(11913) 评论(0) 推荐(0)

导航