I write a short-sample demo with TRichmemo componen using Lazarus Codetyphon 4.8 t.
Works fine here.
First of all, there is no such thing as Lazarus Codetyphon. There is Lazarus and there is Codetyphon (based on Lazarus). This forum is for Lazarus.
Second... you don't initialize your print_parameters. For me your examples printed 4 pages until I initialized the print_parameter with #0s before setting the options.
Fillchar(print_parameters, SizeOf(print_parameters), #0);