我試圖從 Delphi 中的 ADOQuery 獲得結果。我為根據自定義 ID 從表中獲取名稱撰寫了此函式。
function GetNameByID(Id : Integer) : string;
var query : string;
Begin
ShowMessage(GetDBGridViewIndex().ToString);
query := 'SELECT Name FROM Table1 WHERE ID=' IntToStr(Id);
With ADOQuery do
Begin
try
SQL.Clear;
SQL.Add(query);
Open;
First;
Result:= // Need Get Result;
finally
Close;
end;
End;
ShowMessage(result);
End;
但我不知道如何從 ADOQuery 回傳結果。
uj5u.com熱心網友回復：
TADOQuery 是 的TDataset后代。您可以使用First、Next、Prior和Last方法遍歷結果記錄，并使用Eof確定是否已到達末尾。
在每個結果記錄中，您可以通過以下方式訪問欄位：
Fields[Index].AsString
Fields[Index].AsInteger
...
或者
FieldByName(FieldName).AsString
FieldByName(FieldName).AsInteger
...
在這種情況下，您可以使用以下命令訪問結果：
Result := Fields[0].AsString;
Result := FieldByName('Name').AsString;
查詢后Open，游標指向第一條記錄。您不需要First在Open.
轉載請註明出處，本文鏈接：https://www.uj5u.com/shujuku/460930.html