10.11.2015 Views

maXbox3 3.9.9.195 14/05/2015 08:37:17 AM

maXbox3 3.9.9.80 13.11.2013 11:25:53

maXbox3 3.9.9.80 13.11.2013 11:25:53

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

<strong>maXbox3</strong> <strong>3.9.9.195</strong><br />

<strong>14</strong>/<strong>05</strong>/<strong>2015</strong> <strong>08</strong>:<strong>37</strong>:<strong>17</strong> <strong>AM</strong><br />

<strong>17</strong>964: CL.AddClassN(CL.FindClass('TOBJECT'),'EIpBaseException');<br />

<strong>17</strong>965: CL.AddClassN(CL.FindClass('TOBJECT'),'EIpAccessException');<br />

<strong>17</strong>966: CL.AddClassN(CL.FindClass('TOBJECT'),'EIpHtmlException');<br />

<strong>17</strong>967: SIRegister_TIpBaseAccess(CL);<br />

<strong>17</strong>968: SIRegister_TIpBasePersistent(CL);<br />

<strong>17</strong>969: //TIpComponentClass', 'class of TIpBaseComponent');<br />

<strong>17</strong>970: SIRegister_TIpBaseComponent(CL);<br />

<strong>17</strong>971: SIRegister_TIpBaseWinControl(CL);<br />

<strong>17</strong>972: Function InClassA( Addr : LongInt) : Boolean');<br />

<strong>17</strong>973: Function InClassB( Addr : LongInt) : Boolean');<br />

<strong>17</strong>974: Function InClassC( Addr : LongInt) : Boolean');<br />

<strong>17</strong>975: Function InClassD( Addr : LongInt) : Boolean');<br />

<strong>17</strong>976: Function InMulticast( Addr : LongInt) : Boolean');<br />

<strong>17</strong>977: Function IpCharCount( const Buffer, BufSize : DWORD; C : AnsiChar) : DWORD');<br />

<strong>17</strong>978: Function IpCompStruct( const S1, S2, Size : Cardinal) : Integer');<br />

<strong>17</strong>979: Function IpMaxInt( A, B : Integer) : Integer');<br />

<strong>17</strong>980: Function IpMinInt( A, B : Integer) : Integer');<br />

<strong>17</strong>981: Procedure IpSafeFree( var Obj: TObject)');<br />

<strong>17</strong>982: Function IpShortVersion : string');<br />

<strong>17</strong>983: Function IpInternetSumPrim( var Data, DataSize, CurCrc : DWORD) : DWORD');<br />

<strong>17</strong>984: Function IpInternetSumOfStream( Stream : TStream; CurCrc : DWORD) : DWORD');<br />

<strong>17</strong>985: Function IpInternetSumOfFile( const FileName : string) : DWORD');<br />

<strong>17</strong>986: Function MD5SumOfFile( const FileName : string) : string');<br />

<strong>17</strong>987: Function MD5SumOfStream( Stream : TStream) : string');<br />

<strong>17</strong>988: Function MD5SumOfStreamDigest( Stream : TStream) : TIpMD5Digest');<br />

<strong>17</strong>989: Function MD5SumOfString( const S : string) : string');<br />

<strong>17</strong>990: Function MD5SumOfStringDigest( const S : string) : TIpMD5Digest');<br />

<strong>17</strong>991: Function SafeYield : LongInt');<br />

<strong>17</strong>992: Function AllTrimSpaces( Strng : string) : string');<br />

<strong>17</strong>993: Function IpCharPos( C : AnsiChar; const S : string) : Integer');<br />

<strong>17</strong>994: Function CharPosIdx( C : AnsiChar; const S : string; Idx : Integer) : Integer');<br />

<strong>17</strong>995: Function NthCharPos( C : AnsiChar; const S : string; Nth : Integer) : Integer');<br />

<strong>17</strong>996: Function RCharPos( C : AnsiChar; const S : string) : Integer');<br />

<strong>17</strong>997: Function RCharPosIdx( C : AnsiChar; const S : string; Idx : Integer) : Integer');<br />

<strong>17</strong>998: Function RNthCharPos( C : AnsiChar; const S : string; Nth : Integer) : Integer');<br />

<strong>17</strong>999: Function IpRPos( const Substr : string; const S : string) : Integer');<br />

18000: Function IpPosIdx( const SubStr, S : string; Idx : Integer) : Integer');<br />

18001: ACharSet', 'set of AnsiChar');<br />

18002: TIpAddrRec', 'record Scheme : string; UserName : string; Password string; Authority : string;<br />

18003: Port : string; Path : string; Fragment : string; Query : string; QueryDelim : AnsiChar; end');<br />

18004: Procedure Initialize( var AddrRec : TIpAddrRec)');<br />

180<strong>05</strong>: Procedure Finalize( var AddrRec : TIpAddrRec)');<br />

18006: Function ExtractEntityName( const NamePath : string) : string');<br />

18007: Function ExtractEntityPath( const NamePath : string) : string');<br />

180<strong>08</strong>: Function IpParseURL( const URL : string; var Rslt : TIpAddrRec) : Boolean');<br />

18009: Function BuildURL( const OldURL, NewURL : string) : string');<br />

18010: Function PutEscapes( const S : string; EscapeSet : ACharSet) : string');<br />

18011: Function RemoveEscapes( const S : string; EscapeSet : ACharSet) : string');<br />

18012: Procedure SplitParams( const Parms : string; Dest : TStrings)');<br />

18013: Function NetToDOSPath( const PathStr : string) : string');<br />

180<strong>14</strong>: Function DOSToNetPath( const PathStr : string) : string');<br />

18015: Procedure SplitHttpResponse( const S : string; var V, MsgID, Msg : string)');<br />

18016: Procedure FieldFix( Fields : TStrings)');<br />

180<strong>17</strong>: Function AppendSlash( APath : string) : string');<br />

18018: Function RemoveSlash( APath : string) : string');<br />

18019: Function GetParentPath( const Path : string) : string');<br />

18020: Function GetLocalContent( const TheFileName : string) : string');<br />

18021: Function IPDirExists( Dir : string) : Boolean');<br />

18022: Function GetTemporaryFile( const Path : string) : string');<br />

18023: Function GetTemporaryPath : string');<br />

18024: Function AppendBackSlash( APath : string) : string');<br />

18025: Function IpRemoveBackSlash( APath : string) : string');<br />

18026: Function INetDateStrToDateTime( const DateStr : string) : TDateTime');<br />

18027: Function DateTimeToINetDateTimeStr( DateTime : TDateTime) : string');<br />

18028: Function IpTimeZoneBias : Integer');<br />

18029: Procedure SplitCookieFields( const Data : string; Fields : TStrings)');<br />

18030: end;<br />

18031:<br />

18032: procedure SIRegister_LrtPoTools(CL: TPSPascalCompiler);<br />

18033: begin<br />

18034: CL.AddTypeS('TPOStyle', '( postStandard, postPropName, postFull )');<br />

18035: Procedure Lrt2Po( const LRTFile : string; POStyle : TPOStyle)');<br />

18036: Procedure CombinePoFiles( SL : TStrings; const FName : string)');<br />

180<strong>37</strong>: end;<br />

18038:<br />

18039: procedure SIRegister_GPS(CL: TPSPascalCompiler);<br />

18040: begin<br />

18041: CL.AddConstantN('MAX_SATS','LongInt').SetInt( 12);<br />

18042: GPSMSG_START','String').SetString( '$');<br />

18043: GPSMSG_STOP','String').SetString( '*');<br />

18044: SEC_BETWEEN_SEG','LongInt').SetInt( 5);<br />

18045: CL.AddTypeS('TSatellite', 'record Identification : Shortint; Elevation : Shor'<br />

18046: +'tint; Azimut : Smallint; SignLevel : Smallint; end');<br />

18047: CL.AddTypeS('TSatellites', 'array[1..12] of TSatellite');<br />

18048: //TSatellites = array[1..MAX_SATS] of TSatellite;<br />

18049: TGPSSatEvent', 'Procedure ( Sender : TObject; NbSat, NbSatUse: Shortint; Sats : TSatellites)');<br />

18<strong>05</strong>0: TGPSDatas', 'record Latitude : Double; Longitude : Double; Heigh'<br />

18<strong>05</strong>1: tAboveSea : Double; Speed : Double; UTCTime : TDateTime; Valid : Boolean; '<br />

18<strong>05</strong>2: NbrSats : Shortint; NbrSatsUsed : Shortint; Course : Double; end');<br />

PC<strong>08</strong> E:\maxbox3\mXGit39988\maxbox3\docs\maxbox_extract_funclist399.txt<br />

http://www.softwareschule.ch/maxbox.htm T: 297<br />

p: 210

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!