Source position: vdi.pas line 156
function vsm_choice(
handle: SmallInt;
out choice: SmallInt
):SmallInt;