S
springwater
Unregistered / Unconfirmed
GUEST, unregistred user!
Delphi为OpenPictureDialoge和SavePictureDialoge组件提供了一个
缺省的文件过滤器(Filter),其Filter Editor对话框中给出了7种
过滤类型,但我在程序中实际运行时却只见到过滤出的类型只有5种,
少了:*.jpg和*.jpeg。请问为什么会这样呢?程序可简化为如下:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtDlgs;
type
TForm1 = class(TForm)
OpenPictureDialog1: TOpenPictureDialog;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
OpenPictureDialog1.Execute;
end;
end.
请问为什么呢?如何让*.jpg和*.jpeg显示出来呢?盼望您的回答。
缺省的文件过滤器(Filter),其Filter Editor对话框中给出了7种
过滤类型,但我在程序中实际运行时却只见到过滤出的类型只有5种,
少了:*.jpg和*.jpeg。请问为什么会这样呢?程序可简化为如下:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtDlgs;
type
TForm1 = class(TForm)
OpenPictureDialog1: TOpenPictureDialog;
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
OpenPictureDialog1.Execute;
end;
end.
请问为什么呢?如何让*.jpg和*.jpeg显示出来呢?盼望您的回答。