Delphi 資訊框

Delphi 資訊框：

       1. showmessage   。。。你懂得。。。

       2. ShowMessagePos(const Msg: string; X, Y: Integer) : 指定位置顯示對話框

  ShowmessagePos(‘dialog box’,100,100)

       3. MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint): Word;

                 MessageDlg('hint',mtInformation,[mbOK],0);

            TMsgDlgType ： mtwaring……  TMsgDlgButtons : mbok…….

       4. MessageDlgPos(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Longint; X, Y: Integer): Word; 指定位置顯示對話框

               MessageDlgPos('information',mtInformation,[mbOK],0,100,100);

      5. MessageBox(const Text, Caption: PChar; Flags: Longint = MB_OK): Integer;

               MessageBox(0,'information','title',MB_YESNOCANCEL);

     6. InputBox(const ACaption, APrompt, ADefault: string): string;

InputBox('Title','Information','');

     7. InputQuery(const ACaption, APrompt: string; var Value: string): Boolean

               if InputQuery('title','information',s) then

                showmessage(s)