本来はTMemoの派生クラスをコンポーネントとして作るべきですが、とりあえず
例の様にすれば大丈夫です。等幅フォント以外では文字数は目安にしかなりませ
んが。

Original document by ataru(SGR03043)

procecure MemoTabChange(memo : TMemo; width : integer);
var
  tabwidth : longint;
begin
  tabwidth := width * LoWord(GetDialogBaseUnits) div 2;
  memo.Perform(EM_SETTABSTOPS, 1, longint(@tabwidth));
  memo.Invalidate;
end;

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum FDELPHIに寄せられる質問の中から、よくある質問への回答を FDELPHIのメンバーがまとめたものです。　したがって、これらの回答はボーランド株式会社がサポートする公式のものではなく、掲示されている内容についての問い合わせは受けられない場合があります。