将某些数据从 DBGrid 保存到数组中答案

【问题标题】：Saving certain data into an array from a DBGrid将某些数据从 DBGrid 保存到数组中
【发布时间】：2022-10-14 18:52:23
【问题描述】：

我想寻求帮助。我的任务是将 FighterID 保存到一个数组中。此数据将用于制作战斗机 1 ,fight, 战斗机 2 （数据已经按照他们的胜利降序排序）我只能找到使用二维数组的方法，我想汤姆使用一维数组。我不知道如何将特定的 coloumbs 信息保存到数组中。我已经尝试了以下并得到以下错误代码

[dcc32 错误] Presets.pas(53): E2010 Incompatible types: 'string' and 'procedure, untyped pointer or untyped parameter'

 procedure TPresetsForm.FormActivate(Sender: TObject);
var I:integer;
var s:string;
begin
qry1.Close;
qry1.sql.add('SELECT FighterName,Wins,Sponser FROM Preset_Fighters');
qry1.Active:= true;
qry1.Open;
tbl111.Sort:= 'Wins DESC' ;

    for I := 1 to 6 do
      begin
       Fightorder[I]:=(Presets.PresetsForm.dbgrd_info.Columns[0].FieldName:=('FighterID');
      end;
end;

我不知道这是否是获取 FighterID 示例（MT54）的正确方法。所有数据均来自 MS Access，我希望我提供了足够的信息谢谢帮助XD

【问题讨论】：

FighterID 似乎不是您的 SQL 语句的一部分
请扩展您的代码以显示Flightorder 声明

标签： arrays delphi delphi-2010 delphi-10-seattle

【解决方案1】：

请尝试以下代码：

var
  Fightorder: array[1..6] of string;

procedure TPresetsForm.FormActivate(Sender: TObject);
var
  I: Integer;
begin
  qry1.Close;
  qry1.Sql.Add('SELECT FighterName, Wins, Sponser FROM Preset_Fighters');
  qry1.Active := True;
  qry1.Open;
  for I := 1 to 6 do
  begin
    Fightorder[I] := qry1.Fields[0].AsString;
    qry1.Next;
  end;
end;

我认为这将帮助您弄清楚。

【讨论】：