掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
DBGridにmemo型表示 (ID:36246)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ご意見参考に色々調べて下記で共通化成功しました。 Absolute Databaseを使っているのでTABSBLOBStreamにしないとならなかったようです。 Procedure bin_GridLowDisplay(Sender: TField; var Text: String; DisplayText: Boolean); var BlobMemo : TABSBLOBStream; SL : TStringList; test,test2 : String; begin if Sender is TMemoField then begin BlobMemo := TABSBLOBStream.Create(TBlobField(Sender),bmRead); SL := TStringList.Create; SL.LoadFromStream(BlobMemo); if SL.Count > 0 then Text := SL[0]; BlobMemo.Free; SL.Free; end; end; ありがとうございました。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.