Using Windows XP Pro, Laz vrs 1.4.4, FPC vrs 2.6.4, windows unit
There are two problems with the following code:
1) If PageMemo.WordWrap is set as either true or false, it sets the WordWrap properly, but it also erases all RTF formatting for the entire document.
2) Setting PageMemo.scrollbars to ssboth or ssvertical sets them properly, but they behave as "auto" parameters. My impression of non-auto function is that the bar or bars should always be visible.
procedure TCmdForm.MnuWrapClick(Sender: TObject);
begin
if PageMemo.WordWrap=true
then begin
PageMemo.WordWrap:= false;
PageMemo.scrollbars:= ssboth;
MnuWrap.caption:= 'Wrap On';
end
else Begin
PageMemo.WordWrap:= true;
PageMemo.scrollbars:= ssvertical;
MnuWrap.caption:= 'Wrap Off';
end;
end;
Rick