关于edit显示的有关问题

关于edit显示的问题
输入Edit控件里的数字自动改变成两个数字为一组，类似十六进制的数字，
例如：
输入123456 在控件里显示 12 34 56 ，
或者简单的说 如何让Edit控件里的数字两个为一组，中间是空格，困扰我好久了。
只有24分，全部分了。

[解决办法]

Delphi(Pascal) code

//我来完善一下function TForm1.SplitEditText(aText: string): string;var  i, j: Integer;  //j变量可以保证从右数满足两位一空格begin  j := 0;  for i := Length(aText) + 1 downto 2 do  begin    Inc(j);    if (j Mod 2 <> 0) then    Insert(' ', aText, i);  end;  Result := aText;end;