如何在String中取得一个小的String? 用copy('asf 321 98767',5,3)就行了。看看delphi里面字符串操作的函数吧 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 var s,a:string;begin s:='asf 321 98767'; a:=rightstr(s,length(s)-pos(' ',s)); a:=leftstr(a,pos(' ',a)-1);end; 年底到了,合同期也就要到了,我不知道签还是不签?(散分) Delphi中线程锁表问题 300分求解 第一次用delphi,API问题100分在线等待 请教!如何在access中存储和读取图象 简单问题:如何动态创建treeview的父节点及其多重子节点?100分20分钟结账! ADOQuery中使用过Filter后,如何恢复原来的数据集?(Filter:=''就行吗?) 散分 (对不起,我写错了)我急切需要一个控件! Delphi xe8 能用的odac 控件 关于treeview的问题(1) 请教问题,使用delphi开发的程序如果到别的机器上运行,需要什么运行库吗
s,a:string;
begin
s:='asf 321 98767';
a:=rightstr(s,length(s)-pos(' ',s));
a:=leftstr(a,pos(' ',a)-1);
end;