随笔- 267
文章- 27
评论- 28
阅读-
10万
05 2015 档案
XE里, TStringField 还是 ansi的
摘要:{ TStringField } TStringField = class(TField) private FFixedChar: Boolean; FTransliterate: Boolean; protected class procedure CheckTypeSiz...
阅读全文
TMemo的ScrollBars属性和大文本
摘要:给TMemo.Text := '几M大的文本';如果ScrollBars 不是 sbBoth的话,程序很可能 无响应。今天郁闷了半天才发现的。
阅读全文
如何获取选定部分的HTML
摘要:其实这个程序很简单,首先是如何获取选定部分的HTML,还记得这段吗: HTMLDoc := WebBrowser1.Document as IHTMLDocument2; SelectRange := HTMLDoc.selection.createRange() as IHTMLTxtRange;...
阅读全文
去除 DBGridEh SelectedRows里无效的书签
摘要:数据集处于过滤状态,然后选中几个记录,再修改了这些记录中的某个字段(和过滤条件有关),导致那几个记录不符合过滤条件,不显示了。但是SelectedRows里 还保存着。如果不删除SelectedRows里这几个书签,后续的操作可能会报错。 for I := DBGridEhTrade.Select...
阅读全文
RM报表 实际打印的判断
摘要:procedure TFormDZMD.RMReport1PrintReportEvent(Sender: TObject); begin // Log('RMReport1PrintReportEvent'); IsTruePrint := True; end;
阅读全文
ehlib 如何用代码,选中checkbox呢?
摘要:TDBGridEh = class(TCustomDBGridEh) public property Col; property Row; property Canvas;// property GridHeight; property RowCount; ...
阅读全文
ehlib ado 删除选中记录 的方法
摘要:procedure TForm1.Button1Click(Sender: TObject);var I: Integer;begin for I := DBGridEh1.SelectedRows.Count - 1 downto 0 do begin DBGridEh1.DataSo...
阅读全文
参数 out
摘要:function outtest(out jo: ISuperObject; out s: string):Boolean;begin//进入函数时 jo =nil ErrStr = ''Result := True; jo := SA([]); s := 's';end;var json: i...
阅读全文
ADO SQL delete 日期条件参数
摘要:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, DB, ADODB, Grids, DBGrids;typ...
阅读全文
TADOTABLE 永久字段的顺序 和 AppendRecord
摘要:AppendRecord 方法,添加记录的字段到数据库里时,是按照IDE里永久字段的顺序,不是数据库表里的字段顺序。自动编号 字段,以nil为值。日期时间 字段,直接now 写法
阅读全文
DBGridEh 在粘贴中文时出现乱码和错位 100zhx_888]
摘要:http://www.fx114.net/qa-29-3439.aspx回复于: 2011-10-11 15:02:08unit DBGridEh; 把下面这个函数替换成这样procedure TDBGridInplaceEdit.WMPaste(var Message: TMessage);var...
阅读全文