begin MessageBox(frmDisableTickets.Handle, PChar('該票號:' ticketBox[i] '不存在或已銷過號請查明,謝謝'), PChar('票券管理系統'), MB_ICONWARNING); end;