小编max*_*fax的帖子

我使用工具栏作为MainMenu!

我将MainMenu嵌入到ToolBar中.但MainMenu(按钮的标题)的文本不在ToolButtons的中心.

我有:

我需要:

我创建了一个ToolBar,4个ToolButtons并为每个按钮分配每个菜单.或者我在ToolBar的"菜单"中指定MainMenu.当我创建一个ToolBotton时,它的标题已经在底部.没有人有相同的吗？

毕竟,我将把ToolBar作为MainMenu嵌入到CoolBar中.最后,我将与Windows防火墙中的相同.

是否有其他替代方案可以像Windows防火墙的CoolBar一样具有相同的效果(使用MainMenu + ToolBar的折线+ ToolButtons)？我使用的是Delphi 2010.

这该怎么做？如何在ToolBar中正确使用MainMenu？谢谢!

PS另一个例子,它不是来自Windows:

以及如何复制最后一个例子......

我有一个面板(底部对齐)和一些控件(客户端对齐).

要为我使用的面板设置动画:

AnimateWindow(Panel.Handle, 1000, aw_hide or AW_SLIDE OR AW_VER_POSITIVE);
panel.Visible:=false;

在我的情况下,面板平滑地隐藏,然后只有其他控件占用它的空间.

但我希望其他控件能够顺畅地与面板同时移动.

例如,FireFox使用此效果.

谁能建议我有用的东西？谢谢!

德尔福XE2.有一个表格和一个框架.

形式和框架是doublebuffered.GlassFrame已启用.

我绘制框架的背景,并尝试绘制一个右对齐的矩形,但有bug.特别是在调整大小时我有错误.

矩形不希望从透明度到不透明的黑色正常绘制.

uses ...GDIPAPI, GDIPOBJ...
type
  TFrame2 = class(TFrame)
    procedure PaintWindow(DC: HDC); override;

  private
    { Private declarations }
  public
    { Public declarations }
  end;

implementation
{$R *.dfm}

procedure TFrame2.PaintWindow(DC: HDC);
var
  R: TGPRect;
  pen: TGPPen;
  Graphics: TGPGraphics;
  linGrBrush: TGPLinearGradientBrush;
begin
  R.X := 0;
  R.Y := 0;
  R.Width := self.Width;
  R.Height := self.Height;

  Graphics := TGPGraphics.Create(DC);

  linGrBrush := TGPLinearGradientBrush.Create(R, MakeColor(255, 120, 248, 253),
    MakeColor(255, 200, 216, 250), LinearGradientModeVertical);

  Graphics.FillRectangle(linGrBrush, 0, 0, R.Width, R.Height);
  linGrBrush.Free;

    linGrBrush …

我找到了带有进度的CopyFileEx示例,但是我需要从一个文件夹中复制一些文件,并取得全面进展.

任何人都可以提供信息如何做到这一点？还是有好的选择(组件,功能)？

非常感谢您的帮助!

这很有趣:)但如何做一些像ActionList1.MyAction.Enable:=false？

动作列表具有按钮操作,如果按钮不可见,我需要禁用它的动作(如果不执行此操作并按下快捷方式,则执行该过程).

可能是我做错了什么,但我没有给按钮分配动作.我只有一个带动作的动作列表.每个动作都有一个快捷方式 按下此快捷方式后,将执行操作并执行操作.如果单击按钮 - >也将执行相同的过程.

State:=asSuspended 是一个完整的动作列表.

谢谢!!!

我在表格上有一个框架.当我更改框架(添加/删除按钮,标签)时,表单上不会出现任何更改,或者控件在框架中的表单中有其他位置.如果要从表单中删除框架并再次添加 - >确定.

为什么？我记得在Delphi 2010(现在的Delphi XE)中没有任何问题.

谢谢.

我需要你的建议如何组织和制作一个漂亮的图形用户界面.

现在我有这样的事情:

树视图(需要很大的空间......)作为菜单,为每个项目分配帧.所有框架都有控制按钮(工具栏)和此列表中的内容:列表视图,字符串网格,进度条,备忘录,丰富的编辑,Web浏览器,颜色选择器,列表框,标签,编辑等.

我没有足够的经验来创建一个好的,简单的图形用户界面,而且我没有任何想法.

对我来说最困难的是我需要创建一个漂亮的SDI,但是当前的UI类似于MDI(具有许多控件的帧而不是窗口).

因此,我正在尝试从其他软件中复制UI:http://www.addictivetips.com/windows-tips/150-best-windows-applications-of-year-2010-editors-pick/ + SCREEN SHOTS.但我找不到合适的东西:(

添加:

我有一个想法是使用玻璃效果("菜单"而不是左侧的树状视图),但它看起来很复杂:玻璃上的按钮和下面的按钮(工具栏).

另一个版本:

请告诉我该做什么或给我一个方向.谢谢!

我有一个框架,两个按钮和一个JEDI TrayIcon(TJvTrayIcon,版本3.40).德尔福XE.

第一个按钮:

Frame11.Visible := true;

第二:

Frame11.Visible := false;

当我尝试最小化窗口 - >从系统托盘恢复它时 - >单击"Visible:= false"按钮然后"Visible:= true"=框架不会出现.

问题在于[tvAutoHide]TJvTrayIcon的可见性.

我没有在一个新项目中看到这个问题,但我有一个旧项目.我无法理解它为什么会发生以及如何防止它.请参阅我的问题项目:http://www.filedropper.com/trayicon

感谢帮助!

在Unicode文本/字符串中是否有快速有效的文本搜索？我也需要搜索一个单词的一部分,而不仅仅是一个单词.

SearchBuf？

谢谢!

有一个树状视图,左对齐.并且有一个分离器,同样,左对齐.树视图是第一个,分切器是第二个.

如果这样做:

TreeView1.Visible:=false;
Splitter1.Visible:=false;

然后:

TreeView1.Visible:=true;
Splitter1.Visible:=true;

分离器将是左起第一个.必须是第二个.怎么预防这个？

谢谢!!!