Declaration

TPINResult = (prOK, prCancel, prLocked, prError);