diff --git a/Units/Misc/ValistusDefines.inc b/Units/Misc/ValistusDefines.inc index b58a4d3..49d43cb 100644 --- a/Units/Misc/ValistusDefines.inc +++ b/Units/Misc/ValistusDefines.inc @@ -1,6 +1,6 @@ //Code Insight {$IFNDEF LINUX} - {$DEFINE ccFORMRESIZE} +// {$DEFINE ccFORMRESIZE} {$ENDIF} {.$DEFINE ccFORMCAPTION} diff --git a/Units/Misc/v_autocompleteform.pas b/Units/Misc/v_autocompleteform.pas index 84791a5..46ba181 100644 --- a/Units/Misc/v_autocompleteform.pas +++ b/Units/Misc/v_autocompleteform.pas @@ -479,7 +479,7 @@ end; constructor TAutoCompletePopup.Create(TheOwner: TComponent); begin - inherited; + inherited CreateNew(TheOwner); l := TAutoCompleteListBox.Create(Self); with l do @@ -524,6 +524,7 @@ begin ClientHeight := (Round(ClientHeight / l.ItemHeight) * l.ItemHeight); Constraints.MinHeight := l.ItemHeight; Constraints.MinWidth := 100; + Resize; end; procedure TAutoCompletePopup.DoHide;