Fix ElPack

Quanos Service Solutions GmbH

Please add following code:

 procedure TCustomElEdit.WMKillFocus(var Msg : TWMKillFocus); { private }
 begin
+  if (csDestroying in ComponentState) then 
+    Exit;
   if FHasCaret then
   begin
     DestroyCaret;

<!--[if gte mso 9]>


















































































































































































































































































































<w:LsdException Locked="false" Priority="50" Name="Grid

balabuev

Hi,

Thanks for report.

You code has been incorporated.