2022 年 4月随笔档案 - djd66

如何连续在同一张纸打印两个数据窗口？

摘要：如何连续在同一张纸打印两个数据窗口？dw_1.object.datawindow.print.filename="temp.prn"dw_2.object.datawindow.print.filename="temp.prn"dw_1.print()dw_2.print() 阅读全文

posted @ 2022-04-29 09:58 djd66 阅读(75) 评论(0) 推荐(0) 编辑

分组行号

摘要：怎样对分组里的行加上序号，要求每个组里行的序号从1开始！用计算域，放在明细区： getrow() - first(getrow() for group 1) + 1 first(getrow() for group 1) 可以取得每一组的第一行的行号 //做分组组号 cumulativeSum(i 阅读全文

posted @ 2022-04-29 09:56 djd66 阅读(30) 评论(0) 推荐(0) 编辑

除了循环以外，有没有更好的方法统计数据窗口中处于选中状态的行数？

摘要：除了循环以外，有没有更好的方法统计数据窗口中处于选中状态的行数？方法一： long ll_Selected ll_Selected = long(dw_1.describe("evaluate('sum( if(IsSelected(), 1, 0) for all)',1)"))方法二： long 阅读全文

posted @ 2022-04-29 09:55 djd66 阅读(41) 评论(0) 推荐(0) 编辑

在数据窗口过滤以后,计算列值如何才能一起改变?

摘要：dw_1.filter()dw_1.groupcalc() 阅读全文

posted @ 2022-04-29 09:54 djd66 阅读(23) 评论(0) 推荐(0) 编辑

DataWindow如何彻底禁止鼠标滚轮滚动到下一条或上一条记录

摘要：DataWindow如何彻底禁止鼠标滚轮滚动到下一条或上一条记录:方法一:other事件写 if message.number = 522 then return 1方法二:(个人觉得这种方法更好.)ue_vscroll，Event ID: pbm_vscroll事件代码：return 1 阅读全文

posted @ 2022-04-29 09:53 djd66 阅读(68) 评论(0) 推荐(0) 编辑

获取数据窗口中summary区中一个计算字段的值

摘要：获取数据窗口中summary区中一个计算字段的值:dw_1.getitemdecimal( 1, "compute_mk"))dw_1.describe("Evaluate('sum(mk_qty for all)',1)") 阅读全文

posted @ 2022-04-29 09:51 djd66 阅读(75) 评论(0) 推荐(0) 编辑

通用右键弹出菜单/及调用代码

摘要：菜单: $PBExportHeader$m_compopup.srm $PBExportComments$通用右键弹出菜单 common popup menu.Create by lenya on 2010/9/30 forward global type m_compopup from menu 阅读全文

posted @ 2022-04-29 09:50 djd66 阅读(57) 评论(0) 推荐(0) 编辑

PB自动注册OCX控件

摘要：1.定义一个局部的外部函数Function long DllRegisterServer() Library "QRBarcode.ocx" 2:Integer li_retstring ls_templi_ret = RegistryGet("HKEY_CLASSES_ROOT/CLSID/{F5 阅读全文

posted @ 2022-04-29 09:50 djd66 阅读(92) 评论(0) 推荐(0) 编辑

PB记录错误日志

摘要：li_file_no = FileOpen("system_error.log",LineMode!,Write!,Shared!,Append!) if li_file_no = 0 then Messagebox("出错信息","不能打开系统出错日志文件！",Exclamation!) else 阅读全文

posted @ 2022-04-29 09:49 djd66 阅读(178) 评论(0) 推荐(0) 编辑

选择颜色

摘要：long custom[ ] integer li_color custom[1]=rgb(255, 200, 1345678) custom[2]=8344736 long ll_select_color = 255 //选择的颜色 if li_color = ChooseColor( ll_se 阅读全文

posted @ 2022-04-29 09:48 djd66 阅读(42) 评论(0) 推荐(0) 编辑

PB中实现备份数据库/还原数据库

摘要：备份数据库 //备份数据库 SQLCA.AutoCommit = TRUE //将数据库备份到文件 ls_style = "USE " + as_databasename EXECUTE IMMEDIATE : ls_style; ls_style = "BACKUP DATABASE " + as 阅读全文

posted @ 2022-04-29 09:47 djd66 阅读(138) 评论(0) 推荐(0) 编辑

如何在 PB 中实现无标题可拖动的窗口

摘要：如何在 PB 中实现无标题可拖动的窗口当鼠标拖动时Windows 首先会向鼠标下的窗口发送一个 wm_nchittest 消息，窗口收到这个消息后再由窗口的消息处理函数进行处理，消息处理函数将会返回一个整数表示鼠标正处于窗口的什么部位。大家只需要知道的是处理函数返回2，表示鼠标正处于窗口的阅读全文

posted @ 2022-04-29 09:47 djd66 阅读(216) 评论(0) 推荐(0) 编辑

数据窗口揭秘：未公开的数据窗口事件

摘要：数据窗口揭秘：未公开的数据窗口事件（作者：Mark Brown) 到目前为止，PB的数据窗口控件仍是PB众多控件中功能最强大，最复杂的控件。数据窗口固有的行为大家对数据窗口固有的行为都很熟悉。不知道你发现没有，几乎不可能覆盖数据窗口固有的行为。它有自己的一套！事实确实如此，数据窗口控件确实有阅读全文

posted @ 2022-04-29 09:46 djd66 阅读(183) 评论(0) 推荐(0) 编辑

动态创建下拉

摘要：$PBExportHeader$gf_dynamic_create_dwchild.srf $PBExportComments$动态创建下拉Datawindowchild global type gf_dynamic_create_dwchild from function_object end t 阅读全文

posted @ 2022-04-29 09:45 djd66 阅读(44) 评论(0) 推荐(0) 编辑

检查列名是否有效

摘要：//检查列名是否有效 as_colname //列名 string ls_objects ls_objects= dw_2.describe("datawindow.objects") ls_objects= '~t' + ls + '~t' if pos(ls,'~t' + trim(as_col 阅读全文

posted @ 2022-04-29 09:45 djd66 阅读(18) 评论(0) 推荐(0) 编辑

如何限制应用程序只运行一次

摘要：问：请问如何限制应用程序只运行一次呢？答：利用Windows的API函数FindWindow()、BringWindowToTop()、ShowWindow()可实现上述功能。 ①定义API： Funtion ulong FindWindowA( ulong winhandle, string wi 阅读全文

posted @ 2022-04-29 09:44 djd66 阅读(259) 评论(0) 推荐(0) 编辑

PowerBuilder中实现数据窗口打印预览通用方法

摘要：2008年03月31日星期一下午 03:10 我们在文字处理过程中，常常在打印前要预览，以便控制打印效果，特别在数据打印中要有选择地打印页面，更需要预览。PowerBuilder 提供了程序开发过程中的数据打印预览，下面介绍在程序应用中实现打印预览通用方法。打印预览窗口w_preview 一、阅读全文

posted @ 2022-04-29 09:43 djd66 阅读(234) 评论(0) 推荐(0) 编辑

datawindow指标获取

摘要：1、得到当前鼠标所指对象所在的带区 string str_band str_band=GetBandAtPointer() //得到当前鼠标所指对象所在的带区 str_band=left(str_band,(pos(str_band,'~t') - 1))//得到"header"、"detail"等阅读全文

posted @ 2022-04-29 09:35 djd66 阅读(138) 评论(0) 推荐(0) 编辑

win10中，某些应用程序鼠标滚轮一次翻多页

摘要：经测试，以下方法可以修复一次翻多页问题：不过还是有点牵强点左下角开始菜单 -- 设置 -- 设备 -- 鼠标和触摸板 -- 当我悬停在非活动窗口上方时对其进行滚动 -- 关主要还是这张图阅读全文

posted @ 2022-04-29 09:33 djd66 阅读(292) 评论(0) 推荐(0) 编辑

PB 游标的两种使用方法

摘要：示例一 string ls_sub_storage declare cur_sub_storage cursor for select sub_storage from drug_sub_storage_dict WHERE sub_storage like '%药房%'; open cur_sub 阅读全文

posted @ 2022-04-29 09:28 djd66 阅读(383) 评论(0) 推荐(0) 编辑

PB 数据窗口双击列标题时，按该列排序(第一次升序，第二次降序)

摘要：// Event: clicked // Description: 双击列标题时，按该列排序(第一次升序，第二次降序) string ls_objects integer li_pos string ls_dwoname string ls_sort_old,ls_sort_new ls_objec 阅读全文

posted @ 2022-04-29 09:25 djd66 阅读(148) 评论(0) 推荐(0) 编辑

PB 导出Excel

摘要：string ls_pathname,ls_file,ls_ext long ll_return if dw_1.rowcount()<1 then messagebox('提示',"当前数据窗无记录数据,无导出的必要!",exclamation!) return end if ll_return= 阅读全文

posted @ 2022-04-29 09:24 djd66 阅读(399) 评论(0) 推荐(0) 编辑

PB做大屏显示滚动窗口 [转载]

摘要：前段时间接到一个同事的求助一个客户需求做门诊已完成报告通知取单的大屏显示界面百度了一下，其实很简单实现方法如下 1.用要显示数据的sql语句做成数据窗口（datawindow）； 2.在窗体（window）中嵌入window； 3.在窗体的open事件中加入timer事件； 4.在timer事阅读全文

posted @ 2022-04-27 10:36 djd66 阅读(378) 评论(0) 推荐(0) 编辑

PB 对象（sqlca、sqlsa、sqlda）

摘要：pb事物对象SQLCA、SQLS、SQLDAsqlca 是系统默认定义的全局变量，是transaction 类型的object ；它是pb自定义的一个程序和数据库通讯的结构变量；SQLCA是一个事务对象的实例，有15种属性，2个事件，8种方法。属性名称数据类型意义 DBMS String 数阅读全文

posted @ 2022-04-27 10:35 djd66 阅读(687) 评论(0) 推荐(0) 编辑

PB中的Datawindow按页行滚动的应用设计【转载】

摘要：在Powerbuilder中，当Datawindow所显示的数据超过一个数据窗口时，常常通过单击滚动条控件使Datawindow中的容上下滚动，这样有时带来许多不便，如从某行开始滚动到现在过去了几行或几页，往上或往下滚动几行或几页都不好掌握，Powerbuilder中提供了几种方法可以解决这些问题，阅读全文

posted @ 2022-04-27 10:33 djd66 阅读(242) 评论(0) 推荐(0) 编辑

我的PS为什么打开任意一张图片都是白色？

摘要：新安装的PS，图层显示正确，但是界面是白色的。。。解决：编辑，首选项，常规，性能，去掉图形处理器前面的√ 原因：显卡或者显卡驱动或者ps盗版问题，ps吃cpu和内存，不是专业显卡关掉也行。来自：https://www.zhihu.com/question/369914054/answer/179 阅读全文

posted @ 2022-04-19 08:19 djd66 阅读(2363) 评论(0) 推荐(0) 编辑

如何让VS2017创建ASP.NET Core Web项目时默认不启用https

摘要：问：自从 ASP.NET Core 2.1 开始，Visual Studio 2017 创建 ASP.NET Core Web 项目时默认会选中 Configure for HTTPS ，这给用 dotnet run 命令行运行站点带来了麻烦，请问如何修改这个默认设置？答：手动把Propertie 阅读全文

posted @ 2022-04-06 14:10 djd66 阅读(553) 评论(0) 推荐(0) 编辑

aspnetcore-browser-refresh.js

摘要：aspnetcore-browser-refresh.js:234 WebSocket connection to 'wss://localhost:49653/XXXXXX/' failed: Error in connection establishment: net::ERR_CONNECTI 阅读全文

posted @ 2022-04-06 13:55 djd66 阅读(2375) 评论(0) 推荐(1) 编辑

搜索

常用链接

我的标签

随笔分类

随笔档案

阅读排行榜

评论排行榜

推荐排行榜

最新评论

04 2022 档案