请教AppendRecord的参数(Incompatible types)?(50分)

H

hy153

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #1

var S:Array [0..10] OF String
begin
S[0]:='1';
....
S[10]:='10';
Table1.AppendRecord(S); // [Error] Unit1.pas(43): Incompatible types
End

 

S

Slong

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #2

这是AppendRecord函数的原形：
AppendRecord(const Values: array of const);
Values参数是const的，所以不能用变量，试一下以下方法：
Table1.AppendRecord(['1', '2', '3', '4', '5', '6', '7', '8', '9', '10']);

 

Y

yhaochuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-23

• #3

procedure TForm1.Button1Click(Sender: TObject);
var
a,b:string;
begin
a:='a';
b:='a';
query1.AppendRecord([a,b]);
end;