Tag

摘要： 基类自动释放 窗体变量 PFrmPtr: ^TForm; //继承改窗体的变量地址 不为空 置为nil if Assigned(PFrmPtr) thenPFrmPtr^ := nil; 阅读全文

摘要： delphi 利用TMethod 调用事件函数过程，这里只说TNotifyEvent。 可以用TNotifyEvent 变量存起来，然后调用。但这样如果有多个的话，就麻烦，要定义很多个变量。 可以转成 TMethod,存data code就可以了。 TMethod(SaveB.OnClick).Co 阅读全文

摘要： UPDATE 失败，因为下列 SET 选项的设置不正确: 'QUOTED_IDENTIFIER'。请确保 SET 选项正确无误，可以用于 计算列上的索引视图和/或索引和/或筛选的索引和/或查询通知和/或 XML 数据类型方法和/或空间索引操作。。 当执行语句提示以上这些时，先看报错的位置是在哪里。如 阅读全文

摘要： 首先弹出来的下拉过滤列表也是一个form 思路,在不改源代码的情况：hook,捕捉 WM_SHOWWINDOW 消息，通过源码得知窗口类名 为”TcxGridFilterPopup“ 再通过句柄转得到实例，同时在本单元type 一下新的 TcxGridFilterPopup， TcxGridPopu 阅读全文

摘要： https://learn.microsoft.com/zh-CN/sql/connect/php/constants-microsoft-drivers-for-php-for-sql-server?view=sql-server-2017 TP框架PDO 默认执行语句超时并不是微软档案说的这样 阅读全文

摘要： 忘记是抄谁的了，这里改进了一下。还原后没有clear 并再一次备份。因为还原一次后，如果再还原，会句柄无效的。 unit clipbak; interface uses SysUtils, Classes, Clipbrd, Windows, Contnrs, Dialogs; type TClip 阅读全文

摘要： //不是过滤DATASET,适合用在下拉数据很多的情况。过滤的必须是下拉有添加的列 procedure cxLookupComboBoxLikeSearchInitPopup(Sender: TObject); var FEdit: TcxLookupComboBox absolute Sender 阅读全文

摘要： function Like(p1: PChar; l1: Integer; p2: PChar; l2: Integer; percent_char, underline_char, escape_char: Char): Boolean; overload; var c: Char; AEscap 阅读全文

摘要： function ByteType(const S: string; Index: Integer): TMbcsByteType; // 判断一个字符串中，某个 Char 是单个字母，还是双字节的前一位或后一位。 // mbSingleByte 单字母 // mbLeadByte 双字节第一位 / 阅读全文

摘要： oleacc.pas {*******************************************************} { } { CodeGear Delphi Runtime Library } { } { File: oleacc.h } { Copyright (c) Mi 阅读全文