Поскольку TTabSheets не является родительским элементом формы, что касается VCL ( не хотел использовать динамический RTL, и плагины, созданные на других языках ), мне приходится обрабатывать изменения размеров вручную. Я делаю это, как показано ниже:
var
ChildHandle: DWORD;
begin
If Assigned (pcMain.ActivePage) Then
begin
ChildHandle : = FindWindowEx (pcMain.ActivePage.Handle, 0, 'TfrmPluginForm', nil);
Если ChildHandle> 0 Тогда
begin
SetWindowPos (ChildHandle, 0, 0, 0, pcMain.ActivePage.Width, pcMain.ActivePage.Height, SWP_NOZORDER + SWP_NOACTIVATE + SWP_NOCOPYBITS);
end;
end;
Теперь моя проблема в том, что когда приложение изменяется размер, все TGroupBoxes и TLabels внутри TGroupBoxes мерцают. TLabels, которые не находятся внутри TGroupboxes, в порядке и не мерцают.
То, что я пробовал:
Есть идеи?