怎么用daoquery或daotable控件直接从access数据库中读取指定的记录值 (50分)

  • 主题发起人 主题发起人 niceboy911
  • 开始时间 开始时间
N

niceboy911

Unregistered / Unconfirmed
GUEST, unregistred user!
如题,我在学习精确打印,想把打印作标x,y值直接从access数据库中调用,表为data.mdb
中的table表,格度如下:
字段名: 格式 x y 内容
格式1 100 200 中国
格式2 500 1000 中华人民共和国
怎么才能调用x,y的值到
printer.Canvas.TextOut(x,y,‘中……’)中,我想这样做可以在软件编译可以修改
x,y值,或是有没有更好的调用方法,请尽量用dao组件完成,谢谢
 
faint!你的要求不是普通的奇怪^_^
居然想在TextOut中用SQL!
 
那应该怎么办呢?
 
while not adoquery1.eof do
begin
x:=adoquery1.FieldByName('x').AsInteger ;
y:=adoquery1.FieldByName('y').AsInteger;
str:=adoquery1.FieldByName('内容').AsString;
printer.Canvas.TextOut(x,y,str);
adoquery1.next;
end;
 
直接在printer.Canvas.TextOut(调X代码,调Y代码,‘文字代码’)调用也可以,我只想实际
可以更改打印参数,怎么才可以?
 
各位老大,我问的就是怎么把值从表中提出来,显示在panel上,有会的吗?
 
function GetRecordSet(SQLString:String):TADODataSet;
//根据SQL语句取得记录集
begin
try
result:=TADODataSet.Create(nil);
with DMForm do // DMForm为数据窗体
begin
ADOCN.Errors.Clear; //ADOCN为TADOConnection
ADOCM.CommandText := SQLString; //ADOCM为TADOCommand
result.Recordset := ADOCM.Execute;
end;
except
result:=nil;
end;
end;
调用可以用
lable1.caption:=GetRecordSet('select 内容 from table where 格式=''格式1'';').Fields[0].asstring;
 
后退
顶部