- 博客(9)
- 资源 (5)
- 收藏
- 关注
RSS订阅原创 让TextBox只接收数字输入
让TextBox只接收数字输入protectedoverridevoidOnKeyPress(KeyPressEventArgse){ //base.OnKeyPress(e); //如果是退格键 if (e.KeyChar == (char)Keys.Back) { return; } //e.Handled=true;//不接受输入 d...
2020-09-20 16:00:30
234
原创 unipagecontrol的tabbar的位置，高度，宽度，间隙
1、选中unipagecontrol，属性clientEvents->UniEvents2、选择 Ext.tab.Panel 的tabPanel.beforeInit3、编写：function tabPanel.beforeInit(sender, config){ config.tabPosition = "left";//位置 bottom top left rig...
2020-04-28 10:12:49
1376
转载 Android权限Uri.parse的几种用法 （学习日记）
1，调web浏览器 Uri myBlogUri = Uri.parse("http://xxxxx.com"); returnIt = new Intent(Intent.ACTION_VIEW, myBlogUri); 2，地图 Uri mapUri = Uri.parse("geo:38.899533,-77.036476"); returnIt = new Intent(
2013-01-15 14:14:07
694
原创 Delphi 2009 gif动画方法
以前要在 Delphi 中显示 GIF 动画，一种办法是使用第三方组件，别一种方法就是使用 WebBrowser 组件。在 Delphi 2009 中，其内部已支持 GIF 了（可能在 Delphi 2005 和 Delphi 2006 中已支持了，未确认）。关于 GIF 的相关类是 TGIFImage，在 GIFImg 单元中，看下面的代码，窗体中的 GIF 就动起来了：us
2009-03-25 09:53:00
614
原创 Application.MessageBox
function TApplication.MessageBox(const Text, Caption: PChar; Flags: Longint): Integer;1. Text：要显示的讯息2. Caption：讯息窗口的标题列文字3. Flags：讯息旗标 3.1. 可指定讯息窗口上的图标 3.2. 可指定讯息窗口出现的按钮 3.3. 可指定预设Focus在哪一个
2008-12-24 14:35:00
681
原创 ODBC注册表脚本添加办法
以前一直觉得用鼠标点击添加ODBC数据源好麻烦呀，现在好了，有了这个脚本，方便多了。 Windows Registry Editor Version 5.00[HKEY_LOCAL_MACHINESOFTWAREODBCODBC.INI][HKEY_LOCAL_MACHINESOFTWAREODBCODBC.INIMasterFile]"Driver"="C:/WINNT/System
2007-08-10 12:06:00
1101
原创 在PB中计算指定日期相对数量单位前(后)的日期
通过灵活使用PB提供的RelativeDate函数还是比较容易实现的， RelativeDate函数要求提供的第一个参数必须为date类型，也即该函数只能处理日期 （不包含时间）运算，因此有关时间部分的运算只能分开执行。以下是f_dateadd函数完整代码，在PB8/9上测试通过。/********************************************************
2007-08-10 12:04:00
3616
原创 优化你的PB程序
PowerBuilder是快速有效的开发工具,在程序实现过程灵活多样,下面介绍一下在开发产品过程中积累的一些经验。一、处理 SQL 语句1、缓冲 SQL 语句 在应用程序中，有时需要反复调用同一组 SQL语句，在这种情况下，可以通过在应用中为这些 SQL 建立缓冲区来提高执行性能。 在缺省情况下，SQL 语句的缓冲区是关闭的，你可以通过如下语句打开它：
2007-08-10 09:26:00
1456
原创 PB DataWindow 38个技巧
1 使DataWindow列只能追加不能修改如何使DataWindow中的数据只能追加新记录而不能修改，利用 Column 的 Protect 属性可以很方便的做到这一点，方法如下：将每一列的 Protect 属性设置为：If( IsRowNew(), 0, 1) )在 PowerScript 中可以动态修改 Protect 属性：dw_1.Modify("column_name_here.Pro
2007-08-10 09:00:00
1465
NexusDB_V4.5019_Trial_for_Rad_Studio_10.3_Rio.rar
2020-04-10
异洲酒店管理系统-餐饮管理
2007-08-17
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人