From 83e3e2c92230acf279842a495bd9061564e11c04 Mon Sep 17 00:00:00 2001
From: lazarus <lazarus@lazarus-ide.org>
Date: Sat, 17 Aug 2002 23:41:13 +0000
Subject: [PATCH] MG: fixed LM_LVChangedItem, OnShowHint, small bugs

git-svn-id: trunk@2293 -
---
 lcl/include/winapi.inc  | 9 +++++++++
 lcl/include/winapih.inc | 4 ++++
 2 files changed, 13 insertions(+)

diff --git a/lcl/include/winapi.inc b/lcl/include/winapi.inc
index d0cd6a2ee5..c5c6d9f22b 100644
--- a/lcl/include/winapi.inc
+++ b/lcl/include/winapi.inc
@@ -385,6 +385,12 @@ begin
   Result := InterfaceObject.GetKeyState(nVirtKey);
 end;
 
+function GetNotebookTabIndexAtPos(Handle: HWND;
+  const ClientPos: TPoint): integer;
+begin
+  Result := InterfaceObject.GetNotebookTabIndexAtPos(Handle,ClientPos);
+end;
+
 function GetObject(GDIObject: HGDIOBJ; BufSize: Integer; Buf: Pointer): Integer;
 begin
   Result := InterfaceObject.GetObject(GDIObject, BufSize, Buf);
@@ -1380,6 +1386,9 @@ end;
 { =============================================================================
 
   $Log$
+  Revision 1.61  2002/11/09 15:02:07  lazarus
+  MG: fixed LM_LVChangedItem, OnShowHint, small bugs
+
   Revision 1.60  2002/10/31 21:29:47  lazarus
   MG: implemented TControlScrollBar.Size
 
diff --git a/lcl/include/winapih.inc b/lcl/include/winapih.inc
index 51ff049d4a..7629e314ac 100644
--- a/lcl/include/winapih.inc
+++ b/lcl/include/winapih.inc
@@ -112,6 +112,7 @@ function GetBitmapBits(Bitmap: HBITMAP; Count: Longint;  Bits: Pointer): Longint
 function GetDIBits(DC: HDC; Bitmap: HBitmap; StartScan, NumScans: UINT; Bits: Pointer; var BitInfo: BitmapInfo; Usage: UINT): Integer;{$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
 function GetFocus: HWND; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
 function GetKeyState(nVirtKey: Integer): Smallint; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
+function GetNotebookTabIndexAtPos(Handle: HWND; const ClientPos: TPoint): integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
 function GetObject(GDIObject: HGDIOBJ; BufSize: Integer; Buf: Pointer): Integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
 Function GetParent(Handle : HWND): HWND; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
 Function GetProp(Handle : hwnd; Str : PChar): Pointer;{$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
@@ -335,6 +336,9 @@ Function RGB(R, G, B : Byte) : TColorRef;
 { =============================================================================
 
   $Log$
+  Revision 1.54  2002/11/09 15:02:07  lazarus
+  MG: fixed LM_LVChangedItem, OnShowHint, small bugs
+
   Revision 1.53  2002/10/31 21:29:47  lazarus
   MG: implemented TControlScrollBar.Size