mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-09-13 11:39:13 +02:00
identifier completion: basically working, still hidden
git-svn-id: trunk@2168 -
This commit is contained in:
parent
0c825a7d38
commit
8d05cf689c
@ -937,7 +937,7 @@ procedure TWinControl.SetColor(Value: TColor);
|
|||||||
begin
|
begin
|
||||||
if Value=Color then exit;
|
if Value=Color then exit;
|
||||||
inherited SetColor(Value);
|
inherited SetColor(Value);
|
||||||
if HandleAllocated then
|
if HandleAllocated and (not (csLoading in ComponentState)) then
|
||||||
CNSendMessage(LM_SETCOLOR, Self, nil);
|
CNSendMessage(LM_SETCOLOR, Self, nil);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
@ -2563,6 +2563,9 @@ end;
|
|||||||
{ =============================================================================
|
{ =============================================================================
|
||||||
|
|
||||||
$Log$
|
$Log$
|
||||||
|
Revision 1.112 2002/12/29 18:13:38 mattias
|
||||||
|
identifier completion: basically working, still hidden
|
||||||
|
|
||||||
Revision 1.111 2002/12/28 17:43:43 mattias
|
Revision 1.111 2002/12/28 17:43:43 mattias
|
||||||
fixed FindControl and searching overloaded procs
|
fixed FindControl and searching overloaded procs
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user