Mac 上 Delphi XE7(up1) 中的 TOpendialog 有问题吗？答案

【问题标题】：TOpendialog in Delphi XE7(up1) on Mac has something wrong?Mac 上 Delphi XE7(up1) 中的 TOpendialog 有问题吗？
【发布时间】：2015-01-30 12:54:51
【问题描述】：

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 显示的内容：

进程控制服务器于 2014 年 7 月 18 日启动 pid 884 exe 构建

sentinelFunc 886

2014-12-02 21:24:19.360 Project1[888:27602] --ImageKit 错误：updateGLTextureWithBitmapData：glPixelStorei 返回错误：502 (subSize=[64.000000,64.000000] offset [704.000000,0.000000] glID:1,上下文：0x1326c930）

像这样：

【问题讨论】：

你不是已经问过这个问题了吗？为什么还要问？
那个问题被删了，他们说我没有给出源代码。我不知道我所做的是否被允许，对不起。
所以现在我们必须再次删除它？再写一遍所有的cmets？我建议您将此问题提交给 Quality Portal。你这样做了吗？如果没有，为什么不呢？
你能告诉我为什么吗？
这样好多了。做得好。对我来说它看起来像一个错误。我当然会把它提交到质量门户。

标签： macos delphi firemonkey delphi-xe7

【解决方案1】：

我无法在我的系统上重现此问题。所以我怀疑这是你的代码的问题。

您是否尝试过重置 Mac 的 PRAM？如果以某种方式搞砸了，您可能会遇到您所描述的问题。 http://support.apple.com/kb/PH14222

【讨论】：

谢谢。此问题仅在 Delphi 应用程序中显示。我使用的系统是 Yosemite，但我没有其他系统要测试。