上一页 1 2 3 4 5 6 ··· 16 下一页
摘要: 第三方控件EHLIB中的dblookupcomboboxeh,给它的ListSource指定一个数据源,然后它有一个listField属性,要什么列就可以写在那里,然后用";"分隔开来,就可以有这样的效果了,Form1.DBLookupComboboxEh1.ListSource:=DataModule1.DataSource1;Form1.DBLookupComboboxEh1.ListField:='编号;名称';//要显示的列Form1.DBLookupComboboxEh1.KeyField:='编号';//实际的值Form1.DBL 阅读全文
posted @ 2012-11-08 12:23 马儿快跑 阅读(2090) 评论(0) 推荐(0) 编辑
摘要: Delphi2010 DBExpress+MySQL 程序的打包delphi链接mysql数据库可以用TSimpleDataSet+TSQLConnection控件1) TSQLConnection设置: ConnectionName: MySQLConnectionDriver->HostName一般是localhostDatabase: 所要用到的数据名2)TSimpleDataset设置:Connection: 选择SQLConnection1Dataset里点击CommandText会出现所选Database的table field列表, 点击生成sql语句3) 设置完这个TSi 阅读全文
posted @ 2012-11-07 16:43 马儿快跑 阅读(2091) 评论(0) 推荐(0) 编辑
摘要: 将MySQL全部的安装备份目录拷贝到目标目录 打开MySQL的安装目录里my.ini,确保basedir和datadir的路径是你MySQL目标目录的路径 basedir="C:/Program Files/MySQL/MySQL Server 5.0/" datadir="C:/Program Files/MySQL/MySQL Server 5.0/Data/" 将以下路径改为MySQL的目标路径,注意其中的双引号,内容存为reg.reg文件,双击导入注册表 Windows Registry Editor Version 5.00 [HKEY_LOC 阅读全文
posted @ 2012-11-07 16:41 马儿快跑 阅读(2526) 评论(0) 推荐(0) 编辑
摘要: Delphi - 简单10进制转2进制的函数 技术交流,DH讲解.昨晚半夜1点多,有个朋友来问这个问题.想了下,先打算偷懒,让他先用IntToHex转16进制,然后1位16进制对应4位二进制.后来想了下这样做,太不该了.于是自己随手写了个函数:我们只要对位运算熟悉就可以了,我们一位一位的去判断是0还是1就可以了.为了避免String引起的效率问题,我们直接用Array[0..31] of Char.Type TBinString = Array[ 0..31 ] Of Char ; Function IntToBin( N: Integer ): TBinString ; Const Bin. 阅读全文
posted @ 2012-10-29 10:44 马儿快跑 阅读(417) 评论(0) 推荐(0) 编辑
摘要: TChart是一个功能强大的绘制各种数据图表的控件,使用它可以很方便的绘制出各种数据图表。下面就来详细介绍它的使用。 常用属性:AxisVisible:Bool型用于显示或隐藏图表上的四个坐标轴以及显示区域的曲线框BufferDisplay:Bool型默认为Ture.可以提高图像的显示速度消除闪烁MaxPointPerpage:默认为0,用来设置每页可以显示的点的数量,设置了该属性之后,除最后一页外,每页都是以固定的点数显示。(页:表示的是TChart的大小)SeriesList:该属性为一指针数组,指向的是TChart中的Series。获得TChart中的Serries数组,也有三种方法 . 阅读全文
posted @ 2012-10-23 08:59 马儿快跑 阅读(24531) 评论(2) 推荐(0) 编辑
摘要: procedure searchfile(path:string);//注意,path后面要有'\'; var SearchRec:TSearchRec; found:integer; begin found:=FindFirst(path+'*.*',faAnyFile,SearchRec); while found=0 do begin if (SearchRec.Name<>'.') and (SearchRec.Name<>'..') and (SearchRec.Attr<>faDir 阅读全文
posted @ 2012-10-19 13:52 马儿快跑 阅读(13189) 评论(4) 推荐(0) 编辑
摘要: 嗯,多简单的事呀。。。不过是SQL语句的导入导出嘛。。。我开始真的是这么想的。。。 做的时候发现,Access没有导出SQL的功能,不想用第三方的东西。。。这里简单描述下我是怎么做的吧!1、在access中建个视图,得到自己想要的数据;2、把这个视图查询到的数据,导出成文本格式,我用的是CVS;3、用文本编辑器,把导出的数据 处理成 SQL语句(多亏了vim,用其他编辑器都不知道怎么办才好,打开都成问题,更不用说快速编辑了。。。UE打开后,滚轮都滚不动的说。。。);4、用mysql命令,导入mysql。思路很清晰,我就这么做了。直到最后一步,才发现问题:数据量太大(68万条),这一步很慢很慢。 阅读全文
posted @ 2012-10-18 17:32 马儿快跑 阅读(7147) 评论(0) 推荐(0) 编辑
摘要: 假如源数据库名称为“srcdb”,目标数据库名称为"trgdb"首先创建目标数据库:create database trgdb;查看源数据库中的所有表名:use information_schema;select table_name from TABLES where TABLE_SCHEMA= ‘srcdb’;针对上面查询出来的表名,依次执行以下命令:rename table srcdb.tablename1 to trgdb.tablename1;这样源数据库srcdb中的表(表结构和表数据)就被全部迁移到目标数据库trgdb了。 阅读全文
posted @ 2012-10-18 15:34 马儿快跑 阅读(14059) 评论(0) 推荐(0) 编辑
摘要: doc := LoadXMLData('<?xml version="1.0" encoding="GBK"?><root/>'); doc.Active := true; root := doc.DocumentElement; _node:=root.AddChild('a'); vNode:=doc.CreateNode('abc',ntCData,'xxxx'); _node.ChildNodes.Add(vNode); 阅读全文
posted @ 2012-10-16 18:12 马儿快跑 阅读(1165) 评论(0) 推荐(0) 编辑
摘要: 越来越多的程序使用了多国语言切换,虽然DELPHI自带多语言包的添加和配置, 但是那种方法在切换语言时界面会出现闪烁,而且实现起来很麻烦,这里我介绍给大家的是利用INI文件来读取界面的语种文字, 用这种方法,不但简单易行,而且在切换的时候不会出现界面的闪烁。 我们从一个例子出发,看看怎么实现语言的切换。首先建立一个新工程。放置如上图的组件: MainMenu1: TMainMenu; File1: TMenuItem; Exit1: TMenuItem; Label1: TLabel; Button1: TButton; CheckBox1: TCheckBox; CheckB... 阅读全文
posted @ 2012-10-09 12:04 马儿快跑 阅读(1328) 评论(1) 推荐(0) 编辑
上一页 1 2 3 4 5 6 ··· 16 下一页