Пример на Delphi, как можно сделать отступ сверху и слева в Memo
var
Rect: TRect;
begin
SendMessage(Memo.Handle, EM_GETRECT, 0, LongInt(@Rect));
Rect.Left := 10; // отступаем на 10 пикселов слева
Rect.Top := 10; // отступаем на 10 пикселов сверху
SendMessage(Memo.Handle, EM_SETRECT, 0, LongInt(@Rect));
Memo.Refresh;
end;
Rect: TRect;
begin
SendMessage(Memo.Handle, EM_GETRECT, 0, LongInt(@Rect));
Rect.Left := 10; // отступаем на 10 пикселов слева
Rect.Top := 10; // отступаем на 10 пикселов сверху
SendMessage(Memo.Handle, EM_SETRECT, 0, LongInt(@Rect));
Memo.Refresh;
end;
delphi 7 скачать бесплатно 
пишем текстовый редактор Embarcadero RAD функції 