我在程序中是很多的输出项,保存在selstring,而要用汉字表示的保存在selstring1中 if (listbox1.Selected[0]) then begin selstring:=selstring+'zgbh'+','; selstring1:=selstring1+'职工编号'+','; end; if listbox1.Selected[1] then begin selstring:=selstring+'xm'+','; selstring1:=selstring1+'姓名'+','; end; if listbox1.Selected[2] then begin selstring:=selstring+'xb'+','; selstring1:=selstring1+'性别'+','; end; query1.SQL.Add('select '+selstring); query1.SQL.Add('as '+selstring1);我该怎么处理?
if (listbox1.Selected[0]) then
begin
selstring:=selstring+'zgbh'+',';
selstring1:=selstring1+'职工编号'+',';
end;
if listbox1.Selected[1] then
begin
selstring:=selstring+'xm'+',';
selstring1:=selstring1+'姓名'+',';
end;
if listbox1.Selected[2] then
begin
selstring:=selstring+'xb'+',';
selstring1:=selstring1+'性别'+',';
end;
query1.SQL.Add('select '+selstring);
query1.SQL.Add('as '+selstring1);我该怎么处理?
strings1[0]:='职工编号'
strings1[1]:='姓名'
strings1[2]:='性别'
strings1[n]:=....
分别和以下的字段对应:
strings2[0]:='zgbh'
strings2[1]:='xm'
strings2[2]:='xb'
strings2[n]:=....
这样子用for循环处理就很方便了,
desString:= copy(SourString,1,length(SourString)-1);
desString:目的串
SourString:源串ps.谢谢wudi_1982(啥都不会) 。