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 />

5229: Function JEmptyRect : TRect<br />

5230: Function IsClassByName( Obj : TObject; ClassName : string) : Boolean<br />

5231:<br />

5232: procedure SIRegister_MSysUtils(CL: TPSPascalCompiler);<br />

5233: begin<br />

5234: Procedure HideTaskBarButton( hWindow : HWND)<br />

5235: Function msLoadStr( ID : Integer) : String<br />

5236: Function msFormat( fmt : String; params : array of const) : String<br />

52<strong>37</strong>: Function msFileExists( const FileName : String) : Boolean<br />

5238: Function msIntToStr( Int : Int64) : String<br />

5239: Function msStrPas( const Str : PChar) : String<br />

5240: Function msRenameFile( const OldName, NewName : String) : Boolean<br />

5241: Function CutFileName( s : String) : String<br />

5242: Function GetVersionInfo( var VersionString : String) : DWORD<br />

5243: Function FormatTime( t : Cardinal) : String<br />

5244: Function msCreateDir( const Dir : string) : Boolean<br />

5245: Function SetAutoRun( NeedAutoRun : Boolean; AppName : String) : Boolean<br />

5246: Function SetTreeViewStyle( const hTV : HWND; dwNewStyle : dword) : DWORD<br />

5247: Function msStrLen( Str : PChar) : Integer<br />

5248: Function msDirectoryExists( const Directory : String) : Boolean<br />

5249: Function GetFolder( hWnd : hWnd; RootDir : Integer; Caption : String) : String<br />

5250: Function SetBlendWindow( hWnd : HWND; AlphaBlend : Byte) : LongBool<br />

5251: Function EditWindowProc( hWnd : HWND; Msg : UINT; wParam : WPAR<strong>AM</strong>; lParam : LPAR<strong>AM</strong>) : LRESULT<br />

5252: Procedure SetEditWndProc( hWnd : HWND; ptr : TObject)<br />

5253: Function GetTextFromFile( Filename : String) : string<br />

5254: Function IsTopMost( hWnd : HWND) : Bool // 'LWA_ALPHA','LongWord').SetUInt( $00000002);<br />

5255: Function msStrToIntDef( const s : String; const i : Integer) : Integer<br />

5256: Function msStrToInt( s : String) : Integer<br />

5257: Function GetItemText( hDlg : THandle; ID : DWORD) : String<br />

5258: end;<br />

5259:<br />

5260: procedure SIRegister_ESBMaths2(CL: TPSPascalCompiler);<br />

5261: begin<br />

5262: //TDynFloatArray', 'array of Extended<br />

5263: TDynLWordArray', 'array of LongWord<br />

5264: TDynLIntArray', 'array of LongInt<br />

5265: TDynFloatMatrix', 'array of TDynFloatArray<br />

5266: TDynLWordMatrix', 'array of TDynLWordArray<br />

5267: TDynLIntMatrix', 'array of TDynLIntArray<br />

5268: Function SquareAll( const X : TDynFloatArray) : TDynFloatArray<br />

5269: Function InverseAll( const X : TDynFloatArray) : TDynFloatArray<br />

5270: Function LnAll( const X : TDynFloatArray) : TDynFloatArray<br />

5271: Function Log10All( const X : TDynFloatArray) : TDynFloatArray<br />

5272: Function LinearTransform( const X : TDynFloatArray; Offset, Scale : Extended) : TDynFloatArray<br />

5273: Function AddVectors( const X, Y : TDynFloatArray) : TDynFloatArray<br />

5274: Function SubVectors( const X, Y : TDynFloatArray) : TDynFloatArray<br />

5275: Function MultVectors( const X, Y : TDynFloatArray) : TDynFloatArray<br />

5276: Function DotProduct( const X, Y : TDynFloatArray) : Extended<br />

5277: Function MNorm( const X : TDynFloatArray) : Extended<br />

5278: Function MatrixIsRectangular( const X : TDynFloatMatrix) : Boolean<br />

5279: Procedure MatrixDimensions(const X:TDynFloatMatrix;var Rows,Columns:LongWord;var Rectangular:Boolean;<br />

5280: Function MatrixIsSquare( const X : TDynFloatMatrix) : Boolean<br />

5281: Function MatricesSameDimensions( const X, Y : TDynFloatMatrix) : Boolean<br />

5282: Function AddMatrices( const X, Y : TDynFloatMatrix) : TDynFloatMatrix<br />

5283: Procedure AddToMatrix( var X : TDynFloatMatrix; const Y : TDynFloatMatrix)<br />

5284: Function SubtractMatrices( const X, Y : TDynFloatMatrix) : TDynFloatMatrix<br />

5285: Procedure SubtractFromMatrix( var X : TDynFloatMatrix; const Y : TDynFloatMatrix)<br />

5286: Function MultiplyMatrixByConst( const X : TDynFloatMatrix; const K : Extended) : TDynFloatMatrix<br />

5287: Procedure MultiplyMatrixByConst2( var X : TDynFloatMatrix; const K : Extended);<br />

5288: Function MultiplyMatrices( const X, Y : TDynFloatMatrix) : TDynFloatMatrix;<br />

5289: Function TransposeMatrix( const X : TDynFloatMatrix) : TDynFloatMatrix;<br />

5290: Function GrandMean( const X : TDynFloatMatrix; var N : LongWord) : Extended<br />

5291: end;<br />

5292:<br />

5293: procedure SIRegister_ESBMaths(CL: TPSPascalCompiler);<br />

5294: begin<br />

5295: 'ESBMinSingle','Single').setExtended( 1.5e-45);<br />

5296: 'ESBMaxSingle','Single').setExtended( 3.4e+38);<br />

5297: 'ESBMinDouble','Double').setExtended( 5.0e-324);<br />

5298: 'ESBMaxDouble','Double').setExtended( 1.7e+3<strong>08</strong>);<br />

5299: 'ESBMinExtended','Extended').setExtended( 3.6e-4951);<br />

5300: 'ESBMaxExtended','Extended').setExtended( 1.1e+4932);<br />

5301: 'ESBMinCurrency','Currency').SetExtended( - 9223<strong>37</strong>203685477.5807);<br />

5302: 'ESBMaxCurrency','Currency').SetExtended( 9223<strong>37</strong>203685477.5807);<br />

5303: 'ESBSqrt2','Extended').setExtended( 1.4<strong>14</strong>213562<strong>37</strong>30950488);<br />

5304: 'ESBSqrt3','Extended').setExtended( 1.732<strong>05</strong><strong>08</strong>075688772935);<br />

53<strong>05</strong>: 'ESBSqrt5','Extended').setExtended( 2.2360679774997896964);<br />

5306: 'ESBSqrt10','Extended').setExtended( 3.162277660168<strong>37</strong>93320);<br />

5307: 'ESBSqrtPi','Extended').setExtended( 1.7724538509<strong>05</strong>51602729);<br />

53<strong>08</strong>: 'ESBCbrt2','Extended').setExtended( 1.2599210498948731648);<br />

5309: 'ESBCbrt3','Extended').setExtended( 1.4422495703074<strong>08</strong>3823);<br />

5310: 'ESBCbrt10','Extended').setExtended( 2.15443469003188<strong>37</strong>219);<br />

5311: 'ESBCbrt100','Extended').setExtended( 4.6415888336127788924);<br />

5312: 'ESBCbrtPi','Extended').setExtended( 1.4645918875615232630);<br />

5313: 'ESBInvSqrt2','Extended').setExtended( 0.70710678118654752440);<br />

53<strong>14</strong>: 'ESBInvSqrt3','Extended').setExtended( 0.57735026918962576451);<br />

5315: 'ESBInvSqrt5','Extended').setExtended( 0.44721359549995793928);<br />

5316: 'ESBInvSqrtPi','Extended').setExtended( 0.56418958354775628695);<br />

53<strong>17</strong>: 'ESBInvCbrtPi','Extended').setExtended( 0.68278406325529568<strong>14</strong>7);<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: 61

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

Saved successfully!

Ooh no, something went wrong!