代码解释(5分)

procedure TFm_stock_main.OpenRmInsertForm;
begin
if Fm_stock_rm_insert = nil then
application.CreateForm(TFm_stock_rm_insert, Fm_stock_rm_insert)
else
Fm_stock_rm_insert.Close;

if Fm_stock_rm_insert.Showing = false then
begin
Fm_stock_rm_insert := TFm_stock_rm_insert.CreateParented(Fm_stock_main.Handle);
Fm_stock_rm_insert.Show;
SendMessage(Fm_stock_rm_insert.Handle, WM_NCACTIVATE, Ord(True), 0);
end;
Fm_stock_rm_insert.WindowState := wsMaximized;

end;


以上代在码哪位能不能详细给我注释一下，并说明这段是什么意思SendMessage(Fm_stock_rm_insert.Handle, WM_NCACTIVATE, Ord(True), 0);及这段表是什么
Fm_stock_rm_insert.Showing = false

谢谢你们

就是判断Fm_stock_rm_insert这个窗口是否显示，如果没有显示，就将它显示出来，并将他标题栏置为被激活状态。
Fm_stock_rm_insert.Showing = false 判断窗口是否在显示
SendMessage(Fm_stock_rm_insert.Handle, WM_NCACTIVATE, Ord(True), 0);让窗口标题栏处一被激活的状态。

接受答案了.