ShellExecute delphi 不改变活动窗口

2024-10-13

Delphi中ShellExecute使用详解（详细解释10种显示状态）

有三个API函数可以运行可执行文件WinExec.ShellExecute和CreateProcess.1.CreateProcess因为使用复杂,比较少用.2.WinExec主要运行EXE文件.如:WinExec('Notepad.exe Readme.txt', SW_SHOW);3.ShellExecute不仅可以运行EXE文件,也可以运行已经关联的文件.首先必须引用shellapi.pas单元:uses ShellAPI;1).标准用法 ShellExecute函数原型及参数含义如下:

delphi SetWindowPos改变窗体位置和状态

http://blog.163.com/yuanliaofan@126/blog/static/1730690722012534428814/ delphi SetWindowPos改变窗体位置和状态 2012-06-03 16:04:28| 分类: 电脑|举报|字号订阅下载LOFTER我的照片书 | delphi SetWindowPos改变窗体位置和状态 //声明:SetWindowPos(hWnd: HWND; {窗口句柄}hWndInsert

Ruby操作VBA的注意事项和技巧(1)：乱码、获取VBA活动和非活动窗口的名称与路径、文件路径的智能拼接与截取（写入日期）

1.VBA编辑器复制粘贴出来的代码乱码解决方法:切换到中文输入模式再复制出来就行了 2.获取VBA活动和非活动窗口的名称与路径 Dim wbpath, filename As String wbpath = ThisWorkbook.Path ’这个获取的是宏所在的workbook的路径 'filename = ThisWorkbook.Name '这个是宏所在的workbook的名字,不带路径 filename = ActiveWindow.Caption '获取到当前正在用的wor

QApplication::alert 如果窗口不是活动窗口，则会向窗口显示一个警告（非常好用，效果就和TeamViewer一样）

void QApplication::alert(QWidget * widget, int msec = 0)如果窗口不是活动窗口,则会向窗口显示一个警告.警报会显示msec 毫秒.如果毫秒为零,闪烁一段时间后会停止,任务栏图标会一直亮着.widget.h #ifndef WIDGET_H #define WIDGET_H #include <QWidget> #include <QTimer> #include <QTime> namespace Ui { clas

vim改变多窗口的大小

摘自:http://blog.163.com/lgh_2002/blog/static/44017526201031671927647/ vim改变多窗口的大小 VIM改变窗口大小 *window-resize* *CTRL-W_=* CTRL-W = 使得所有窗口 (几乎) 等宽.等高,但当前窗口使用 'winheight' 和 'winwidth'. :res[ize] -N *:res* *:resize* *CTRL-W_-* CTRL-W - 使得当前窗口高度减 N (默认值是 1).

DELPHI中MDI子窗口的关闭和打开

DELPHI中MDI子窗口的关闭和打开 Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭,所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化,而不是你预期的那样被关闭.解决办法是在子窗口的OnClose事件处理过程中加入如下代码,示例: procedure ChildForm.OnClose(Sender: TObject; var Action: TCloseAction); begin Action := caFree; end;

DELPHI中MDI子窗口的关闭和打开

Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭,所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化,而不是你预期的那样被关闭.解决办法是在子窗口的OnClose事件处理过程中加入如下代码,示例: procedure ChildForm.OnClose(Sender: TObject; var Action: TCloseAction);begin Action := caFree;end; Delphi为一个Form的关闭行为指定了四种方式,分别是: caNone 禁止F

活动窗口(Active)，焦点窗口(Focus)和前景窗口(Foreground)之间的关系

活动窗口(Active),焦点窗口(Focus)和前景窗口(Foreground)之间的关系任何一个时候,我们的Windows桌面上总有一个最前台的窗口,其实说简单的,就是标题栏变成深蓝色的那个窗口,仅此一个,这个窗口就是前景窗口(Foreground Window),其他窗口就是后台窗口(Background Window).那创建前景窗口的线程就是前景线程(Foreground Thread),这个线程并不一定就是应用程序的主线程. 线程内部会维护当前自己的活动窗口(Active Wind

Xamarin XAML语言教程Xamarin.Forms中改变活动指示器颜色

Xamarin XAML语言教程Xamarin.Forms中改变活动指示器颜色在图12.10~12.12中我们会看到在各个平台下活动指示器的颜色是不一样的.Android的活动指示器默认是深粉色的:iOS的活动指示器是灰色的:Windows Phone的活动指示器是蓝色的.如果开发者想要让各个平台下活动指示器的颜色统一,可以使用ActivityIndicator定义的Color属性,其语法形式如下: <ActivityIndicator Color="activityIndicatorC

Delphi让所有的窗口的标题和图标显示在任务栏上

Delphi:让所有的窗口的标题和图标显示在任务栏上在Delphi中,除了主窗口之外,当其它的窗口显示或切换到焦点时.默认情况下,窗口标题和图标并不会显示在任务栏中,为了实现像主窗口一样,每当窗口显示或焦点时,就把图标和标题显示在当前任务栏上,并高亮,可在相应窗口的单元文件中加入如下代码实现,谢谢!unit Unit2;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Di

Delphi中使用Dos窗口输出调试信息

在项目文件 *.DPR (Project->View Source) 里加上{$APPTYPE CONSOLE} 然后,在需要输出处加上 Writeln(‘your debug message’); 另一方法是从网上找到的,未测试在Delphi中输出后台调试信息有些时候,我们需要输出调试信息,但又不在界面上,也不希望弹出窗口中断执行,这时,只要用OutputDebugString就可以了,然后在View|Debug Window|Event Log查看结果即可. 例子: var S :

Android中简单活动窗口的切换--Android

本例实现Android中简单Activity窗口切换:借助intent(意图)对应用操作(这里用按钮监听)等的描述,Android根据描述负责找对应的组件,完成组件的调用来实现活动的切换……案例比较简单直接附上代码了哈. 1.建两个Activity类,分别为MainActivity.java和GuideActivity.java…… MainActivity.java(核心文件): package livetelecast.thonlon.example.cn.thonlonliveteleca

在Delphi中实现动画窗口

Windows下有一个函数AnimateWindow,在Delphi自带的Win32 API Help中是找不到的.你可以在Delphi的编辑器中输入windows.等待代码向导出来,继续输入AnimateWindow就能看到确实是存在的Win32 API,它的功能是在显示或者关闭窗体的时候产生动画,如从左向右开屏,从中心向周围开屏等.语法:function AnimateWindow(hWnd: HWND; dwTime: DWORD; dwFlags: DWORD): BOOL; stdca

Delphi 关闭MDI子窗口

需要在子窗口的onClose事件中吧Action = caFree; 就可以了. procedure Tfrm_aa.FormClose(Sender: TObject; var Action: TCloseAction);begin Action := caFree;end;

win8.1系统下，点击一个窗口，【当前活动窗口】该窗口无法置顶

两个或多个窗口同时显示在桌面的时候,点击下一层的窗口,无法置顶显示,无论怎么点击,还是隐藏在原置顶窗口的后面,只能手动把原置顶窗口最小化后,才能看到.例如,A窗口现在置顶,B窗口在A的后面,露出来一部分,我点击这一部分,A窗口的边框变灰,B窗口的边框变蓝,但是B窗口依然隐藏在A窗口后面,只能手动最小化A窗口,才能看到B窗口,然后这个时候,就是B窗口置顶了,接下来,我在在电脑下面的任务栏点击A窗口,A窗口同样无法置顶,还是显示在B窗口的下面,尽管B窗口的边框变成了灰色.

点击按钮如何改变当前窗口的url

<!doctype html> <html lang="en"> <head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, user-scalable=no, initial-scale=1.0, maximum-scale=1.0, minimum-scale=1.0"

delphi 怎么实现主窗口退出时，有一个提示框？

无论点窗口上的[按钮]还是[右上角的叉],能出现一个提示窗口,“是”-退出窗口,“否”-重新登录(调出登录窗口),“取消”-返回.MessageBox能实现吗?还是要调用新窗口(我调用窗口,有些错误)?如图一样. 有谁能给代码?谢谢了热心网友:你好,我用你的代码,已经好了.但用在 procedure TMainForm.ToolButton8Click(Sender: TObject); 中“是”要点两下主窗口才关闭,是什么原因? 你可以在窗体的onClose事件中进行设计.在里面先以定义一个退

Delphi中使一个窗口居中

把窗口的position属性设置为poScreenCenter,就可以使窗口居于屏幕的中央.

Delphi使程序的窗口出现在最前面并激活

procedure setAppFront(); //使程序的窗口出现在最前面并激活 var pt, OldPt, NewPt: TPoint; begin //判断Application是否最小化,而不是主窗口的Handle, 使用Restore来还原 if IsIconic(Application.Handle) then Application.Restore; SetWindowPos(Application.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_N

Delphi TScrollBar 用于滚动窗口、组件内容

滚动条组件(TScrollBar)此组件是一个Windows滚动条,用于滚动窗口.组件内容.许多控制有滚动条属性,它们把滚动条作为自己的一部分,对于没有完整滚动条的控制,TScrollBar组件提供了一个附加的功能,运用它可以使某些控制的内容易于操作. 1.TScrollBar组件的典型用法一般情况下,滚动条是自动加入的,例如前面讲的列表框,当项目不能完全显示时,列表框将自动加上滚动条.当用户操作滚动条时,列表自动滚动. 如果想自己操纵窗口滚动,就要用到TScrollBar组件,当用户在滚动条

delphi 常用的将窗口置前的函数

function BringWindowToTopEx(hWnd: HWND): Boolean;begin if IsIconic(hWnd) then ShowWindow(hWnd, SW_RESTORE); if GetForegroundWindow <> hWnd then SetForegroundWindow(hWnd);//enabled //BringWindowToTop(hWnd);//not enabled //ForceForegroundWindow(hWnd);

ShellExecute delphi 不改变活动窗口

热门专题