Index: lcl/include/wincontrol.inc
===================================================================
--- lcl/include/wincontrol.inc (wersja 8136)
+++ lcl/include/wincontrol.inc (kopia robocza)
@@ -3993,7 +3993,7 @@
begin
if not HandleAllocated then
//Assert(False, Format('Trace:[TWinControl.GetHandle] %s(%s)',
[ClassNAme, Name]))
- ;
+
HandleNeeded;
Result := FHandle;
end;
------------------------
Darek
_________________________________________________________________
To unsubscribe: mail [EMAIL PROTECTED] with
"unsubscribe" as the Subject
archives at http://www.lazarus.freepascal.org/mailarchives
