让窗体保持在最上方--delphi源码。可以解决窗体被覆盖的问题。