Delphi message window Application.messagebox

1, the namespace: Vcl.Forms

2, Application.MessageBox () parameters:

      Such as: Application.MessageBox ( ' the current search result is empty, make sure XXXXX! ' , ' Tip: ' , MB_OK) 
                first and second are: PWideChar 
                        when used in String type message_info can use this conversion: PWideChar (WideString (str_Message)) 
                    the Message _info: = ' the current search result is empty, make sure XXXXX! ' ;
                         Message _ type : = ' Tip: ' ;                        
                        Application.MessageBox (PWideChar (a WideString ( Message the _info)), PWideChar (a WideString ( Message _ type )), MB_OK)
                The third parameter is the type of keys on the form:      
                        MB_OK: Only OK key 
                        MB_OKCANCEL: OK and Cancel keys

3, Application.messagebox (): returns the value.

     Click OK: The return value is 1 (Integer); 
         such as: 
         IF (Application.messagebox ( ' ? OK to delete ' , ' Tip: ' , MB_OKCANCEL) <> 1 )
          the begin 
 
         End ;