小编use*_*145的帖子

禁用表单上升到顶部

我想要一个表格,当我设置在z顺序的底部时,它停留在那里.我试过了:

SetWindowPos(Handle,HWND_BOTTOM,Left,Top,Width,Height,SWP_NOZORDER);
Run Code Online (Sandbox Code Playgroud)

当我与其他一些应用程序重叠时,它会根据需要保留在底部.但是,当我点击它时,它会升到顶部.然后我尝试了:

SetWindowPos(Handle, HWND_BOTTOM, Left, Top, Width, Height,
             SWP_NOACTIVATE or SWP_NOZORDER);
Run Code Online (Sandbox Code Playgroud)

以及来自这个网站的各种其他交换机... http://msdn.microsoft.com/en-us/library/ms633545.aspx

但它仍然升至顶峰.

forms delphi z-order

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

在运行时重新分配数据源

我做了一些搜索,只找到了更多未解答的问题.:)

使用D5pro.

我想在运行时将DataSource重新分配给TDBGrid.我有七个相同的结构化DataSet,根据按钮单击,我希望在网格中显示相应的DataSet.

我已经尝试了一切,我无法让它显示下一个DataSet.它坚持在启动时分配的第一个.我正在采取过度杀伤方法,但仍然没有任何工作.这就是我现在所处的位置.

procedure SetSource(var aSrc : TDataSource);
begin
  aSrc.DataSet.Close;
  dbgridShowData.DataSource:=aSrc;
  aSrc.DataSet.Open;
  aSrc.DataSet.First;
  aSrc.DataSet.Refresh;
end;
Run Code Online (Sandbox Code Playgroud)

我哪里错了?

谢谢

delphi tdbgrid

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

任务栏可见吗?

我需要知道任务栏是否已分配,但已选中"自动隐藏任务栏"并暂时隐藏任务栏.我有一个函数返回任务栏的高度(如果已分配),否则返回零.

但是,如果已设置Windows"自动隐藏"选项,则功能仍会返回任务栏的高度,尽管在光标移动到屏幕的下边缘之前它不可见.

当我设置Image.Height:= Screen.Height-MyTaskbarHeight时,它会设置图像高度,就好像任务栏一直可见.

在伪代码中,我需要的是

if Taskbar.Assigned then
if Taskbar.AutoHide.Checked then // Assume it is hidden
    Image.Height:=Screen.Height else
    Image.Height:=Screen.Height-MyTaskbarHeight;
Run Code Online (Sandbox Code Playgroud)

有什么建议?

谢谢

delphi taskbar visible

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

标签 统计

delphi ×3

forms ×1

taskbar ×1

tdbgrid ×1

visible ×1

z-order ×1