adodatasetのstateを画面に表示したい

godon 2007-09-13 10:52:48 No: 27748 IP: 192.*.*.*

いつもお世話になっております。
すみません簡単だと思うのですが。
adodataset.stateの状態をedit1.textなどに入れ込みたいのですが。
edit1.text:=adodataset.state;とすると
'String' と 'TDataSetState' には互換性がありませんとでます。
無理やりif adodataset.state=dsedit then edit1.text:='dsedit'なんて考えたりしたんですが、すんなり型変換できないものでしょうか？

編集削除

無理なんだい 2007-09-13 11:29:37 No: 27749 IP: 192.*.*.*

すんなりとネェ…
type
  TDataSetState = (dsInactive, dsBrowse, dsEdit, dsInsert, dsSetKey, dsCalcFields, dsFilter, dsNewValue, dsOldValue, dsCurValue, dsBlockRead, dsInternalCalc, dsOpening);
const
  AryDataSetState: array[0..12]of string = ('dsInactive','dsBrowse','dsEdit','dsInsert','dsSetKey','dsCalcFields','dsFilter','dsNewValue','dsOldValue','dsCurValue','dsBlockRead','dsInternalCalc','dsOpening');
begin
  if AdoDataSet.State = dsEdit then
   Edit1.Text := AryDataSetState[Ord(AdoDataSet.State)];
end;

編集削除

godon 2007-09-13 11:55:55 No: 27750 IP: 192.*.*.*

ご返事ありがとうございます。
すんなりと…はいかないようですね。
すみません。なんかの関数ひとつでいけると思ってましたんで…。
参考になりました。

編集削除