摘要： 第三方控件EHLIB中的dblookupcomboboxeh,给它的ListSource指定一个数据源,然后它有一个listField属性,要什么列就可以写在那里,然后用";"分隔开来,就可以有这样的效果了,Form1.DBLookupComboboxEh1.ListSource:=DataModule1.DataSource1;Form1.DBLookupComboboxEh1.ListField:='编号;名称';//要显示的列Form1.DBLookupComboboxEh1.KeyField:='编号';//实际的值Form1.DBL 阅读全文

摘要： Delphi2010 DBExpress+MySQL 程序的打包delphi链接mysql数据库可以用TSimpleDataSet+TSQLConnection控件1) TSQLConnection设置: ConnectionName: MySQLConnectionDriver->HostName一般是localhostDatabase: 所要用到的数据名2)TSimpleDataset设置:Connection: 选择SQLConnection1Dataset里点击CommandText会出现所选Database的table field列表, 点击生成sql语句3) 设置完这个TSi 阅读全文

摘要： 将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 阅读全文

摘要： 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. 阅读全文

摘要： TChart是一个功能强大的绘制各种数据图表的控件，使用它可以很方便的绘制出各种数据图表。下面就来详细介绍它的使用。 常用属性：AxisVisible:Bool型用于显示或隐藏图表上的四个坐标轴以及显示区域的曲线框BufferDisplay:Bool型默认为Ture.可以提高图像的显示速度消除闪烁MaxPointPerpage：默认为0，用来设置每页可以显示的点的数量，设置了该属性之后，除最后一页外，每页都是以固定的点数显示。（页：表示的是TChart的大小）SeriesList：该属性为一指针数组，指向的是TChart中的Series。获得TChart中的Serries数组，也有三种方法 . 阅读全文

摘要： 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 阅读全文

摘要： 嗯，多简单的事呀。。。不过是SQL语句的导入导出嘛。。。我开始真的是这么想的。。。 做的时候发现，Access没有导出SQL的功能，不想用第三方的东西。。。这里简单描述下我是怎么做的吧！1、在access中建个视图，得到自己想要的数据；2、把这个视图查询到的数据，导出成文本格式，我用的是CVS；3、用文本编辑器，把导出的数据 处理成 SQL语句（多亏了vim，用其他编辑器都不知道怎么办才好，打开都成问题，更不用说快速编辑了。。。UE打开后，滚轮都滚不动的说。。。）；4、用mysql命令，导入mysql。思路很清晰，我就这么做了。直到最后一步，才发现问题：数据量太大（68万条），这一步很慢很慢。 阅读全文

摘要： 假如源数据库名称为“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了。 阅读全文

摘要： 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); 阅读全文

摘要： 越来越多的程序使用了多国语言切换，虽然DELPHI自带多语言包的添加和配置， 但是那种方法在切换语言时界面会出现闪烁，而且实现起来很麻烦，这里我介绍给大家的是利用INI文件来读取界面的语种文字， 用这种方法，不但简单易行，而且在切换的时候不会出现界面的闪烁。 我们从一个例子出发，看看怎么实现语言的切换。首先建立一个新工程。放置如上图的组件： MainMenu1: TMainMenu; File1: TMenuItem; Exit1: TMenuItem; Label1: TLabel; Button1: TButton; CheckBox1: TCheckBox; CheckB... 阅读全文