[Overview][Constants][Types][Classes][Procedures and functions][Variables][Index] |
Номер регистра
Source position: kkm_atol.pas line 269
public property TAtollKKM.RegisterNumber : Byte |
В данном свойстве указывается номер регистра, над которым выполняется операция. Например - GetRegister.
Номер регистра может находится в диапазоне: 1 ... 36
//Функция отображает значение регистров //Переменная AtolCheckTypeNames объявлена в модуле KKM_Atol procedure DoPrintRegister(AMsg: string; AChekTypes: TCheckTypes); var i:byte; begin for i:=1 to 6 do if i in AChekTypes then begin ECRDriver.CheckType:=i; ECRDriver.GetRegister; Memo1.Lines.Add(Format('%s - (%d - %s) = %m', [AMsg, i, AtolCheckTypeNames[i], ECRDriver.Summ])); end; end; //Данный пример демонстрируем установку номера регистра и последующую печать //Значения регистров сумм регистрации по типам чеков begin ECRDriver.RegisterNumber:=1; DoPrintRegister('1 - Сумма регистраций', [1..6]); end