paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-12-16 05:00:46 +01:00
Code Issues Packages Projects Releases Wiki Activity

fixed TRadioGroup.ItemIndex=-1

Browse Source 
git-svn-id: trunk@2598 -
This commit is contained in:
mattias 2002-08-17 23:41:30 +00:00
parent 00459728c6
commit c84df3013b
2 changed files with 13 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
lcl/include/interfacebase.inc
View File

@ -1527,6 +1527,12 @@ Begin
Result := True;
end;
function TInterfaceBase.SetRadioButtonGroupMode(Handle: hWnd;
AutoGroup: boolean): Boolean;
Begin
Result := False;
end;
function TInterfaceBase.SetScrollInfo(Handle : HWND; SBStyle : Integer;
ScrollInfo: TScrollInfo; Redraw : Boolean): Integer;
begin
@ -1660,6 +1666,9 @@ end;
{ =============================================================================
$Log$
Revision 1.84 2003/03/17 20:50:30 mattias
fixed TRadioGroup.ItemIndex=-1
Revision 1.83 2003/03/17 08:51:09 mattias
added IsWindowVisible

4
lcl/include/winapih.inc
View File

@ -220,6 +220,7 @@ function SetCursor(hCursor: HICON): HCURSOR; {$IFDEF IF_BASE_MEMBER}virtual;{$EN
function SetFocus(hWnd: HWND): HWND; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
function SetMapMode(DC: HDC; MapMode: Integer): Integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
Function SetProp(Handle: hwnd; Str : PChar; Data : Pointer) : Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
function SetRadioButtonGroupMode(Handle: hWnd; AutoGroup: boolean): Boolean; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
//function SetRect --> independent
//function SetRectEmpty --> independent
function SetScrollInfo(Handle: HWND; SBStyle : Integer; ScrollInfo: TScrollInfo; Redraw : Boolean): Integer; {$IFDEF IF_BASE_MEMBER}virtual;{$ENDIF}
@ -374,6 +375,9 @@ procedure RaiseLastOSError;
{ =============================================================================
$Log$
Revision 1.71 2003/03/17 20:50:30 mattias
fixed TRadioGroup.ItemIndex=-1
Revision 1.70 2003/03/17 08:51:09 mattias
added IsWindowVisible