小编Roy*_*ver的帖子

Delphi,如何制作独立的窗口

我有一个使用Chrome浏览器等标签的应用程序.现在我希望能够打开更多表格而不仅限于一种表格.这些表格应该是相同的,但如果我关闭主表格,所有表格都将被关闭.如何使所有表格都相同,所以无论我关闭哪种表格,只关闭该表格而不是在所有表格关闭之前退出申请表?有任何想法吗?

我的探险家的形象

亲切的问候Roy M Klever

forms delphi user-interface tabs

10
推荐指数
1
解决办法
2910
查看次数

如何在组件中添加对操作的支持

如何向组件添加操作支持需要做什么.它是一个按钮组件,但我猜它对于任何组件类型都是相同的.任何信息或如何帮助.

delphi components vcl taction

6
推荐指数
2
解决办法
2439
查看次数

Delphi,如何在D2009,D2010中避免unicode警告消息

在Delphi 2007的排序例程中,我使用的代码如下:

(txt[n] in ['0'..'9'])

function ExtractNr(n: Integer; var txt: String): Int64;  
begin  
  while (n <= Length(txt)) and (txt[n] in ['0'..'9']) do n:= n + 1;  
  Result:= StrToInt64Def(Copy(txt, 1, (n - 1)), 0);  
  Delete(txt, 1, (n - 1));  
end;  
Run Code Online (Sandbox Code Playgroud)

其中txt是一个字符串.这在D2007中工作正常,但会在D2009和D2010中发出警告我不知道为什么但是有什么方法可以让它在D2009和D2010中没有警告的情况下工作吗?

Roy M Klever

delphi unicode warnings

2
推荐指数
2
解决办法
1811
查看次数

Delphi在应用程序中获取"Ctrl Tab"和"Ctrl Shift Tab"

在我的应用程序中,我使用标签,我自己的组件,如Google Chrome排序.每个选项卡都引用一个资源管理器组件,因此它基本上是一个标签式浏览器/资源管理器.我的问题是我想用CTRL+ TABCTRL+ SHIFT+ TAB来导航标签.设置forms.KeyPreview无济于事,因为tab键是特殊键.我怎样才能以简单的方式添加对导航愿望的支持.如果需要,我可以修改组件.如果有帮助,我的组件基于TCustomControl.

亲切的问候Roy M Klever

navigation delphi user-interface tabs components

2
推荐指数
2
解决办法
2771
查看次数