delphi的消息对话框

1、messagebox：显示一条消息和一个或多个按钮，并且可以通过用户在对话框中的选择接收用户的响应。
2、messagedlg：
语法格式：
function messagedlg(const msg:string; AType: TMsgdlgtype; Abuttons; TMsgdlgbuttons; helpctx: longint 
):word;
它包括四个参数，第一个参数msg是显示在对话框中的消息；第二个参数Atype是对话框所包含的不同图标类型。
第三个参数AButtons是对话框所包含的按钮数目和类型，AButton参数为TMsgdlgbtns类型，它是一个集合，因此在应集合内可包含多个按钮。
helpCtx参数定义对话框的帮助屏幕。当用户从对话框中选取一个按钮后，messagedlg函数返回一个值表示此按钮被选中，其返回值与按钮的关系如下所示：
数值 含义 
mrNone 没有选中任何按钮 
mrOK 选中mrOK按钮 
mrCancel 选中mrCancel按钮 
mrAbort 选中mrAbort按钮 
mrRetry 选中mrRetry按钮 
mrIgnore 选中mrIgnore按钮 
mrYes 选中mrYes按钮 
mrNo 选中mrNo按钮 
mrAll 选中mrAll按钮 

[例]：if messagedlg('want to exit system?',mtconflrmation, [mbYes, mbNo],0)=mrYes then
messagedlg('exit system now!',mtinformation,[mbOK], 0); 
3、messagedlgpas函数，它的使用基本与messagedlg相同，只是多了两个参数X和Y，可以在用户指定的位置显示对话框。
4、showmessage函数，它只带一个字符串参数msg，用于显示一个带OK按钮的对话框，对话框的消息为msg，标题为可执行文件名。
如：showmessage('what are you saying?');
5、showmessagepos函数，它的使用基本与showmessage相同，只是多了两个参数X和Y，可以在用户指定的位置显示对话框。
如：showmessagepos('what are you saying?',125.25) 

调用外部EXE文件：
use WinProcs
……
begin
winExec(……)；
……
end； 

delphi对JPEG图像文件的处理：
一、显示JPEG图像文件
在USES中加入JPEG，用loadfromfile调入某个JPEG文件，然后用FORM的canvas.draw(x,y,jpeg)即可显示。
二、编写一个处理JPEG图像文件的程序：

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,jpeg; //在USES中加入JPEG单元

type
TForm1 = class(TForm)
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

var
AJPEG:TJPEGImage; //定义一个全局变量

procedure TForm1.FormCreate(Sender: TObject);
begin
AJPEG:=TJpegimage.create //动态生成AJPEG
AJPEG.loadfromfile('c:\photo.jpg') //调入JPEG文件
end;

procedure TForm1.onpain(Sender:TObject);
begin
canvas.rectangle(2,2,650,430); //画一个黑框将图片围住
x:=10;y:=10;
form1.canvas.draw(x,y,AJpeg); 
//以（X，Y）为上角输出JPEG文件
end;

procedure TForm1.browseClick(Sender: TObject);
begin
if openpicturedialog.execute then
begin
ajpeg.free;
ajpeg:=Tjpegimage.create;
ajpeg.loadfromfile(openpicturedialog.filename);
end;
canvas.rectangle(2,2,560,430); //将form clear
x:=10; y:=10;
form1.canvas.draw(x,y,ajpeg); //显示新的ajpeg
end;

end.