妖城在线论坛 - Powered by Discuz! Board

标题: [提问] 制作登录器问题 [打印本页]

作者: u-know 时间: 2008-4-28 00:43 标题: 制作登录器问题

在加载工程的时候发现有这样的一段话
bbs.mocwww.com! o1 t/ ~8 K+ T/ [1 I( [: }
' cgCount = 0
' EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
' If cgCount >= 2 Then魔力私服,最新魔力宝贝私服技术交流& h: u3 d4 H1 N' y6 F" z$ y0 Y/ m
'       MsgBox "抱歉!最多只能双开!"" u- _  R% v$ c$ @, i
'       Exit Sub
' End If
bbs.mocwww.com3 h. g" H% M9 R, z1 a' W# ]" g
不知道  红色部分该这么写，求高手帮忙分析一下魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. V2 e$ M% s' e1 d: @
3 _5 n/ c$ j+ }/ k9 }) g9 i* l
刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷

所以在这里发贴，老大不会介意吧

作者: u-know 时间: 2008-4-28 00:55

没有人能帮我解答吗？

自己坐沙发，自己顶自己魔力私服,最新魔力宝贝私服技术交流+ r! T# Q) J# ]; ]

作者: itsong 时间: 2008-4-28 01:05

传递给回调函数“EnumWindowsProc"的值，如果你不需要传递给回调函数值，可以设置为0。

作者: u-know 时间: 2008-4-28 01:08

那我这段语句让他运行该设置成什么样的函数？bbs.mocwww.com/ Z4 n* u/ _3 Q) H; B

bbs.mocwww.com: U- A7 A; ^8 t$ V8 @

作者: itsong 时间: 2008-4-28 01:09

你把你的回调函数贴出来看看。

作者: 。▂.Get.out 时间: 2008-4-28 01:11

魔力私服,最新魔力宝贝私服技术交流# h2 {4 o# K8 e, ]0 u1 a/ G% q, O
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 ^: y9 ~( {6 H6 I, F
LS还没休息额..- -..高手..

作者: u-know 时间: 2008-4-28 01:14

Private Sub Command3_Click()
妖城在线论坛% [, B" s5 L0 @) y/ W
Dim file As String, para As String
6 o0 e9 `" z5 n" r2 Z" A
是这个吗

作者: itsong 时间: 2008-4-28 01:20

显然不是你所贴出的。建议你baidu搜索下别人怎么使用这个函数的。

作者: u-know 时间: 2008-4-28 01:25

难道说，红色部分是启动CG的文件名？

作者: itsong 时间: 2008-4-28 01:32

引用:

原帖由 u-know 于 2008-4-28 01:25 发表 bbs.mocwww.com6 e8 K' q! W9 G0 h9 a" p5 C7 w
难道说，红色部分是启动CG的文件名？

—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート# b9 G# W) j1 ]) ?/ M$ H
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

作者: u-know 时间: 2008-4-28 01:35

' Timer1.Interval = 10000—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート% ^+ h' ^  v( ?( S) r+ X
' Timer1.Enabled = True妖城在线论坛( e8 X& g0 A$ L# t% J
' StartCG.Enabled = True
'
' cgCount = 07 H! I* z2 S2 d0 y
' EnumWindows AddressOf EnumWindowsProc, 0妖城在线论坛9 Z) [# r& C: N1 T& M" y/ m( @
' If cgCount >= 2 Then
'       StartCG.Tag = "-1"    '
'       StartCG.Enabled = False
'       StartCG.Caption = "超开限制"
'( x" T; K" }+ R; E# c
'       If App.PrevInstance = True Then
'       MsgBox "最多只能两开！"—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* ~) r. J8 V- J- w6 X1 K
'       End! x5 _+ `. M2 n; v
'       End If魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# J9 [8 b7 Q" {- g- K
魔力私服,最新魔力宝贝私服技术交流/ r* g2 [( n* l  K' o

只找到一个跟这个相同的

作者: itsong 时间: 2008-4-28 01:38

搜索关键字
”EnumWindows VB“

作者: u-know 时间: 2008-4-28 01:45

感谢LS的帮助

欢迎光临妖城在线论坛 (http://bbs.mocwww.com/)