一个最简单的字符提取问题?急!急!。。。。 s:='12334 abcdefjg';l1:=pos(' ',s); s1:=copy(s,1,l1); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 是这样12334abcdefjg,怎么样提出有数字的部分?谢谢! s:='33434dfaf'; s:=trim(s); for i:=1 to length(s) do begin if s[i] in ['0'..'9'] then s1:=s1+s[i] else break; end; caption:=s1; Exe+Bpl的发布问题 触发器爱好者 怎么把webbrowser设成不可见? 用TClientDataSet新建一个表,怎样高定某个字段为自动增长的属性, 大哥大姐门帮帮俺,菜鸟在线等到。。。 如何让dbgrid只能修改里面的记录,而不能增加新记录? 请教,怎样实现TDBGrid彩色显示数据及其背景? 如何枚举系统当前活动连接 搞不懂的一个问题,请指点,在线等。 又出怪事啦(数据库) 如何修改WindowsXP启动时的LOGO画面,送500分 请问谁有分割窗口的控件,要求是可以实现制作出多个窗口框架的功能。
s:=trim(s);
for i:=1 to length(s) do
begin
if s[i] in ['0'..'9'] then
s1:=s1+s[i]
else break;
end;
caption:=s1;