小编Dmi*_*try的帖子

我有以下代码试图显示提示:

procedure TMyGrid.OnGridMouseMove(Sender: TObject; Shift: TShiftState;
  X, Y: Integer);
var
  aPoint: TPoint;
begin
  inherited;
  //Application.Hint := 'Hint Text';
  //Application.ShowHint := True;
  Grid.Hint := 'Hint Text';
  Grid.ShowHint := True;
  aPoint.X := X;
  aPoint.Y := Y;
  Application.ActivateHint(aPoint);
end;

但没有暗示出现.怎么了？

我们可以THandle通过Application.ActiveFormHandle或GetForegroundWindow何时获得积极的形式Application.Active = True.

但是如何获得活动表单对象？

或者如何Application.ActiveFormHandle在Delphi上转换为对象？

我使用TestFlight进行远程崩溃报告.现在我正在使用Google Analytics.

TestFlight建议禁用"复制期间剥离调试符号"和"剥离链接产品".谷歌分析 - 没有.我将TestFlight更改为Google Analytics后,是否应将其删除？

页面包含没有id的元素 - 仅包含名称.如何通过这样的JavaScript访问它们？

document.getElementById('id').value := "...";

更新:

谢谢大家!是否可以访问具有指定值(radiobutton)的元素？

<nobr><label><input style="vertical-align:middle" type="radio" name="name" value="value1" checked="checked"/><span style="vertical-align:middle" class="label">value1</span></label></nobr><br/>
<nobr><label><input style="vertical-align:middle" type="radio" name="name" value="value2"/><span style="vertical-align:middle" class="label">value2</span></label></nobr><br/>

RAD Studio XE2中有dcc32.exe吗？运行时获取错误:

此版本的产品不支持命令行编译.

当在Delphi XE或Delphi XE2 Update 3的DLL源代码中使用单元HtmlHelpViewer时,regsvr32.exe的DLL注册会冻结.只需将该单元添加到接口使用列表即可.主要项目(使用DLL)也在退出时冻结.

如何解决这个问题？

谢谢您的帮助!

在建议的修复中重现问题和问题的步骤:

1).请创建以下DLL:

library Test;

uses
  ComServ,
  HtmlHelpFixer,
  HtmlHelpViewer;

exports
  DllGetClassObject,
  DllCanUnloadNow,
  DllRegisterServer,
  DllUnregisterServer;

begin
end.

2).还创建链接到此DLL的以下BPL(-LUTestBpl例如,通过dcc32参数):

package TestBpl;

requires
  Vcl;

end.

3).然后执行:regsvr32.exe /s Test.dll.OS Windows 7 32位.

我们有一个Delphi XE2应用程序.Form1有热键Ctrl+ F,并且Form2,它是活动的,没有热键.用户按下Ctrl+ F上Form2并且Form1处理该热键.这完全不正确,因为我们看到了非活动表单的活动.我如何解决它？

我有以下功能,需要使其与64位平台兼容:

procedure ExecuteAsm(Tab, Buf: Pointer; Len: DWORD);
asm
     mov   ebx, Tab
     mov   ecx, Len
     mov   edx, Buf
@1:  mov   al,  [edx]
     xlat
     mov   [edx], al
     inc   edx
     dec   ecx
     jnz @1
end;

Delphi XE5 [dcc64 Error] E2107 Operand size mismatch在带有Tab和Len参数的行上引起错误.

不幸的是,我不知道汇编程序是否足以自行解决问题.成功编译函数应该更改什么？

要通过 Python 中的另一个字符串列表过滤字符串列表，我们可以使用以下代码：

result = [x for x in strings1 if x in strings2]

但是我们如何通过另一个字符串列表来过滤子字符串列表呢？例如：

substrings = ['a', 'b', 'c']
strings = ['_b_', '_c_', '_d_']

结果应该是：

result = ['b', 'c']

Swift 中 &<< 和 << 运算符有什么区别？似乎它们返回相同的结果：

print(2 << 3) // 16
print(2 &<< 3) // 16