С помощью API-функции SendMessage можно задать поля в
Memo-компоненте. Если необходимо, например, сделать
отступ в 20 пикселей слева то можно это сделать
следующим образом:
var Rect: TRect;
begin
SendMessage( Memo1.Handle, EM_GETRECT, 0, LongInt(@Rect));
Rect.Left:= 20;
SendMessage(Memo1.Handle, EM_SETRECT, 0, LongInt(@Rect));
Memo1.Refresh;
end;