我在表里取一字段值为s1+s2-s3,我如何转换成s1.value+s2.value-s3.value

Question

谢谢

Answer 1

不好意思啊，我以为能用这么少字说好这个问题的
就是我从table里取一个值，该值为 s1+s2-s3
我想把这个值用函数转换成  s1.value+s2.value-s3.value  
就是在s1 ,s2,s3,后面都加上  ".value"字符串
怎么样办到呢

Answer 2

我的意思就是 怎么把字符串 “s1+s2-s3” 转换成字符串 "s1.value+s2.value-s3.value"

Answer 3

1:在Delphi处理
var
i:integer;
str,str1:string;str:='S1+S2-S3'+'.values';
 for i:=1 to length(str) do
   if (copy(str,i,1)='+') or (copy(str,i,1)='-') then
     str1:=str1+'.values'+copy(str,i,1)
   else
     str1:= str1+copy(str,i,1);2：数据库中处理(此处假设为MSSQL)
select replace(replace('S1+S2-S3','+','.values+'),'-','.values-')+'.values'

Answer 4

谢谢---三友，问题出来了，如果字符串是   "s1+s2-10" 
我想转成字符串   "s1.value+s2.value-10"  又该怎么弄了？

Answer 5

1:在Delphi处理
var
i:integer;
str,str1:string;
bFag:boolean;bFag:=false;
 str:='S1+S2-10';
 for i:=1 to length(str) do
  begin
   if (copy(str,i,1)>='A') and not bFag then
     bFag:=true;
   if ((copy(str,i,1)='+') or (copy(str,i,1)='-')) and bFag  then
     begin
     str1:=str1+'.values'+copy(str,i,1);
     bFag:=false;
     end else
     str1:= str1+copy(str,i,1);
   if (i=length(str)) and bFag then
      str1:=str1+'.values';

Answer 6

谢谢啦，我一直还想着要copy和pos函数来完成，原来这样就行了。谢谢