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

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

3<strong>14</strong>2: Procedure ShadeRect( DC : HDC; const Rect : TRect)<br />

3<strong>14</strong>3: Procedure KillMessage( Wnd : HWND; Msg : Cardinal)<br />

3<strong>14</strong>4: Function DialogsToPixelsX( Dlgs : Word) : Word<br />

3<strong>14</strong>5: Function DialogsToPixelsY( Dlgs : Word) : Word<br />

3<strong>14</strong>6: Function PixelsToDialogsX( Pixs : Word) : Word<br />

3<strong>14</strong>7: Function PixelsToDialogsY( Pixs : Word) : Word<br />

3<strong>14</strong>8: {$IFDEF WIN32}<br />

3<strong>14</strong>9: procedure ShowMDIClientEdge(ClientHandle: THandle; ShowEdge: Boolean);<br />

3150: function MakeVariant(const Values: array of Variant): Variant;<br />

3151: {$ENDIF}<br />

3152: function CreateRotatedFont(Font: TFont; Angle: Integer): HFONT;<br />

3153: function MsgBox(const Caption, Text: string; Flags: Integer): Integer;<br />

3154: function MsgDlg(const Msg:string; AType:TMsgDlgType; AButtons: TMsgDlgButtons; HelpCtx: Longint): Word;<br />

3155: {$IFDEF CBUILDER}<br />

3156: function FindPrevInstance(const MainFormClass: ShortString; const ATitle: string): HWND;<br />

3157: function ActivatePrevInstance(const MainFormClass: ShortString; const ATitle: string): Boolean;<br />

3158: {$ELSE}<br />

3159: function FindPrevInstance(const MainFormClass, ATitle: string): HWND;<br />

3160: function ActivatePrevInstance(const MainFormClass, ATitle: string): Boolean;<br />

3161: {$ENDIF CBUILDER}<br />

3162: function IsForegroundTask: Boolean;<br />

3163: procedure MergeForm(AControl: TWinControl; AForm: TForm; Align: TAlign; Show: Boolean);<br />

3164: function GetAveCharSize(Canvas: TCanvas): TPoint;<br />

3165: function MinimizeText(const Text: string; Canvas: TCanvas; MaxWidth: Integer): string;<br />

3166: procedure FreeUnusedOle;<br />

3167: procedure Beep;<br />

3168: function GetWindowsVersionJ: string;<br />

3169: function LoadDLL(const LibName: string): THandle;<br />

3<strong>17</strong>0: function RegisterServer(const ModuleName: string): Boolean;<br />

3<strong>17</strong>1: {$IFNDEF WIN32}<br />

3<strong>17</strong>2: function IsLibrary: Boolean;<br />

3<strong>17</strong>3: {$ENDIF}<br />

3<strong>17</strong>4: { Gradient filling routine }<br />

3<strong>17</strong>5: type TFillDirection = (fdTopToBottom, fdBottomToTop, fdLeftToRight, fdRightToLeft);<br />

3<strong>17</strong>6: procedure GradientFillRect(Canvas: TCanvas; ARect: TRect; StartColor, EndColor: TColor; Direction:<br />

TFillDirection; Colors: Byte);<br />

3<strong>17</strong>7: { String routines }<br />

3<strong>17</strong>8: function GetEnvVar(const VarName: string): string;<br />

3<strong>17</strong>9: function AnsiUpperFirstChar(const S: string): string;<br />

3180: function StringToPChar(var S: string): PChar;<br />

3181: function StrPAlloc(const S: string): PChar;<br />

3182: procedure SplitCommandLine(const CmdLine: string; var ExeName,Params: string);<br />

3183: function DropT(const S: string): string;<br />

3184: { Memory routines }<br />

3185: function AllocMemo(Size: Longint): Pointer;<br />

3186: function ReallocMemo(fpBlock: Pointer; Size: Longint): Pointer;<br />

3187: procedure FreeMemo(var fpBlock: Pointer);<br />

3188: function GetMemoSize(fpBlock: Pointer): Longint;<br />

3189: function CompareMem(fpBlock1, fpBlock2: Pointer; Size: Cardinal): Boolean;<br />

3190: {$IFNDEF COMPILER5_UP}<br />

3191: procedure FreeAndNil(var Obj);<br />

3192: {$ENDIF}<br />

3193: // from PNGLoader<br />

3194: Function OptimizeForPNG(Image:TLinearBitmap;QuantizationSteps:Integer;TransparentColor:TColor):Integer<br />

3195: Procedure TransformRGB2LOCO( Image : TLinearBitmap)<br />

3196: Procedure TransformLOCO2RGB( Image : TLinearBitmap)<br />

3197: Procedure SortPalette( const Pal : TPalette; var ColorMap : TColorMap)<br />

3198: Function DrawButtonFace( Canvas : TCanvas; const Client : TRect; BevelWidth : Integer; Style :<br />

TButtonStyle; IsRounded, IsDown, IsFocused : Boolean) : TRect //TButtons<br />

3199: Function IsAnAllResult( const <strong>AM</strong>odalResult : TModalResult) : Boolean<br />

3200: Function InitWndProc( HWindow : HWnd; Message, WParam : Longint; LParam : Longint) : Longint<br />

3201: AddConstantN('CTL3D_ALL','LongWord').SetUInt( $FFFF);<br />

3202: //Procedure ChangeBiDiModeAlignment( var Alignment : TAlignment)<br />

3203: //Function SendAppMessage( Msg : Cardinal; WParam, LParam : Longint) : Longint<br />

3204: //Procedure MoveWindowOrg( DC : HDC; DX, DY : Integer)<br />

32<strong>05</strong>: Procedure SetImeMode( hWnd : HWND; Mode : TImeMode)<br />

3206: Procedure SetImeName( Name : TImeName)<br />

3207: Function Win32NLSEnableIME( hWnd : HWND; Enable : Boolean) : Boolean<br />

32<strong>08</strong>: Function Imm32GetContext( hWnd : HWND) : HIMC<br />

3209: Function Imm32ReleaseContext( hWnd : HWND; hImc : HIMC) : Boolean<br />

3210: Function Imm32GetConversionStatus( hImc : HIMC; var Conversion, Sentence : longword) : Boolean<br />

3211: Function Imm32SetConversionStatus( hImc : HIMC; Conversion, Sentence : longword) : Boolean<br />

3212: Function Imm32SetOpenStatus( hImc : HIMC; fOpen : Boolean) : Boolean<br />

3213: // Function Imm32SetCompositionWindow( hImc : HIMC; lpCompForm : PCOMPOSITIONFORM) : Boolean<br />

32<strong>14</strong>: //Function Imm32SetCompositionFont( hImc : HIMC; lpLogfont : PLOGFONTA) : Boolean<br />

3215: Function Imm32GetCompositionString(hImc:HIMC;dWord1:longword;lpBuf:string;dwBufLen:longint):Longint<br />

3216: Function Imm32IsIME( hKl : longword) : Boolean<br />

32<strong>17</strong>: Function Imm32NotifyIME( hImc : HIMC; dwAction, dwIndex, dwValue:longword):Boolean<br />

3218: Procedure DragDone( Drop : Boolean)<br />

3219:<br />

3220:<br />

3221: //****************************************added from jvjvclutils<br />

3222: function CanvasMaxTextHeight(Canvas: TCanvas): Integer;<br />

3223: function ReplaceComponentReference(This,NewReference:TComponent;var VarReference:TComponent):Boolean;<br />

3224: procedure DrawLine(Canvas: TCanvas; X, Y, X2, Y2: Integer);<br />

3225: function IsPositiveResult(Value: TModalResult): Boolean;<br />

3226: function IsNegativeResult(Value: TModalResult): Boolean;<br />

3227: function IsAbortResult(const Value: TModalResult): Boolean;<br />

3228: function StripAllFromResult(const Value: TModalResult): TModalResult;<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: <strong>37</strong>

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

Saved successfully!

Ooh no, something went wrong!