var
str:
string
;
begin
str :=
'abcdefghigklmn'
;
Delete(str,Length(str)-
4
,
5
);
ShowMessage(str);
end
;
var
str:
string
;
begin
str :=
'abcdefghigklmn'
;
Delete(str,Length(str)-
4
,
5
);
ShowMessage(str);
end
;
本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。