Delphi XE7 中的 TOpendialog 或 Mac (yosemite) 上的 Delphi XE7 UP1 有问题。之后Opendialog1.execute
,整个表单会出现一些奇怪的问题,有时应用程序会崩溃。
我在另一台运行 Mavericks 的 Mac 上尝试了相同的应用程序,它运行良好。
这是一个源代码。
unit Unit1;
interface
uses
System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants,
FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.fmx}
procedure TForm1.Button1Click(Sender: TObject);
begin
OpenDialog1.Execute;
end;
end.
这是 Paserver 显示的内容:
进程控制服务器启动 pid 884 exe 构建于 2014 年 7 月 18 日
哨兵功能 886
2014-12-02 21:24:19.360 Project1 [888:27602] --ImageKit 错误:updateGLTextureWithBitmapData:glPixelStorei 返回错误:502(subSize=[64.000000,64.000000] 偏移量 [704.000000,0.000000] glID:130,上下文:0x1326c )
像这样: