Hi:
I'm using a TDBWPRichText. I'm using the code below connected to a button to toggle bold text. When I change bold text this way and then post the changes, they do not stick.
Code
procedure TEditContactDlg.DoBold;
begin
if afsBold in DBWPRichText1.CurrAttr.Style then begin
DBWPRichText1.CurrAttr.DeleteStyle([afsBold]);
end else begin
DBWPRichText1.CurrAttr.AddStyle([afsBold]);
end;
DBWPRichText1.SetFocusValues(True);
end;
It works fine if I actually enter a keystroke into the TDBWPRichText control, but if I only change the bold qualities it does not.
Any ideas why, or how to make this happen?
Thanks,
Dale