用Delphi 6编程实现自动标注汉语拼音

领测软件测试网

if (ch2str[j]=’u’) and (py[4]<>1) then py[5]:=1; 

if ch2str[j]=’ü’ then py[6]:=1; 

end; 


for J:=1 to 8 do 

begin 


end; //if 

if (ch2=’o’) and (alr=0) and (py[1]<>1) then 

begin 

alr:=1; 

Write(F2, pych[2][tmp]); 

continue; 

end; 


if (ch2=’e’) then 

begin 

alr:=1; Write(F2, pych[3][tmp]); 

continue; 

文章来源于领测软件测试网 https://www.ltesting.net/