> In 2016-04-06 09:24:03 f6e88fce69a57f51e352726a4d69fc7891e8f410: Ooops, I did not see this.
Thanks. > procedure tmainfo.changepos(const sender: TObject; var avalue: realty; > var accept: Boolean); > begin > uos_Seek(PlayerIndex1, InputIndex1, round(avalue * inputlength)); > end; Excellent and perfect. It works ;-) Many thanks. Fre;D
------------------------------------------------------------------------------
_______________________________________________ mseide-msegui-talk mailing list mseide-msegui-talk@lists.sourceforge.net https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk