一個設置任意窗口透明度的命令行Delphi程序

必須是在Windows2000以下的系統才支持SetLayeredWindowAttributes這個API,原理就是先找到窗口句柄,然後設置窗口屬性

program opacity;

{$APPTYPE CONSOLE}

uses

SysUtils,

Windows;

var

handle,AStyle:integer;

begin

try

if ParamCount<2 then

begin

Writeln('parameter must');

exit;

end;

handle:=findwindow(nil,pchar(ParamStr(1)));//目前是找窗口的Text,也可以是找ClassName

AStyle := GetWindowLong(Handle, GWL_EXSTYLE);

SetWindowLong(Handle, GWL_EXSTYLE, AStyle or WS_EX_LAYERED);

if SetLayeredWindowAttributes(Handle, 0, strtoint(ParamStr(2)),LWA_ALPHA) then

Writeln(ParamStr(1)+' update successed to '+ParamStr(2))

else

Writeln('Opacity update failed');

except

Writeln('parameter error');

end;

end.

http://blog.csdn.net/redbirdli/archive/2007/02/15/1510602.aspx

在WEB程序中設置個性化,容錯提示窗口
首先設計一個容錯提示的窗口圖像爲如下:關鍵HTML文本如下:“原因:<%=content[Int32.Parse(Request.QueryString["ms"])]%>”然後在代碼編輯窗口中添加如下不分:public class WebForm1 : System.W...查看完整版>>在WEB程序中設置個性化,容錯提示窗口
 
在WEB程序中設置個性化,容錯提示窗口
首先設計一個容錯提示的窗口圖像爲如下:關鍵HTML文本如下:“原因:<%=content[Int32.Parse(Request.QueryString["ms"])]%>”然後在代碼編輯窗口中添加如下不分:public class WebForm1 : System.W...查看完整版>>在WEB程序中設置個性化,容錯提示窗口
 
怎樣編寫一個類Spy++的搜索窗口程序
怎樣編寫一個類Spy++的搜索窗口程序 湛江海洋大學 計算機系2000軟件5班 http://hosen.yeah.net 大家都用過Vc自代的工具Spy++,它可以通過鼠標來捕...查看完整版>>怎樣編寫一個類Spy++的搜索窗口程序
 
Delphi 程序窗口動畫及正常排列平鋪的實現
注:此文已有更好的方法,稍後發布2004年9月16日   Delphi的確是功能非常強的RAD工具,所以我下面要說的不算是“缺陷”的一個小問題絲毫不會影響它在程序員心目中的地位,相反,大家會發現,它的確是不愧...查看完整版>>Delphi 程序窗口動畫及正常排列平鋪的實現
 
在DELPHI程序中自動設置ODBC數據源
摘要:在DELPHI程序中自動設置ODBC數據源在DELPHI數據庫應用程序中,我們訪問數據庫通常有兩種方法.一種是通過BDE數據庫搜索引擎,即利用DELPHI自帶的數據庫驅動程序,這種方法的優點是速度快,但應用範圍有限,當數...查看完整版>>在DELPHI程序中自動設置ODBC數據源
 
在Delphi程序中調用控制面板設置功能
摘要:在Delphi程序中調用控制面板設置功能在Delphi程序中調用控制面板設置功能王發軍  應用程序運行時,有時需要對系統環境有特殊要求。例如,在Delphi數據庫應用程序中可能需要進行BDE(Borland Database Engine...查看完整版>>在Delphi程序中調用控制面板設置功能
 
在DELPHI程序中自動設置ODBC數據源
在DELPHI數據庫應用程序中,我們訪問數據庫通常有兩種方法.一種是通過BDE數據庫搜索引擎,即利用DELPHI自帶的數據庫驅動程序,這種方法的優點是速度快,但應用範圍有限,當數據庫版本更新時,有可能不能用于操作新的...查看完整版>>在DELPHI程序中自動設置ODBC數據源
 
在Delphi程序中調用控制面板設置功能
在Delphi程序中調用控制面板設置功能王發軍  應用程序運行時,有時需要對系統環境有特殊要求。例如,在Delphi數據庫應用程序中可能需要進行BDE(Borland Database Engine)或ODBC數據源名稱(DSN:Data Source Name...查看完整版>>在Delphi程序中調用控制面板設置功能
 
簡單設置 讓Win 7程序窗口更聽話-Windows7
簡單設置 讓Win 7程序窗口更聽話-Windows7
  Windows 7系統的無論就操作體驗還是對于一些細節方面的改進,相對于Windows XP系統都是很明顯,比如一個小小的程序窗口,也是做足了文章。尤其是對于經常打開多個程序窗口進行工作的時候,我們只需要簡單設置,就...查看完整版>>簡單設置 讓Win 7程序窗口更聽話-Windows7
 
 
回到王朝網路移動版首頁