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