能力值:
( LV2,RANK:10 )
|
-
-
2 楼
Actual Windows Guard 版本 1.5 NEW!
Actual Windows Guard ?檫?的程式自?最小化或放置全?幕,另一功能?是能晷檩?人的自??跳?窗,或是脎藏你不想看到的?窗
它是怎么做到的有人用过吗
大虾们说说原理吧
|
能力值:
( LV9,RANK:290 )
|
-
-
3 楼
我原来做个小程序时,做了个老板键功能,按下指定热键后,窗口就隐藏起来,按相应的热键再恢复。当时用了消息功能,对指定窗口发送相应功能的消息就行。不知这个软件是不是这样做的
|
能力值:
( LV2,RANK:10 )
|
-
-
4 楼
似乎还不完美
bat启动的:
软件本身最小化的:
可有办法将其全部隐藏(就是让它只在系统栏出现而桌面上完全看不到)
|
能力值:
( LV2,RANK:10 )
|
-
-
5 楼
按三楼兄弟的意思我还要去写个那样的程序(可那样就得多运行了一个程序就多占用一K内存实际上不止当然也可以让它自己退出)
可有其实好的方法
|
能力值:
( LV2,RANK:10 )
|
-
-
6 楼
其窗口的代码(resource hacker查看复制)
object AboutForm3: TAboutForm3
Left = 192
Top = 107
BorderStyle = bsDialog
Caption = '关于. . .'
ClientHeight = 115
ClientWidth = 270
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 8
Top = 13
Width = 247
Height = 56
AutoSize = True
Picture.Data = {
...................................一大堆垃圾
}
end
object Button1: TButton
Left = 96
Top = 80
Width = 75
Height = 25
Caption = '确定'
TabOrder = 0
OnClick = Button1Click
end
end
|
能力值:
( LV2,RANK:10 )
|
-
-
7 楼
我在用VC 跟asm
delphi不清楚
可否改成隐藏属性
|
能力值:
( LV2,RANK:10 )
|
-
-
8 楼
object aMainForm1: TaMainForm1
Left = 250
Top = 89
BorderStyle = bsNone
Caption = '方竹文件共享平台'
ClientHeight = 541
ClientWidth = 740
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 12
object RainForm1: TRainForm
Left = 0
Top = 0
Width = 740
Height = 541
Caption = '方竹文件共享平台'
BtnClose = True
BtnMax = True
BtnMin = True
BtnMenu = True
BorderStyle = bsSizeable
Magnet = 0
TopMost = False
ClientPanel = Panel6
UseSystemFont = True
MinimizeType = minForm
end
object Panel6: TPanel
Left = 2
Top = 23
Width = 736
Height = 516
BevelOuter = bvNone
Color = 15198183
TabOrder = 1
object Label3: TLabel
Left = 0
Top = 51
Width = 2
Height = 444
Align = alLeft
AutoSize = False
Color = 7983101
ParentColor = False
end
object Label4: TLabel
Left = 734
Top = 51
Width = 2
Height = 444
Align = alRight
AutoSize = False
Color = 7983101
ParentColor = False
end
object Label5: TLabel
Left = 107
Top = 51
Width = 2
Height = 444
Align = alLeft
AutoSize = False
Color = 7983101
ParentColor = False
end
object Label6: TLabel
Left = 0
Top = 495
Width = 736
Height = 2
Align = alBottom
AutoSize = False
Color = 7983101
ParentColor = False
end
object Label7: TLabel
Left = 0
Top = 49
Width = 736
Height = 2
Align = alTop
AutoSize = False
Color = 7983101
ParentColor = False
end
object Panel2: TPanel
Left = 208
Top = 51
Width = 526
Height = 444
BevelOuter = bvNone
Caption = 'Panel2'
Color = 14722475
TabOrder = 0
object Splitter1: TSplitter
Left = 0
Top = 441
Width = 526
Height = 3
Cursor = crVSplit
Align = alBottom
end
object ListView1: TListView
Left = 48
Top = 8
Width = 473
Height = 265
BorderStyle = bsNone
Color = clBackground
Columns = <>
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
IconOptions.Arrangement = iaLeft
LargeImages = ImageList1
ParentFont = False
PopupMenu = PopupMenu1
SmallImages = ImageList2
TabOrder = 0
OnCustomDraw = ListView1CustomDraw
OnCustomDrawItem = ListView1CustomDrawItem
OnDblClick = ListView1DblClick
OnMouseMove = ListView1MouseMove
end
object Panel7: TPanel
Left = 0
Top = 0
Width = 526
Height = 25
Align = alTop
BevelOuter = bvNone
TabOrder = 1
Visible = False
object Image3: TImage
Left = 24
Top = 0
Width = 526
Height = 25
Picture.Data = {
07544269746D6170F2340000424DF2340000000000003600000028000000B400
........................略过大堆F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2F4CDA2}
Stretch = True
end
object SpeedButton1: TSpeedButton
Left = 256
Top = 1
Width = 121
Height = 22
Caption = '上一页'
Flat = True
end
object SpeedButton2: TSpeedButton
Left = 384
Top = 1
Width = 121
Height = 22
Caption = '上一页'
Enabled = False
Flat = True
end
object SpeedButton3: TSpeedButton
Left = 8
Top = 0
Width = 121
Height = 22
Caption = '第一页'
Flat = True
end
end
end
object Panel1: TPanel
Left = 2
Top = 51
Width = 105
Height = 444
Align = alLeft
BevelOuter = bvNone
Caption = 'Panel1'
Color = 14722475
TabOrder = 1
object Splitter2: TSplitter
Left = 0
Top = 441
Width = 105
Height = 3
Cursor = crVSplit
Align = alBottom
end
object Label2: TLabel
Left = 0
Top = 0
Width = 105
Height = 12
Align = alTop
Alignment = taCenter
Caption = '程序页'
Color = 15827039
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = '宋体'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object DCVertListView1: TDCVertListView
Left = 8
Top = 24
Width = 132
Height = 345
BackgroundMode = bkmGradientHorz
BorderStyle = bsNone
GradientBeginColor = 15757901
GradientEndColor = clWhite
Font.Charset = ANSI_CHARSET
Font.Color = clWhite
Font.Height = -12
Font.Name = '宋体'
Font.Style = [fsBold]
SunkSelected = True
LargeImages = DVImageList
OnClick = DCVertListView1Click
ParentColor = False
ParentFont = False
PopupMenu = PopupMenu2
ReadOnly = False
SmallImages = DVImageList
end
object Memo1: TMemo
Left = 0
Top = 352
Width = 105
Height = 89
Align = alBottom
Lines.Strings = (
'Memo1')
TabOrder = 1
Visible = False
end
end
object Panel5: TPanel
Left = 0
Top = 0
Width = 736
Height = 49
Align = alTop
BevelOuter = bvNone
Caption = 'Panel5'
TabOrder = 2
object Panel4: TPanel
Left = 690
Top = 0
Width = 46
Height = 49
Align = alRight
BevelInner = bvSpace
BevelOuter = bvLowered
Color = clBlack
ParentShowHint = False
ShowHint = True
TabOrder = 0
object Image2: TImage
Left = 2
Top = 2
Width = 42
Height = 45
Align = alClient
Picture.Data = {
07544269746D61702E170000424D2E1700000000000036000000280000003700
........................略过大堆DBCEFFDBCEFFDBCEFFD7C6FFD7C6FFE3D6FFE3D6FFDFD6000000}
Stretch = True
end
object Image1: TImage
Left = 2
Top = 2
Width = 42
Height = 45
Hint = '网络断开'
Align = alClient
AutoSize = True
Picture.Data = {
07544269746D6170361B0000424D361B00000000000036000000280000003000
........................略过大堆00FF}
Transparent = True
end
end
object CoolBar1: TCoolBar
Left = 0
Top = 0
Width = 690
Height = 49
Align = alClient
BandBorderStyle = bsNone
Bands = <
item
Control = ToolBar1
ImageIndex = -1
MinHeight = 41
Width = 686
end>
Color = 15827039
ParentColor = False
Bitmap.Data = {
BE1D0000424DBE1D0000000000003600000028000000370000002D0000000100
........................略过大堆0000}
object ToolBar1: TToolBar
Left = 9
Top = 0
Width = 673
Height = 41
Align = alClient
AutoSize = True
ButtonHeight = 43
ButtonWidth = 73
Caption = 'ToolBar1'
DisabledImages = enImageList
EdgeBorders = [ebLeft, ebRight]
EdgeInner = esNone
EdgeOuter = esNone
Flat = True
Images = enImageList
ShowCaptions = True
TabOrder = 0
Transparent = True
object ToolButton1: TToolButton
Left = 0
Top = 0
Caption = '刷新'
ImageIndex = 0
OnClick = ToolButton1Click
end
object ToolButton2: TToolButton
Left = 73
Top = 0
Caption = '服务器'
ImageIndex = 2
OnClick = ToolButton2Click
end
object ToolButton4: TToolButton
Left = 146
Top = 0
Caption = '设置'
ImageIndex = 7
OnClick = ToolButton4Click
end
object ToolButton8: TToolButton
Left = 219
Top = 0
Caption = '信息'
ImageIndex = 9
OnClick = ToolButton8Click
end
object ToolButton5: TToolButton
Left = 292
Top = 0
Caption = '隐藏'
ImageIndex = 3
Visible = False
OnClick = ToolButton5Click
end
object ToolButton9: TToolButton
Left = 365
Top = 0
Caption = '关于'
ImageIndex = 8
OnClick = ToolButton9Click
end
object ToolButton7: TToolButton
Left = 438
Top = 0
Caption = '退出'
ImageIndex = 10
OnClick = ToolButton7Click
end
object ToolButton3: TToolButton
Left = 511
Top = 0
Caption = 'ToolButton3'
ImageIndex = 11
Visible = False
OnClick = ToolButton3Click
end
end
end
end
object StatusBar1: TStatusBar
Left = 0
Top = 497
Width = 736
Height = 19
Color = 15757901
Panels = <
item
Bevel = pbNone
Width = 250
end
item
Width = 80
end
item
Bevel = pbNone
Width = 60
end
item
Bevel = pbNone
Width = 50
end>
SimplePanel = False
end
end
object Panel3: TPanel
Left = 128
Top = 168
Width = 512
Height = 97
Color = 16744576
TabOrder = 0
Visible = False
object Label1: TLabel
Left = 8
Top = 64
Width = 36
Height = 12
Caption = '复制:'
Transparent = True
end
object SpeedButton4: TSpeedButton
Left = 416
Top = 24
Width = 73
Height = 22
Caption = '取消'
Flat = True
OnClick = SpeedButton4Click
end
object ProgressBar1: TProgressBar
Left = 1
Top = 78
Width = 510
Height = 18
Align = alBottom
Min = 0
Max = 100
TabOrder = 0
end
object Animate1: TAnimate
Left = 41
Top = 1
Width = 272
Height = 60
Active = False
CommonAVI = aviCopyFile
StopFrame = 26
end
end
object diImageList: TImageList
Left = 400
Top = 16
Bitmap = {
494C010106000900040010001000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
........................略过大堆000000000000}
end
object enImageList: TImageList
Height = 24
Width = 24
Left = 360
Top = 16
Bitmap = {
494C01010B000E00040018001800FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
........................略过大堆000000000000}
end
object IdTCPClient1: TIdTCPClient
MaxLineAction = maException
ReadTimeout = 60000
Port = 0
Left = 104
Top = 120
end
object IdAntiFreeze1: TIdAntiFreeze
IdleTimeOut = 300
Left = 96
Top = 64
end
object ClentWSocket: TWSocket
LineMode = False
LineLimit = 65536
LineEnd = #13#10
LineEcho = False
LineEdit = False
Proto = 'tcp'
LocalAddr = '0.0.0.0'
LocalPort = '0'
MultiThreaded = False
MultiCast = False
MultiCastIpTTL = 1
ReuseAddr = False
ComponentOptions = []
OnDataAvailable = ClentWSocketDataAvailable
FlushTimeout = 60
SendFlags = wsSendNormal
LingerOnOff = wsLingerOn
LingerTimeout = 0
SocksLevel = '5'
SocksAuthentication = socksNoAuthentication
Left = 48
Top = 96
end
object XPMenu1: TXPMenu
DimLevel = 30
GrayLevel = 10
Font.Charset = GB2312_CHARSET
Font.Color = clMenuText
Font.Height = -11
Font.Name = 'Tahoma'
Font.Style = []
Color = clBtnFace
DrawMenuBar = False
IconBackColor = clBtnFace
MenuBarColor = clBtnFace
SelectColor = clHighlight
SelectBorderColor = clHighlight
SelectFontColor = clMenuText
DisabledColor = clInactiveCaption
SeparatorColor = clBtnFace
CheckedColor = clHighlight
IconWidth = 24
DrawSelect = True
UseSystemColors = True
UseDimColor = False
OverrideOwnerDraw = False
Gradient = False
FlatMenu = False
AutoDetect = False
Active = True
Left = 32
Top = 280
end
object AUTOClient: TIdTCPClient
MaxLineAction = maException
Port = 0
Left = 136
Top = 56
end
object PopupMenu1: TPopupMenu
OwnerDraw = True
Left = 392
Top = 216
object N1: TMenuItem
Caption = '大图标'
OnClick = N1Click
end
object N2: TMenuItem
Caption = '小图标'
OnClick = N2Click
end
object N7: TMenuItem
Caption = '-'
end
object N8: TMenuItem
Caption = '关于....'
end
end
object PopupMenu2: TPopupMenu
OwnerDraw = True
Left = 48
Top = 184
object MenuItem1: TMenuItem
Caption = '大图标'
end
object MenuItem2: TMenuItem
Caption = '小图标'
end
object MenuItem3: TMenuItem
Caption = '-'
end
object MenuItem4: TMenuItem
Caption = '关于....'
end
end
object Timer1: TTimer
Enabled = False
OnTimer = Timer1Timer
Left = 168
Top = 152
end
object Timer2: TTimer
Enabled = False
Interval = 3000
OnTimer = Timer2Timer
Left = 176
Top = 216
end
object ImageList1: TImageList
Left = 336
Top = 136
end
object ImageList2: TImageList
Left = 328
Top = 208
end
object DVImageList: TImageList
Height = 32
Width = 32
Left = 40
Top = 201
Bitmap = {
494C010102000400040020002000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
........................略过大堆000000000000}
end
object MainMenu1: TMainMenu
OwnerDraw = True
Left = 152
Top = 128
object F1: TMenuItem
Caption = '文件(&F)'
object X1: TMenuItem
Caption = '退出(&X)'
OnClick = X1Click
end
end
object V1: TMenuItem
Caption = '查看(&V)'
object N6: TMenuItem
Caption = '隐藏工具栏'
OnClick = N6Click
end
end
object E1: TMenuItem
Caption = '编辑(&E)'
object N9: TMenuItem
Caption = '刷新'
OnClick = N9Click
end
end
object S1: TMenuItem
Caption = '设置(&S)'
object S2: TMenuItem
Caption = '设置(&S)'
OnClick = S2Click
end
object N3: TMenuItem
Caption = '-'
Visible = False
end
object N10: TMenuItem
Caption = '服务器'
OnClick = N10Click
end
object N4: TMenuItem
Caption = '安装'
Visible = False
OnClick = N4Click
end
end
object H1: TMenuItem
Caption = '帮助(&H)'
object N5: TMenuItem
Caption = '关于. . .'
OnClick = N5Click
end
end
end
object PopupMenu3: TPopupMenu
OwnerDraw = True
Left = 272
Top = 138
object MenuItem5: TMenuItem
Caption = '显示窗口'
OnClick = MenuItem5Click
end
object MenuItem6: TMenuItem
Caption = '关于...'
end
object MenuItem7: TMenuItem
Caption = '-'
end
object MenuItem8: TMenuItem
Caption = '退出'
OnClick = MenuItem8Click
end
end
object ImageList3: TImageList
Height = 48
Width = 48
Left = 661
Top = 41
Bitmap = {
494C010102000400040030003000FFFFFFFFFF10FFFFFFFFFFFFFFFF424D3600
........................略过大堆 000000000000}
end
end
|
能力值:
( LV2,RANK:10 )
|
-
-
9 楼
GoHide (程序窗口隐藏专家) V4.41
软件语言: 简体中文
软件类别: 共享软件/国产软件 /系统辅助
运行环境: Win9x/Me/NT/2000/XP/2003
软件大小: 1.6MB
软件评价:
界面预览: 暂无界面预览
更新时间: 2005-02-14 00:02:48
软件作者: 给作者发送一封邮件
开 发 商: 771K9s2c8@1M7q4)9K6b7g2)9J5c8W2)9J5c8Y4N6%4N6#2)9J5k6h3&6T1k6h3u0Q4x3X3g2U0L8$3#2Q4x3V1j5`.
下载次数: 今日:11 本周:11 总计:627
软件简介: 试想一下:
◎上班时间你用IE打开了很多窗口正在上网浏览,突然老板走了过来,而你又不想被老板看到你正在浏览的内容,这时候怎么办?手忙脚乱地一个一个关闭IE窗口?恐怕来不及了吧?
◎上班时你正用QQ和朋友聊得高兴,主管过来和你讨论什么事情,而你又不想关闭QQ,于是那个QQ在那里一个劲地闪,这总不太好吧?
◎紧张工作了一段时间,想给自己放松一下,玩一下游戏,又怕突然有人过来看到(听到游戏的声音),怎么办?
◎你正在用WORD写一份很私人的文件,同事过来到你的电脑面前,你又不方便让看到文件的内容,突然关闭WORD还要弹出一个对话框问你是否需要保存,这也太不方便了吧?
您遇到过与以上类似的情况吗?您是怎么来处理的呢?您有没有想过让 GoHide 来帮助您呢?
通过 GoHide,您可以按任意键(由您来指定)来瞬间隐藏您指定的窗口,同时对被隐藏的程序不会造成任何影响!再按同一热键,被隐藏的窗口就会被恢复显示!
特点
能够隐藏任意程序的窗口。要隐藏的程序窗口由用户指定,数量不限。
使用热键在需要的时候直接隐藏程序窗口,不用切换到GoHide。热键由用户定义,使用任意键或键的组合。
可以隐藏类似QQ、MSN Messager等在Windows任务栏的通知区域 (系统托盘)中有图标的程序(即图标也同时被隐藏)。
指定要隐藏的窗口有多种方法:用户可以直接选择,也可以指定隐藏某一类程序或者标题中包含特定字符串的所有窗口 ,后者对动态的情况非常有用。
在隐藏程序的同时,也能设置暂停此程序的运行(比如说某个计时游戏 或者用户希望被隐藏的Media Player暂停播放影片)。
在隐藏程序的同时,也能设置关闭计算机的声音。
GoHide本身也能通过热键被隐藏/显示。
当显示被隐藏的程序窗口时,可以要求口令验证。
支持多语言。
能够运行在Win95/Win98/WinNT/Win2000/WinXP/Win2003上。
|
能力值:
( LV2,RANK:10 )
|
-
-
10 楼
成功
object aMainForm1: TaMainForm1
Left = 250
Top = 89
BorderStyle = bsNone
Caption = '方竹文件共享平台'
Visible = False
ClientHeight = 541 --------------------》改为1即可
ClientWidth = 740------------------>改为1既可(who看的见一象树的窗口呀哈哈哈)
Color = clBtnFace
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnDestroy = FormDestroy
OnShow = FormShow
|
能力值:
( LV9,RANK:290 )
|
-
-
11 楼
最初由 kkx2008 发布 成功 object aMainForm1: TaMainForm1 Left = 250 Top = 89 BorderStyle = bsNone ........
Visible = False
这是什么属性,是不是隐藏属性,改成true试试
|
能力值:
( LV2,RANK:10 )
|
-
-
12 楼
这个是隐藏属性
但上面的代码Visible = False是我加的还是不行
|
能力值:
( LV9,RANK:290 )
|
-
-
13 楼
最初由 kkx2008 发布 这个是隐藏属性 但上面的代码Visible = False是我加的还是不行
要是想隐藏的话,应该是附给True吧
|
能力值:
( LV2,RANK:10 )
|
-
-
14 楼
如果是调用实现的话,你获取窗口的句柄,hide就ok了,我曾经做过,
|
|
|