怎样去判断一个字符串里是不是有某个字符! if pos('.','111.111')<>0 then showmessage('有.'); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 对的,就用posvar S: string;begin S := ' 123.5'; { Convert spaces to zeroes } while Pos(' ', S) > 0 do S[Pos(' ', S)] := '0';end; var s:single;begin s:=123.5 if pos('.',floattostr(s)) >0 then .....end; 把两个MP3混音成一个Mp3问题! 急急急<如何取表中字段的数据类型>急急急 怎样动态关闭MessageBox产生的窗口? 用DBEXPRESS的时候,为什么RecordCount不能使用啊? TEmbeddedWB的QueryService事件是做什么用的? 如何赋值,简单问题 数据模块与其他窗体的相互调用问题? 这个问题有点难:(关于Master/Detail 刷新显示) 请问怎么在程序内判断当前的操作系统为NT or 2000 or 98? 怎样实现自动化执行? 一个串口通讯的问题???给100分!!大家快来拿!! 关于记录的问题。
S := ' 123.5';
{ Convert spaces to zeroes }
while Pos(' ', S) > 0 do
S[Pos(' ', S)] := '0';
end;
s:single;
begin
s:=123.5
if pos('.',floattostr(s)) >0 then
.....
end;