adoquery.sql里的字符串是什么类型？为什么不能在edit.text中显示？

[BeyondSky]

[angshuangxi]

是TStringList

[BeyondSky]

意见不同一

[g_dragon]

EDit1.Text:=AdoQuery1.SQL.Text

[poleax]

up

[抱朴守拙]

adoquery.sql里的字符串是String类型,
EDit1.Text:=AdoQuery1.SQL.Text

[gaoql]

错，应该是TStrings类型的
就是字符串列表啊

[kuangning]

用memo1.lines.text := AdoQuery1.SQL.Text
肯定能行

[wave_calmly]

for i = 0 to AdoQuery1.SQL.Couunt -1 do
edit1.Text := edit1.Text + Adoquery1.SQL[i];

[hellenlong]

TString类型

[wave_calmly]

TADOQuery = class(TCustomADODataSet)
private
FSQL: TStrings;
FRowsAffected: Integer;
function GetSQL: TStrings;
procedure SetSQL(const Value: TStrings);
protected
procedure QueryChanged(Sender: TObject);
public
constructor Create(AOwner: TComponent); override;
destructor Destroy; override;
function ExecSQL: Integer; {for TQuery compatibility}
property RowsAffected: Integer read FRowsAffected;
published
property CommandTimeout;
property DataSource;
property EnableBCD;
property ParamCheck;
property Parameters;
property Prepared;
property SQL: TStrings read GetSQL write SetSQL;
~~~~~~~~
end;


TStringList = class(TStrings)
~~~~~~~~~~~ ~~~~~~~~
private
FList: PStringItemList;
FCount: Integer;
FCapacity: Integer;
FSorted: Boolean;

....