Never mind. I just figured it out...
procedure TCmdForm.MnuBreakClick(Sender: TObject);
var SS: TStringStream;
begin
SS:= TStringStream.Create('{\rtf1 {\page }}');
try PutRTFSelection(PageMemo, SS);
finally
SS.Free;
end;
end;
PutRTFSelection is the method posted in the thread titled:
"Inserting, Saving and Loading Images"
Rick