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
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
<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 />
11<strong>37</strong>3: Function KgToQrUs( const Kg : double) : double<br />
11<strong>37</strong>4: Function KgToQrUk( const Kg : double) : double<br />
11<strong>37</strong>5: Function PascalToBar( const Pa : double) : double<br />
11<strong>37</strong>6: Function PascalToAt( const Pa : double) : double<br />
11<strong>37</strong>7: Function PascalToTorr( const Pa : double) : double<br />
11<strong>37</strong>8: Function BarToPascal( const Bar : double) : double<br />
11<strong>37</strong>9: Function AtToPascal( const At : double) : double<br />
11380: Function TorrToPascal( const Torr : double) : double<br />
11381: Function KnotToMs( const Knot : double) : double<br />
11382: Function HpElectricToWatt( const HpE : double) : double<br />
11383: Function HpMetricToWatt( const HpM : double) : double<br />
11384: Function MsToKnot( const ms : double) : double<br />
11385: Function WattToHpElectric( const W : double) : double<br />
11386: Function WattToHpMetric( const W : double) : double<br />
11387: function getBigPI: string; //PI of 1000 numbers<br />
11388:<br />
11389: procedure SIRegister_devcutils(CL: TPSPascalCompiler);<br />
11390: begin<br />
11391: Function CDExecuteFile( const FileName, Params, DefaultDir : string; ShowCmd : Integer) : THandle<br />
11392: Procedure CDCopyFile( const FileName, DestName : string)<br />
11393: Procedure CDMoveFile( const FileName, DestName : string)<br />
11394: Function MakeCommaTextToColor( Text : string; Index : Integer; DefaultColor : TColor) : TColor<br />
11395: Procedure CDDeleteFiles( Sender : TObject; s : string)<br />
11396: Function CDGetTempDir : string<br />
11397: Function CDGetFileSize( FileName : string) : longint<br />
11398: Function GetFileTime( FileName : string) : longint<br />
11399: Function GetShortName( FileName : string) : string<br />
1<strong>14</strong>00: Function GetFullName( FileName : string) : string<br />
1<strong>14</strong>01: Function WinReboot : boolean<br />
1<strong>14</strong>02: Function WinDir : String<br />
1<strong>14</strong>03: Function RunFile( FileToRun : string; Params : string; Dir : string; Wait : boolean) : cardinal<br />
1<strong>14</strong>04: Function RunFile_( Cmd, WorkDir : string; Wait : boolean) : Boolean<br />
1<strong>14</strong><strong>05</strong>: Function devExecutor : TdevExecutor<br />
1<strong>14</strong>06: end;<br />
1<strong>14</strong>07:<br />
1<strong>14</strong><strong>08</strong>: procedure SIRegister_FileAssocs(CL: TPSPascalCompiler);<br />
1<strong>14</strong>09: begin<br />
1<strong>14</strong>10: Procedure CheckAssociations // AssociationsCount','LongInt'( 7);<br />
1<strong>14</strong>11: Procedure Associate( Index : integer)<br />
1<strong>14</strong>12: Procedure UnAssociate( Index : integer)<br />
1<strong>14</strong>13: Function IsAssociated( Index : integer) : boolean<br />
1<strong>14</strong><strong>14</strong>: Function CheckFiletype( const extension, filetype, description, verb, serverapp : string) : boolean<br />
1<strong>14</strong>15: Procedure RegisterFiletype( const extension, filetype, description, verb, serverapp,IcoNum: string)<br />
1<strong>14</strong>16: Procedure RegisterDDEServer( const filetype, verb, topic, servername, macro : string)<br />
1<strong>14</strong><strong>17</strong>: procedure RefreshIcons;<br />
1<strong>14</strong>18: function GetShadeColor(ACanvas: TCanvas; clr: TColor; Value: integer): TColor;<br />
1<strong>14</strong>19: function MergColor(Colors: Array of TColor): TColor;<br />
1<strong>14</strong>20: function NewColor(ACanvas: TCanvas; clr: TColor; Value: integer): TColor;<br />
1<strong>14</strong>21: procedure DimBitmap(ABitmap: TBitmap; Value: integer);<br />
1<strong>14</strong>22: function GrayColor(ACanvas: TCanvas; clr: TColor; Value: integer): TColor;<br />
1<strong>14</strong>23: function GetInverseColor(AColor: TColor): TColor;<br />
1<strong>14</strong>24: procedure GrayBitmap(ABitmap: TBitmap; Value: integer);<br />
1<strong>14</strong>25: procedure DrawBitmapShadow(B: TBitmap; ACanvas: TCanvas;X,Y: integer;ShadowColor: TColor);<br />
1<strong>14</strong>26: procedure DrawCheckMark(ACanvas: TCanvas; X, Y: integer);<br />
1<strong>14</strong>27: Procedure GetSystemMenuFont(Font: TFont);<br />
1<strong>14</strong>28: end;<br />
1<strong>14</strong>29:<br />
1<strong>14</strong>30: //***************************unit uPSI_JvHLParser;*******************************<br />
1<strong>14</strong>31: function IsStringConstant(const St: string): Boolean;<br />
1<strong>14</strong>32: function IsIntConstant(const St: string): Boolean;<br />
1<strong>14</strong>33: function IsRealConstant(const St: string): Boolean;<br />
1<strong>14</strong>34: function IsIdentifier(const ID: string): Boolean;<br />
1<strong>14</strong>35: function GetStringValue(const St: string): string;<br />
1<strong>14</strong>36: procedure ParseString(const S: string; Ss: TStrings);<br />
1<strong>14</strong><strong>37</strong>: function IsStringConstantW(const St: WideString): Boolean;<br />
1<strong>14</strong>38: function IsIntConstantW(const St: WideString): Boolean;<br />
1<strong>14</strong>39: function IsRealConstantW(const St: WideString): Boolean;<br />
1<strong>14</strong>40: function IsIdentifierW(const ID: WideString): Boolean;<br />
1<strong>14</strong>41: function GetStringValueW(const St: WideString): WideString;<br />
1<strong>14</strong>42: procedure ParseStringW(const S: WideString; Ss: TStrings);<br />
1<strong>14</strong>43:<br />
1<strong>14</strong>44:<br />
1<strong>14</strong>45: //***************************unit uPSI_JclMapi;*******************************<br />
1<strong>14</strong>46:<br />
1<strong>14</strong>47: Function JclSimpleSendMail( const ARecipient,AName,ASubject, ABody : string; const AAttachment :<br />
TFileName; ShowDialog : Boolean; AParentWND : HWND) : Boolean<br />
1<strong>14</strong>48: Function JclSimpleSendFax( const ARecipient, AName,ASubject, ABody : string; const AAttachment :<br />
TFileName; ShowDialog : Boolean; AParentWND : HWND) : Boolean<br />
1<strong>14</strong>49: Function JclSimpleBringUpSendMailDialog(const ASubject,ABody:string;const<br />
AAttach:TFileName;AParentWND:HWND):Bool<br />
1<strong>14</strong>50: Function MapiCheck( const Res : DWORD; IgnoreUserAbort : Boolean) : DWORD<br />
1<strong>14</strong>51: Function MapiErrorMessage( const ErrorCode : DWORD) : string<br />
1<strong>14</strong>52:<br />
1<strong>14</strong>53: procedure SIRegister_IdNTLM(CL: TPSPascalCompiler);<br />
1<strong>14</strong>54: begin<br />
1<strong>14</strong>55: //'Pdes_key_schedule', '^des_key_schedule // will not work<br />
1<strong>14</strong>56: Function BuildType1Message( ADomain, AHost : String) : String<br />
1<strong>14</strong>57: Function BuildType3Message(ADomain,AHost,AUsername:WideString;APassword,ANonce:String):String<br />
1<strong>14</strong>58: Procedure RegisterAuthenticationMethod( MethodName : String; AuthClass : TIdAuthenticationClass)<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: 132