procedure TWinControl.SendMoveSizeMessages(SizeChanged, PosChanged: boolean); begin ... with SizeMsg do begin Msg := LM_SIZE; SizeType := 6; // force realign ... Width := FWidth; Height := FHeight; ... WindowProc(TLMessage(SizeMsg)); end;