上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 23 下一页
  2015年6月4日
摘要: if Application.MessageBox('删除不能恢复,确认删除吗?', '删除提示', MB_OKCANCEL + MB_ICONQUESTION)=mrOk thenbegin ShowMessage('你选择的OK!');end;1. 警告信息框 Application.Me... 阅读全文
posted @ 2015-06-04 11:37 雪夜 阅读(394) 评论(0) 推荐(0) 编辑
摘要: TComponent类TComponent类直接由TPersistent派生。TComponent的独特特征是它的属性能够在设计期间通过ObjectInspector来控制,能够拥有其他组件。非可视组件也是从TComponent派生的,因此它们也继承了在设计期间可以被控制的能力。TComponent... 阅读全文
posted @ 2015-06-04 09:41 雪夜 阅读(643) 评论(0) 推荐(0) 编辑
摘要: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls;typeTForm1 = class(TForm... 阅读全文
posted @ 2015-06-04 09:40 雪夜 阅读(3955) 评论(0) 推荐(0) 编辑
  2015年6月3日
摘要: 1、表存在select count(*) from sqlite_master where type='table' and name='MyTable';sql="CREATE TABLE IF NOT EXISTS MusicList (id integer primary key AutoIn... 阅读全文
posted @ 2015-06-03 21:42 雪夜 阅读(316) 评论(0) 推荐(0) 编辑
  2015年6月2日
摘要: 在DELPHI中指针最常见的就是和类TLIST结合起来使用。下面是一个很简单的例子,希望对这个例子的分析能让大家对使用TLIST类有一个简单的认识。代码的功能是使用指针和Tlist来生成一个牌串,并将牌串保存在t_CardInfo中。 procedure TForm1.Button1Click(Se... 阅读全文
posted @ 2015-06-02 10:18 雪夜 阅读(8493) 评论(0) 推荐(0) 编辑
  2015年6月1日
摘要: 属性: Text:ComboBox 的文本信息EditText: 也是给ComboBox 的文本信息赋值,但不同的是 给Text赋值会 触发 Change事件,也会触发 EditvaluesChange事件 , 而且 EditText只会触发 Change事件,还有一个区别在于。 当ComboBox... 阅读全文
posted @ 2015-06-01 09:08 雪夜 阅读(2709) 评论(0) 推荐(0) 编辑
  2015年5月31日
摘要: 数据集数据转换为XMLfunction ReplaceString(AString: string): string;begin Result := StringReplace(AString, '&', '&', [rfReplaceAll]); Result := StringRep... 阅读全文
posted @ 2015-05-31 01:14 雪夜 阅读(373) 评论(0) 推荐(0) 编辑
摘要: unit Form_Main;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, DB, Grids, DBGrids, DBClient;type ... 阅读全文
posted @ 2015-05-31 01:05 雪夜 阅读(2572) 评论(0) 推荐(0) 编辑
摘要: 1.TClientDataSet的基本属性和方法介绍1).FieldDefs: 字段定义列表属性开发者可通过单击属性编辑器中该属性编辑按钮,或在该控件上单击右键选择弹出菜单中的"Fields Editor"菜单进行字段编辑。设置完此属性后,实际上就相当于定义了表的结构;如果想装入已有的数据表的结构和... 阅读全文
posted @ 2015-05-31 00:32 雪夜 阅读(1369) 评论(0) 推荐(0) 编辑
摘要: 1、取得可文件路径 Path := ExtractFilePath(Application.ExeName); //取得可执行文件路径 TXMLDocument.Create(ExtractFilePath(Application.ExeName)+ '001.xml') 2、DisableCont 阅读全文
posted @ 2015-05-31 00:30 雪夜 阅读(652) 评论(0) 推荐(0) 编辑
上一页 1 ··· 13 14 15 16 17 18 19 20 21 ··· 23 下一页