delphi Tsampledataset 问题 数据库

Question

我用delphi的Tsampledataset 连 数据库 执行 select count（*） as maillognum from maillog，如何取maillognum的值到界面显示

Answer 1

补充，代码如下：
 SimpleDataSet1.Connection.ConnectionName:='MySQLConnection';
 SimpleDataSet1.Connection.DriverName:='MySQL';
 SimpleDataSet1.Connection.GetDriverFunc:='getSQLDriverMYSQL50';
 SimpleDataSet1.Connection.KeepConnection:= true;
 SimpleDataSet1.Connection.LibraryName:='dbxopenmysql50.dll';
 SimpleDataSet1.Connection.VendorLib:='libmysql.dll';
 SimpleDataSet1.Connection.Params.Values['DriverName']:='MySQL';
 SimpleDataSet1.Connection.Params.Values['Database']:='mydb';
 SimpleDataSet1.Connection.Params.Values['HostName']:='192.168.1.86';
 SimpleDataSet1.Connection.Params.Values['User_Name']:='nm';
 SimpleDataSet1.Connection.Params.Values['Password']:='pwd';
 SimpleDataSet1.Connection.LoginPrompt := false;
 SimpleDataSet1.Connection.Connected := true;
 用dbgrid做显示

Answer 2

select count（*） as maillognum from maillog只是得到一个值不是一个多数据记录的数据集,为什么用DBGrid来显示呢
输出原型的(这里是integer)型的
SimpleDataSet1.FieldByName('maillognum').Value输出string型的
SimpleDataSet1.FieldByName('maillognum').AsString不知道Tsampledataset是不是和TDataSet一样用啊,没用过,上面的仅供参考 呵呵

Answer 3

楼上的不行哦，Tsampledataset的datasource有dataset属性，但是得不到值哦

Answer 4

  with SimpleDataSet1 do
  begin
    close;
    DataSet.CommandText:='select count (*) as maillognum from maillog';
    DataSet.Open;
    showmessage(DataSet.fieldByName('maillognum').AsString);
  end;
试试这个