一、功能概述
Controx主要通过ADO方式与数据库进行交互,即通过两个函数(SQLExecute 和SQLSelect)写入和读取。Controx向Access数据库中写入数据,即把标签的值存储到数据库中,也可以从数据库中读取数据赋给标签。不需要做任何连接,方便,快捷。
二、具体实现
1、在开发环境中建立三种类型标签(模拟量、开关量、字符串)
本例中要写入的标签为:A,D,S还有文本类型,日期时间类型等。

2、在ACESS数据库中定义表
(*注意数据类型)
3、在开发环境中放一按键,执行写入动作

按键抬起中代码:
var
s: string;
begin
s := 'Insert Into myTable(日期时间字段,模拟量字段,开关量字段,字符串字段1,字符串字段2,字符串字段3,用户名)'
+' values('''+DateTimeToStr(now)+''','+FloatToStr(A.value)+','''+BoolToStr(D.value)+''','''+S.value+''','''+sEdt.Text+''',''我的字符串3'','''+GetCurrentUser+''')';
iReturn.value := SQLExecute('MDB','','',GetProjectPath+'test.mdb','','',s);
end;
4、在开发环境中再放入一个按键,执行读取操作
读回的数据可用数据图表来显示,如图:

下载这个演示工程