关于"tab"的问题请教高手！

Question

我刚刚试过了，Memo中的Tab也是8个字符
不信你再试试，要按Ctrl+TAB,否则只是焦点转移

Answer 1

资料：
调整Memo的Tab的距离
procedure TForm1.FormCreate(Sender: TObject);
var
  DialogUnitsX:LongInt;
  PixelsX:LongInt;
  i:integer;
  TabArray:array[0..4] of integer;
begin
  Memo1.WantTabs:=true;
  DialogUnitsX:=LoWord(GetDialogBaseUnits);
  PixelsX:=20;
  for i:=1 to 5 do
    TabArray[i-1]:=((PixelsX*i)*4) div DialogUnitsX;
  SendMessage(Memo1.Handle,EM_SETTABSTOPS,5,LongInt(@TabArray));
  Memo1.Refresh;
end;

Answer 2

我试过Memo中的TAB也是8个字符。