如何指定TMemo或TRichEdit的制表符的长度

  int TabWidth = 9;  // new tab width (9 spaces) 
 TabWidth = LOWORD(GetDialogBaseUnits()) * TabWidth * 0.5; 

 SendMessage(Memo1->Handle, EM_SETTABSTOPS, (WPARAM)1, (LPARAM)&TabWidth);

原始出处  http://bcbjournal.org/bcbcaq/?loc=edits&caq=30

CAQ #30: Specifying the Tab Spaing in a Memo

DESCRIPTION: You can adjust the tabulation spacing in Memo controls by sending it the EM_SETTABSTOPS message. The wParam member specifies the number of tab stops contained in the lParam member. If the wParam is set to zero, the long parameter is ignored and default tab stops are set at every 32 dialog box units. If set to one, "tab stops are set at every n dialog box units, where n is the distance pointed to by the ldpwTabs parameter."  What this means is that for most situations, you'd specify "1" as the wParam, and a calculated lParam member using the GetDialogBaseUnits() API function. NOTE: Some the handle of the Memo or RichEdit will be destoyed/recreated by changing some properties. These include WordWrap, ScrollBars, and HideScrollBars, among possibly others. As such, change all relevant properties first, then set the tab widths. (This is in general for any edit control message). KEYWORDS: EM_SETTABSTOPS,  GetDialogBaseUnits()        //---------------------------------------------------------------------------  int tab_width = 9;  // new tab width (9 spaces)   tab_width *= LOWORD(GetDialogBaseUnits()) * 0.5;   SNDMSG(Memo1->Handle, EM_SETTABSTOPS, (WPARAM)1, (LPARAM)&tab_width);     //---------------------------------------------------------------------------