delphi里面怎么截取字符串？

Question

比如有这个几个字符串:
str1: 
"C:\Program Files\Microsoft SQL Server\90\Tools\Binn\VSShell\Common7\IDE\ssms.exe"/dde
str2:
"D:\安装\shreader\shreader.exe" "%1"
str3:
"C:\Program Files\Borland\BDS\4.0\Bin\BDSLauncher.exe" "C:\Program Files\Borland\BDS\4.0\Bin\bds.exe"/np我想截取第一个双引号中的字符，比如：str1: 
C:\Program Files\Microsoft SQL Server\90\Tools\Binn\VSShell\Common7\IDE\ssms.exe
str2:
D:\安装\shreader\shreader.exe
str3:
C:\Program Files\Borland\BDS\4.0\Bin\BDSLauncher.exe其他的不管有多长都不管，我略懂copy函数可以截取一些

Answer 1

delete(str,pos(''''),2);
delete(str,pos(''''),10000);
showmessage(str);

Answer 2

pos打漏了str  
  delphi]delete(str,pos('''''',str),2);
  delete(str,pos('''''',str),10000);
  showmessage(str);

Answer 3

posex找子串'"'所在的位置
2个位置之间就是你要的结果了，用copy取得

Answer 4

截取无外乎用Copy,Delete,Pos这3个基础的函数!熟练掌握这3个函数，任何截取都不是问题

Answer 5

先把第一个"删除了，然后COPY(STR, 1， POS('"',STR) - 1)

Answer 6

谢谢大家了，这次学习了好几个函数:delete,posex,copy,rightstr,leftstr我还想问一下，当我截取出来，比如
C:\Program Files\Microsoft SQL Server\90\Tools\Binn\VSShell\Common7\IDE\ssms.exe
我看看这个文件是否存在，要怎么写？

Answer 7

if FileExists(sFileName) then
  ShowMessage(sFileName + '存在');