Lazarus 界面退出

加了一下插件后，出现报错，原来LAZARUS中很多命名相同的属性
这点也DELPHI不同，不通用的地方

最后解决办法
Mstr:='Are you sure you want to quit this system?';
if MessageDlg(Mstr,mtWarning,[mbYes,mbNo],0)=mrYes then
begin
CloseServerSocket;
Application.Terminate;
// ExitProcess(0); //结束程序
/////
end else
begin
CloseAction:=Forms.caNone; //这里用在WINDOWS下
end;