掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TDBEditにChar型の文字列を格納した際のスペースについて (ID:41379)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
nobukoshi802さん、KHE00221さん回答ありがとうございます。 どうしても、SQL文やコンポーネントの作成をやりたくなかったので、TClientDataSetの項目が持っているOnGetTextイベントでTrim処理を行うようにしました。 ソースは以下の通りです。 procedure TmdlDatabase.TrimChar(Sender: TField; var Text: string; DisplayText: Boolean); var trimTxt : String; begin try trimTxt := TrimRight(Sender.AsString); Text := trimTxt; except on E: Exception do //-- エラー処理 end; end; 結局自己解決になってしまいましたが、ご回答いただいたみなさん勉強になりました。ありがとうございました。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.