21 août 2020
Comment zoomer un RichEdit
Ces quelques lignes de code,repondent à une question que je me.pose depuis 2006 procedure SetZoom(const RichEdit: TCustomRichEdit; const Value: Integer); const EM_SETZOOM = (WM_USER + 225); begin SendMessage(RichEdit.Handle, EM_SETZOOM, Value, 100); end;...