简单的问题

Question

我有下面这样一个字符串：
1111 某某某 1
中间的字符是TAB键分开的，想把这三列取出来放在三个变量中就行了，其实这一行分别对应了数据库的三列，可是在文本中我做了好长时间取不对，
注意：中间的分隔符是TAB键，当中的一列是中文

Answer 1

str := '1111 某某某 1;
n := pos(Char(vk_Tab),str);
string := copy(1,n-1);
   Delete(str,1,n);
n := pos(Char(vk_Tab),str);
string := copy(1,n-1);
   Delete(str,1,n);
n := pos(Char(vk_Tab),str);
string := copy(1,n-1);

Answer 2

if 字符=#9 then ......

Answer 3

procedure TForm1.Button1Click(Sender: TObject);
var s,tmp:string;
    s1,s2,s3:string;
    i:integer;
begin
    s:='1111    某某某  1';
    s:=trim(s);
    i:=pos(' ',s);    s1:=copy(s,1,i);
    delete(s,1,i-1);    s:=trim(s);
    i:=pos(' ',s);
    s2:=copy(s,1,i-1);
    delete(s,1,i-1);    s:=trim(s);
    s3:=trim(s);
    caption:=s1 + ',' + s2 + ',' + s3;
end;