lookup-формы изменяющегося размера

[slava]

Я поправил в классе SysTableLookup метод formRun
сравните то что есть со следующим кодом:
<pre>// Slava, 18/01-02, -->
// было formBuildDesign.frame(FormFrame::Border);
formBuildDesign.frame(FormFrame::Standard);
formBuildDesign.windowType(FormWindowType::Standard); // добавлено
formBuildDesign.windowResize(FormWindowResize:: Dynamic); // добавлено

formBuildDesign.hideIfEmpty(false);
formBuildDesign.hideToolbar(false);
formBuildDesign.top(0); // было formBuildDesign.top(15);
formBuildDesign.topMargin(0); // было formBuildDesign.topMargin(2);
formBuildDesign.left(0); // было formBuildDesign.left(15);
formBuildDesign.leftMargin(0);
formBuildDesign.rightMargin(0);
formBuildDesign.bottomMargin(0);
// Slava, 18/01-02, <--

formBuildGridControl = formBuildDesign.addControl(FormControlType::GRID,'Grid');
formBuildGridControl.dataSource(dictTable.name());
formBuildGridControl.allowEdit(false);
formBuildGridControl.showRowLabels(false);

// Slava, 18/01-02, -->
formBuildGridControl.widthMode(FormWidth::ColumnWidth);
formBuildGridControl.heightMode(FormHeight::ColumnHeight);
// Slava, 18/01-02, <--


</pre>
<br>


В итоге получаю форму, по виду нелукапную, но с lookup-свойствами.
Ее можно таскать, изменять размер