win.Root.Owner <- parent
win.Root.Left <- parent.Left + parent.ActualWidth / 2. - win.Root.Width / 2.
win.Root.Top <- parent.Top + parent.ActualHeight / 2. - win.Root.Height / 2.
win.Root.Owner <- parent
win.Root.Left <- parent.Left + parent.ActualWidth / 2. - win.Root.Width / 2.
win.Root.Top <- parent.Top + parent.ActualHeight / 2. - win.Root.Height / 2.