单击弹出新窗口

单击按钮弹出新窗口代码和效果:

procedure TForm3.N22Click(Sender: TObject);
begin
Fleibie.showmodal;
end;

 

posted @ 2017-06-23 15:10  delphi学习交流吧  阅读(395)  评论(0编辑  收藏  举报