在线等待！如何得到一个字段的前半部分?

Question

字段以'/'隔开，我如何得到它的前半部分？如：i am a student/我是一个学生???
谢！！

Answer 1

字段以'/'隔开，我如何得到它的前半部分？如：i am a student/我是一个学生???
我想得到‘i am a student’,怎么办？？
谢！！

Answer 2

用Pos函数找到/ 的位置，然后再用Copy函数Copy前面的部分。

Answer 3

copy('i am a student/我是一个学生',1,pos('/',i am a student/我是一个学生))

Answer 4

给你一个你需要的标准的参考答案　　　　　　　　　　　　　　　　　◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆
　　　　　　　　　　　　　　　　　　　　www.delphiredfox.com Delphi红狐网
　　　　　　　　　　　　　　　　　◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆◆　　　　　　　　　　　　　　　　　　动态创建tedit控件和分解字符串例程
　　　　　　　　　　　　　　　　　　　　　　　　　高红岩 
procedure strs(var str:string);
var
edit:tedit;
i:integer;
str1,turnstr:string;
begin
if pos(',',str)<>0 then
begin
i:=pos(',',str);
turnstr:=copy(str,1,i-1);
edit:=tedit.Create(application);
edit.parent:=form1;
edit.Text:=turnstr;
edit.Left:=j;
edit.top:=j;
j:=j+10;
delete(str,1,i);
strs(str);
end;
end;◆◆www.delphiredfox.com Delphi红狐网◆◆procedure TForm1.Button1Click(Sender: TObject);
var
str:string;
begin
j:=0;
str:=edit1.text+',';
strs(str);
end;
{在edit1中添入以'，'号为分隔符的字符串，最后一个字符后面不加'，'号} end.

Answer 5

chechy(简简单单的活)的理论和delphi_xizhousheng(西周生)的实践
结合起来就好了！

Answer 6

同意delphi_xizhousheng(西周生) 的方法！
有问题请发信息到我的E-mail:[email protected]

Answer 7

我试过了，不对！而且strs()函数不可识别！

Answer 8

delphi_xizhousheng(西周生) 同意！
反正就是用copy()函数来处理了。看看帮助，很简单的！

Answer 9

谢谢各位！我试了delphi_xizhousheng(西周生)  的方法，得到了i  am  a  student/,可我只想得到i  am  a  student呀？？怎么办？？？对不起了！哪位好心人帮帮我？

Answer 10

试
copy('i am a student/我是一个学生',1,pos('/',i am a student/我是一个学生)-1)