字符串函数问题，帮帮忙。
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=Sa;Initial Catalog=ABC_HR;Data Source=IBM-001;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096;Workstation ID=IBM-001;Use Encryption for Data=False;Tag with column collation when possible=False


我想在上面的字符串中找出Data Source=IBM-001;中的IBM-001，然后放到EDIT1.TEXT中。请问要怎么做？

也就是说，我要把服务器，用户名等信息截取出来。请问怎么截取？

[解决办法]

copy(,pos( 'Workstation ID= ',)+15,pos( ';Use Encryption for Data, ')-pos( 'Workstation ID= ',)
[解决办法]
建议你先按照;把所有元素区分出来,然后按照=区分每个元素中的字段.不知道这样说你能明白吗?