Subject | Display memo text in grid and Access violation. |
---|---|
Author | Don Gollahon |
Post date | 2001-02-02T00:15:25Z |
I have a DBGrid that is showing some records from an IB6 table. I'm using
IBOQuery.
There is a memo field in this table that has data stored originally from a
RichEdit object.
I don't want the "(MEMO)" to display but the actual text from the memo with
no format codes. But I also do not want to lose the format codes from the
original memo.
So far I've done the following:
procedure Tdmdatamodule.qryDESCRIPTIONGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
var
vstr : string;
begin
DisplayText := True;
form1.RichEdit1.Text := Sender.Asstring;
text := form1.RichEdit1.Text;
end;
Where RichEdit1 is a hidden component on the form that has Plaintext set to
true.
It appears to work fine. But when I close the app I get an access
violation.
Any ideas?
I use Delphi 4, IBO 3.6.
Don Gollahon
(dlgllhn@...)
"What in Eternity does it matter?"
IBOQuery.
There is a memo field in this table that has data stored originally from a
RichEdit object.
I don't want the "(MEMO)" to display but the actual text from the memo with
no format codes. But I also do not want to lose the format codes from the
original memo.
So far I've done the following:
procedure Tdmdatamodule.qryDESCRIPTIONGetText(Sender: TField;
var Text: String; DisplayText: Boolean);
var
vstr : string;
begin
DisplayText := True;
form1.RichEdit1.Text := Sender.Asstring;
text := form1.RichEdit1.Text;
end;
Where RichEdit1 is a hidden component on the form that has Plaintext set to
true.
It appears to work fine. But when I close the app I get an access
violation.
Any ideas?
I use Delphi 4, IBO 3.6.
Don Gollahon
(dlgllhn@...)
"What in Eternity does it matter?"