摘要:
1. 在UniDBgrid的extEvent属性中写入以下代码: function OnAfterCreate(sender){ var toolbar=sender.getDockedItems()[1]; //取出固定在bottom的ToolBar toolbar.items.getAt(10) 阅读全文
摘要:
//单元 {从字符串中提取单词的函数} SysUtils.CharInSet();procedure StrToWordList(str: string; var List: TStringList); var p: PChar; i: Integer; begin if List = nil then List := TStringList.Create; List.Clear... 阅读全文