小编A K*_*A K的帖子

德尔福:平滑崩溃/扩展形式

需要你的帮助(我一直在寻找).我在德尔福西雅图,尝试顺利调整表格的底部.在我的情况下,"调整大小"只是有点崩溃/扩展,如下所示:

在此输入图像描述

我怎么能意识到这一点?

我尝试过使用TTimer:

procedure TForm1.Timer1Timer(Sender: TObject);
var
h, t: integer;
begin
t := Button10.Top + Button10.Height + 10; //slide TForm from/to this point
if t > h then
begin
h := h + 1;
Form1.Height := h;
end
else
begin
Timer1.Enabled := false;
end;
end;
Run Code Online (Sandbox Code Playgroud)

...但它看起来非常简单(没有加速/减速),即使间隔很小也行动缓慢.

delphi function

5
推荐指数
1
解决办法
828
查看次数

DevExpress'功能区栏:如何禁用和隐藏"全屏按钮"

Windows 7 SP1(x86)+ Delphi XE2 + DevExpress 2013.1.2(VCL)+ TdxBarManager +皮肤"Office2013White".

如何在设计模式和/或运行时模式下禁用和隐藏"全屏按钮"(按钮的屏幕截图):

在此输入图像描述

我试图在资源(.pas)中找到它,然后尝试通过dxSkinEditor( .skinres)编辑皮肤,但失败了.

提前致谢.

delphi devexpress ribbon delphi-xe2

4
推荐指数
1
解决办法
2177
查看次数

标签 统计

delphi ×2

delphi-xe2 ×1

devexpress ×1

function ×1

ribbon ×1