标签: delphi-xe5

对于我的应用程序，当显示新表单时，我希望有一个过渡幻灯片，当它们看起来有点类似于 Tab 项在幻灯片过渡中的显示方式 - 好吧，实际上以相同的方式。

我无法找到有关特定问题的任何故障排除或示例。我能想到的唯一解决方法就是为所有三个表单使用选项卡控件并将它们放置在选项卡控件中。

我也尝试过Form.animateFloatWait()通常对表单控件执行的功能，但无济于事。

如何让我的表单在视图中滑动？

有没有办法在Delphi XE5/Android平台上播放声音警报/哔哔声？

我想要实现的是如何使用Beep功能播放系统警报/哔声,如Windows应用程序或至少找到系统音频文件的路径,以便我可以根据事件运行特定的音频文件.

是否有任何演示可用于显示如何在移动应用程序中处理多分辨率图像,例如按钮图像,闪屏和背景？我正在尝试制作一个在许多分辨率上看起来不错的应用程序,但我在执行它时遇到了问题.

例如,如果我在三星Galaxy Tab 2.0 7中加载我的应用程序,它将自动加载我所拥有的1.0的比例,但如果我在三星galaxy s4中加载我的应用程序,那么它将加载1.5比率的图像.现在......如果我使用480x800的比例1的图像,对于Galaxy Tab 2.0的屏幕而言,它有点小,如果我再次在具有较小屏幕的移动设备中加载应用程序,其将使用比率1.0,图像尺寸为好.

由于我不能指定两个不同的分辨率图像到一个特定的比例我应该如何正确使用TImage的MultiResolution属性？

如何AlphaBlend在FireMonkey桌面应用程序中更改(表单的)值？好吧它可以在VCL应用程序中使用,但我在FireMonkey中找不到它.

截图:

正如Embarcadero所说:

" WebBrowser不接受Android上的键盘输入

在Android设备上,屏幕键盘在TWebBrowser控件中不可用.例如,这意味着用户无法完成Web表单.TWebBrowser控件应用于显示信息或文档.应使用FireMonkey控件执行用户交互."

链接

如果我们必须使用像Dropbox或Google Drive这样的云识别页面,这非常烦人.

使用Delphi XE5和REST组件,我可以打开登录页面,但键盘在Android上无法正常运行.

因此,如何使用FireMonkey控件执行交互,因为Embarcadero说:用户交互应该使用FireMonkey控件执行.？

编辑:

Delphi XE 6似乎是唯一不错的解决方案:

对TWebBrowser的更新:Windows上可用的Web浏览器(SHDocVw.TWebBrowser)已更新为最新版本的Internet Explorer.

如何在Firemonkey(Delphi Android)中更改ListView项的背景颜色？Listview本身可以设置为透明,但如果我添加一个Item它有白色背景/

我有一个第三方单元，女巫在单元的初始化部分引发异常。如何在我的应用程序中捕获此异常？

执行搜索时,TListview无法正确重新加载,清除搜索,然后重新加载列表视图.使用XE5.

步骤是:

1. 项目运行后输入文本进入搜索.
2. 清除搜索,单击"清除"按钮或删除搜索文本或单击搜索"X"按钮.
3. 按"重新加载"按钮.什么也没出现.您可以单步执行重新加载过程,并查看是否已添加每个项目.但是,结果列表计数为"0"!!!
4. 但是,如果您添加搜索文本,则会重新显示这些项目.这太疯狂了.然后再次清除搜索并显示所有项目.点击重新加载按钮,它们就会消失.
5. 我已经尝试过所有可以解决这个问题的技巧,并且没有任何结果.即使清除搜索,列表视图也会保留搜索内容.
6. 所以目前listview是一个故障控制.如果进行搜索,则无法清除搜索并重新加载列表视图.
7. 我甚至尝试过TSearchBox并设置"DeleteSelection","ResetSelection"和"ClearSelection"<>这些都不起作用.

这个古怪的事情有什么帮助吗？

代码如下:

procedure TForm1.FormCreate(Sender: TObject);
var
  i: integer;
  LItem: TListviewItem;
begin
  if Assigned(Listview1) then
    Listview1.Items.Clear;
  for i := 1 to 20 do
  begin
    LItem := Listview1.Items.Add;
    LItem.Text := IntToStr(i);
  end;
end;

procedure TForm1.btnButton1Click(Sender: TObject);  { reload button }
var
  i: integer;
  LItem: TListviewItem;
begin
  btnButton2Click(btnButton2);                <<<<edit add
  if Assigned(Listview1.Items.Filter) then    <<<<edit add
    Listview1.Items.Filter := nil;            <<<<edit add
  if Assigned(Listview1) then
    Listview1.Items.Clear;
  for i := 1 to 20 do
  begin
    LItem := …

我试图用单行调试多个函数调用的密集代码.我想单步执行我编写的所有代码,但在这样做的过程中,我不断发现自己使用提供的源代码,包括汇编代码.

这发生在运行XE5的机器上的客户端站点上.它不会发生在我自己的代码上,运行XE2和XE4.

什么是神奇的设置,让他们按照我想要的方式工作？

我在 Delphi 中重新声明 helper 时遇到问题。

HelperDecl.pas

unit HelperDecl;

interface

type
  TCustomField = Word;

  TCustomFieldHelper = record helper for TCustomField
  public
    procedure SampleMethod();
  end;

implementation

procedure TCustomFieldHelper.SampleMethod();
begin
end;

end.

ScopeTest.pas

unit ScopeTest;

interface

uses HelperDecl;

type
  rec = record
    art: TCustomField;
  end;

implementation

uses System.SysUtils;

procedure DoScopeTest();
var
  a: TCustomField;
  r: rec;
begin
  a := r.art;
  r.art.SampleMethod(); //Here has the compiler no problems
  a.SampleMethod(); //Undeclared identifier 'SampleMethod'
end;

end.

但是我只为我的本地数据类型定义了一个助手（是的，它是从 Word 派生的）！中的助手SysUtils是 的助手Word，而不是我的自定义数据类型！放开我的数据类型！

当我uses System.SysUtils; …