Hello Martin.
Tanks for answer.
So I did remove "valuemin", "valuemax" .
Here the procedure:
procedure tsongplayerfo.onsetval(const sender: TObject;
var avalue: realty; var accept: Boolean);
begin
if avalue > 100 then avalue := 100;
if avalue < 0 then avalue := 0;
end;
But now I get a range error message for every data entered ;-(.
---> Range Error: Min: Max:
Fre;D
--
Sent from: http://mseide-msegui-talk.13964.n8.nabble.com/
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
mseide-msegui-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/mseide-msegui-talk
