70,020
社区成员




func strmid(len,str1,str2,pos)
dec
var string1:127;
enddec
string1=ljust(str1," ",len);
if (pos eq 1)
string1=str2
&substr(string1, pos+length(str2));
else
string1=substr(string1, 1, pos-1)
&str2
&substr(string1, pos+length(str2));
endif
string1=substr(string1,1,len);
return string1;
endfunc
void sub_str(char *s1,char *s2,int m,int n){
memcpy(s2,s1+m,sizeof(char)*n);
}