mysql - 从简单的选择查询 TADOQuery Delphi 捕获值

Question

我在返回使用 TADOQuery 从简单 SELECT 查询获取的值时遇到问题

下面是我的代码:

  dbWizconQuery.SQL.Clear;
  dbWizconQuery.SQL.Add('SELECT * FROM test');
  tb_wizconValues.Items.Add('' + dbWizconQuery.SQL.GetText);

  dbWizconQuery.ExecSQL;
  processed := IntToStr(dbWizconQuery.FieldByName ('input' ).Value);
  tb_wizconValues.Items.Add('' + processed);

我在文本框中得到了第一个打印结果，带有 SQL 字符串 但后来我没有得到值(value)。

你能明白为什么会这样吗？

已处理是一个字符串，输入是一个 INT(5)，结果是 AsString

亲切的问候，

约旦

Answer 1

在delphi中ExecSQL用于当你想做一个

UPDATE,INSERT,DELETE

当您想要进行选择调用时打开或只是将查询设置为

active := true;

您可以使用以下代码返回多个结果:

dbWizconQuery.SQL.Clear;
dbWizconQuery.SQL.Text := 'SELECT * FROM test';
dbWizconQuery.Open; // or dbWizconQuery.Active := True;
while not dbWizconQuery.eof do
begin
  ShowMessage(dbWizconQuery.FieldByName('FieldName').AsString); // this shows the fields value
  dbWizconQuery.Next; //use this line or you will get an infinite loop
end;
dbWizconQuery.Close; //closes the dataset

对于执行 UPDATE、INSERT、DELETE 等语句，请像这样使用它:

dbWizconQuery.SQL.Text := 'DELETE FROM test WHERE ID = 1';
dbWizconQuery.ExecSQL;