我想尋求幫助。
我的任務是將 FighterID 保存到一個陣列中。該資料將用于制作戰斗機 1 ,戰斗,戰斗機 2(資料已經根據他們的勝利降序排序)。
我只能找到使用二維陣列的方法,我想湯姆使用一維陣列。
我不知道如何將特定列資訊保存到陣列中。我嘗試了以下方法并收到以下錯誤:
[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
uj5u.com熱心網友回復:
請嘗試以下代碼:
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;
我認為這將幫助您弄清楚。
轉載請註明出處,本文鏈接:https://www.uj5u.com/ruanti/516713.html
