diff --git a/lcl/include/winapi.inc b/lcl/include/winapi.inc index 5dd8b89b77..cc1425f0c6 100644 --- a/lcl/include/winapi.inc +++ b/lcl/include/winapi.inc @@ -507,6 +507,11 @@ begin Result := InterfaceObject.LineTo(DC, X, Y); end; +Function LoadStockPixmap(StockID: longint) : HBitmap; +begin + Result := InterfaceObject.LoadStockPixmap(StockID); +end; + function MaskBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc: Integer; Mask: HBITMAP; XMask, YMask: Integer; Rop: DWORD): Boolean; begin Result := InterfaceObject.MaskBlt(DestDC, X, Y, Width, Height, SrcDC, XSrc, YSrc, Mask, XMask, YMask, Rop); @@ -1299,6 +1304,9 @@ end; { ============================================================================= $Log$ + Revision 1.53 2002/10/10 13:29:08 lazarus + AJ: added LoadStockPixmap routine & minor fixes to/for GNOMEInt + Revision 1.52 2002/10/03 14:47:31 lazarus MG: added TComboBox.OnPopup+OnCloseUp+ItemWidth diff --git a/lcl/include/winapih.inc b/lcl/include/winapih.inc index d41b2cc6be..95ec90f943 100644 --- a/lcl/include/winapih.inc +++ b/lcl/include/winapih.inc @@ -145,6 +145,7 @@ Function InvalidateRect(aHandle : HWND; Rect : pRect; bErase : Boolean) : Boolea function KillTimer (hWnd : HWND; uIDEvent : cardinal) : boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF} function LineTo(DC: HDC; X, Y: Integer): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF} +Function LoadStockPixmap(StockID: longint) : HBitmap; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF} function MaskBlt(DestDC: HDC; X, Y, Width, Height: Integer; SrcDC: HDC; XSrc, YSrc: Integer; Mask: HBITMAP; XMask, YMask: Integer; Rop: DWORD): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF} function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: Cardinal): integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF} @@ -310,6 +311,9 @@ Function RGB(R, G, B : Byte) : TColorRef; { ============================================================================= $Log$ + Revision 1.47 2002/10/10 13:29:08 lazarus + AJ: added LoadStockPixmap routine & minor fixes to/for GNOMEInt + Revision 1.46 2002/10/03 14:47:31 lazarus MG: added TComboBox.OnPopup+OnCloseUp+ItemWidth