楚
楚辞
Unregistered / Unconfirmed
GUEST, unregistred user!
具体如下:edit1,edit2,button1 当按下BUTTON1把y:=check(3725,3)结果传递到EDIT1里.如何实现?下面是使用的函数.Function check(n,k:Integer):Integer;Var m:Integer;BeginRepeatm:=n mod 10;n:=n div 10;K:=k-1Until k=0;Check:=m end;