📄 oomisc.pas
字号:
ecIncompatibleApiVersion = -13812;
ecIncompatibleExtVersion = -13813;
ecIniFileCorrupt = -13814;
ecInUse = -13815;
ecInvalAddress = -13816;
ecInvalAddressID = -13817;
ecInvalAddressMode = -13818;
ecInvalAddressState = -13819;
ecInvalAppHandle = -13820;
ecInvalAppName = -13821;
ecInvalBearerMode = -13822;
ecInvalCallComplMode = -13823;
ecInvalCallHandle = -13824;
ecInvalCallParams = -13825;
ecInvalCallPrivilege = -13826;
ecInvalCallSelect = -13827;
ecInvalCallState = -13828;
ecInvalCallStatelist = -13829;
ecInvalCard = -13830;
ecInvalCompletionID = -13831;
ecInvalConfCallHandle = -13832;
ecInvalConsultCallHandle = -13833;
ecInvalCountryCode = -13834;
ecInvalDeviceClass = -13835;
ecInvalDeviceHandle = -13836;
ecInvalDialParams = -13837;
ecInvalDigitList = -13838;
ecInvalDigitMode = -13839;
ecInvalDigits = -13840;
ecInvalExtVersion = -13841;
ecInvalGroupID = -13842;
ecInvalLineHandle = -13843;
ecInvalLineState = -13844;
ecInvalLocation = -13845;
ecInvalMediaList = -13846;
ecInvalMediaMode = -13847;
ecInvalMessageID = -13848;
ecInvalParam = -13850;
ecInvalParkID = -13851;
ecInvalParkMode = -13852;
ecInvalPointer = -13853;
ecInvalPrivSelect = -13854;
ecInvalRate = -13855;
ecInvalRequestMode = -13856;
ecInvalTerminalID = -13857;
ecInvalTerminalMode = -13858;
ecInvalTimeout = -13859;
ecInvalTone = -13860;
ecInvalToneList = -13861;
ecInvalToneMode = -13862;
ecInvalTransferMode = -13863;
ecLineMapperFailed = -13864;
ecNoConference = -13865;
ecNoDevice = -13866;
ecNoDriver = -13867;
ecNoMem = -13868;
ecNoRequest = -13869;
ecNotOwner = -13870;
ecNotRegistered = -13871;
ecOperationFailed = -13872;
ecOperationUnavail = -13873;
ecRateUnavail = -13874;
ecResourceUnavail = -13875;
ecRequestOverrun = -13876;
ecStructureTooSmall = -13877;
ecTargetNotFound = -13878;
ecTargetSelf = -13879;
ecUninitialized = -13880;
ecUserUserInfoTooBig = -13881;
ecReinit = -13882;
ecAddressBlocked = -13883;
ecBillingRejected = -13884;
ecInvalFeature = -13885;
ecNoMultipleInstance = -13886;
const
{Apro encounters a few of its own TAPI errors, place these error
codes after the native TAPI error codes, but leave a little bit
of room for expansion of the TAPI error codes.}
ecTapiBusy = -13928;
ecTapiNotSet = -13929;
ecTapiNoSelect = -13930;
ecTapiLoadFail = -13931;
ecTapiGetAddrFail = -13932;
ecTapiUnexpected = -13934;
ecTapiVoiceNotSupported = -13935;
ecTapiWaveFail = -13936;
ecTapiCIDBlocked = -13937;
ecTapiCIDOutOfArea = -13938;
ecTapiWaveFormatError = -13939;
ecTapiWaveReadError = -13940;
ecTapiWaveBadFormat = -13941;
ecTapiTranslateFail = -13942;
ecTapiWaveDeviceInUse = -13943;
ecTapiWaveFileExists = -13944;
ecTapiWaveNoData = -13945;
ecVoIPNotSupported = -13950; { TAPI3/H.323 not found }
ecVoIPCallBusy = -13951; { remote was busy }
ecVoIPBadAddress = -13952; { destination address bad }
ecVoIPNoAnswer = -13953; { remote did not answer }
ecVoIPCancelled = -13954; { cancelled }
ecVoIPRejected = -13955; { remote rejected the call }
ecVoIPFailed = -13956; { general failure }
ecVoIPTapi3NotInstalled = -13957; { ITTapi interface failure } {!!.01}
ecVoIPH323NotFound = -13958; { H.323 line not found } {!!.01}
ecVoIPTapi3EventFailure = -13959; { event notify failure } {!!.01}
{RAS error codes}
ecRasLoadFail = -13980;
const
{Convenient character constants (and aliases)}
cNul = #0;
cSoh = #1;
cStx = #2;
cEtx = #3;
cEot = #4;
cEnq = #5;
cAck = #6;
cBel = #7;
cBS = #8;
cTab = #9;
cLF = #10;
cVT = #11;
cFF = #12;
cCR = #13;
cSO = #14;
cSI = #15;
cDle = #16;
cDC1 = #17; cXon = #17;
cDC2 = #18;
cDC3 = #19; cXoff = #19;
cDC4 = #20;
cNak = #21;
cSyn = #22;
cEtb = #23;
cCan = #24;
cEM = #25;
cSub = #26;
cEsc = #27;
cFS = #28;
cGS = #29;
cRS = #30;
cUS = #31;
type
{Protocol status information record}
TProtocolInfo = record
piProtocolType : Cardinal;
piBlockErrors : Cardinal;
piTotalErrors : Cardinal;
piBlockSize : Cardinal;
piBlockNum : Cardinal;
piFileSize : LongInt;
piBytesTransferred : LongInt;
piBytesRemaining : LongInt;
piInitFilePos : LongInt;
piElapsedTicks : LongInt;
piFlags : LongInt;
piBlockCheck : Cardinal;
piFileName : TPathCharArray;
piError : Integer;
piStatus : Cardinal;
end;
const
{Port options}
poUseEventWord = $04; {Set to use the event word}
{ APRO-specific flags used in InitPort}
ipAssertDTR = $00000001;
ipAssertRTS = $00000002;
ipAutoDTR = $00000010;
ipAutoRTS = $00000020;
{Hardware flow control options}
hfUseDTR = $01; {Use DTR for receive flow control}
hfUseRTS = $02; {Use RTS for receive flow control}
hfRequireDSR = $04; {Require DSR before transmitting}
hfRequireCTS = $08; {Require CTS before transmitting}
{Software flow control options}
sfTransmitFlow = $01; {Honor received Xon/Xoffs}
sfReceiveFlow = $02; {Send Xon/Xoff as required}
{Define bits for TDCB Flags field}
dcb_Binary = $0001;
dcb_Parity = $0002;
dcb_OutxCTSFlow = $0004;
dcb_OutxDSRFlow = $0008;
dcb_DTRBit1 = $0010;
dcb_DTRBit2 = $0020;
dcb_DsrSensitivity = $0040;
dcb_TxContinueOnXoff = $0080;
dcb_OutX = $0100;
dcb_InX = $0200;
dcb_ErrorChar = $0400;
dcb_Null = $0800;
dcb_RTSBit1 = $1000;
dcb_RTSBit2 = $2000;
dcb_AbortOnError = $4000;
dcb_DTR_CONTROL_ENABLE = dcb_DTRBit1;
dcb_DTR_CONTROL_HANDSHAKE = dcb_DTRBit2;
dcb_RTS_CONTROL_ENABLE = dcb_RTSBit1;
dcb_RTS_CONTROL_HANDSHAKE = dcb_RTSBit2;
dcb_RTS_CONTROL_TOGGLE = (dcb_RTSBit1 + dcb_RTSBit2);
{For reporting flow states, note: no receive hardware flow status is provided}
fsOff = 1; {No flow control is in use}
fsOn = 2; {Flow control is but not transmit blocked}
fsDsrHold = 3; {Flow control is on and transmit blocked by low DSR}
fsCtsHold = 4; {Flow control is on and transmit blocked by low CTS}
fsDcdHold = 5; {Flow control is on and transmit blocked by low DCD}
fsXOutHold = 6; {Flow control is on and transmit blocked by Xoff}
fsXInHold = 7; {Flow control is on and receive blocked by Xoff}
fsXBothHold= 8; {Flow control is on and both are blocked by Xoff}
const
{Emulator commands}
eNone = 0; {No command, ignore this char}
eChar = 1; {No command, process the char}
eGotoXY = 2; {X} {Absolute goto cursor position call}
eUp = 3; {X} {Cursor up}
eDown = 4; {X} {Cursor down}
eRight = 5; {X} {Cursor right}
eLeft = 6; {X} {Cursor left}
eClearBelow = 7; {R} {Clear screen below cursor}
eClearAbove = 8; {R} {Clear screen above cursor}
eClearScreen = 9; {R} {Clear entire screen}
eClearEndofLine = 10;{R} {Clear from cursor to end of line}
eClearStartOfLine= 11;{R} {Clear from cursor to the start of line}
eClearLine = 12;{R} {Clear entire line that cursor is on}
eSetMode = 13;{X} {Set video mode}
eSetBackground = 14; {Set background attribute}
eSetForeground = 15; {Set foreground attribute}
eSetAttribute = 16;{X} {Set video attribute (foreground and background)}
eSaveCursorPos = 17; {Save cursor position}
eRestoreCursorPos= 18; {Restore cursor position}
eDeviceStatusReport = 19;{X}{Report device status or cursor position}
eString = 20; {Pascal style string}
eHT = 21; {Horizontal Tab Character}
eError = 255; {indicates a parser error}
eAPC { } = 30; {Application programming command}
eCBT {X} = 31; {Cursor backward tabulation}
eCCH { } = 32; {Cancel character}
eCHA {X} = 33; {Cursor horizontal absolute}
eCHT {X} = 34; {Cursor horizontal tabulation}
eCNL {X} = 35; {Cursor next line}
eCPL {X} = 36; {Cursor preceding line}
eCPR {X} = 37; {Cursor position report}
eCRM {.} = 38; {Control representation mode}
eCTC {X} = 39; {Cursor tabulation control}
eCUB {X} = eLeft; {Cursor backward}
eCUD {X} = eDown; {Cursor down}
eCUF {X} = eRight; {Cursor forward}
eCUP {X} = eGotoXY; {Cursor position}
eCUU {X} = eUp; {Cursor up}
eCVT {X} = 40; {Cursor vertical tabulation}
eDA {X} = 41; {Device attributes}
eDAQ { } = 42; {Define area qualification}
eDCH {X} = 43; {Delete character}
eDCS { } = 44; {Device control string}
eDL {X} = 45; {Delete line}
eDMI { } = 46; {Disable manual input}
eDSR {X} = eDeviceStatusReport;{Device status report}
eEA { } = 47; {Erase in area}
eEBM { } = 48; {Editing boundry mode}
eECH {X} = 49; {Erase character}
eED {X} = 50; {Erase in Display}
eEF { } = 51; {Erase in field}
eEL {X} = 52; {Erase in line}
eEMI { } = 53; {Enable manual input}
eEPA { } = 54; {End of protected mode}
eERM { } = 55; {Erasure mode}
eESA { } = 56; {End of selected area}
eFEAM { } = 57; {Format effector action mode}
eFETM { } = 58; {Format effector transfer mode}
eFNT { } = 59; {Font selection}
eGATM { } = 60; {Guarded area transfer mode}
eGSM { } = 61; {Graphics size modification}
eGSS { } = 62; {Graphics size selection}
eHEM { } = 63; {Horizontal editing mode}
eHPA {X} = eCHA; {Horizontal position absolute}
eHPR {X} = eCUF; {Horizontal position relative}
eHTJ {X} = 64; {Horizontal tab with justification}
eHTS {X} = 65; {Horizontal tabulation set}
eHVP {X} = eCUP; {Horizontal and vertical position}
eICH {X} = 66; {Insert character}
eIL {X} = 67; {Insert line}
eIND {X} = eCUD; {Index}
eINT { } = 68; {Interrupt}
eIRM {.} = 69; {Inseration-Replacement mode}
eJFY { } = 70; {Justify}
eKAM {.} = 71; {Keyboard action mode}
eLNM {.} = 72; {Line feed new line mode}
eMATM { } = 73; {Multiple area transfer mode}
eMC {.} = 74; {Media copy}
eMW {.} = 75; {Message waiting}
eNEL {X} = 76; {Next line}
eNP {.} = 77; {Next page}
eOSC { } = 78; {Operating system command}
ePLD { } = 79; {Partial line down}
ePLU { } = 80; {Partial line up}
ePM { } = 81; {Privacy message}
ePP {.} = 82; {Preceding page}
ePU1 { } = 83; {Private use 1}
ePU2 { } = 84; {Private use 2}
ePUM { } = 85; {Positioning unit mode}
eQUAD { } = 86; {Quad}
eREP { } = 87; {Repeat}
eRI {X} = 88; {Reverse index}
eRIS {.} = 89; {Reset to initial state}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -