u-know

在加载工程的时候发现有这样的一段话—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& {/ O! k+ b/ ?
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ V. j5 z1 M# C6 J; q% K
'    cgCount = 0
+ b6 |/ e6 h6 l2 Q7 P( w魔力私服,最新魔力宝贝私服技术交流'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; I2 Y; m$ D' {
'    If cgCount >= 2 Then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 z% s0 @, v2 U8 Z1 V) j& @
'        MsgBox "抱歉!最多只能双开!"5 k5 O7 b: R3 k% I1 M2 H6 O
'        Exit Sub—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' O& z7 R5 k% n$ P
'    End If
7 V" e( P$ F/ g; M7 l! t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート( t, t' Y& T! |8 t& @" ~5 ?3 o" e) s
不知道  红色部分该这么写，求高手帮忙分析一下魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 ]8 X7 q& e( Y2 `3 \* I) n
妖城在线论坛( B1 N) v! ]. g0 N
刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表7 t, u2 F& x$ h# F  E
bbs.mocwww.com1 e0 c0 G' i7 O, ^" }
所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？
! q' u! b1 y2 g& {/ G妖城在线论坛魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 h7 b" q' x! u9 k
自己坐沙发，自己顶自己
1 V- R: [' _$ P

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？
. j% U% b0 j4 P1 e$ r魔力私服,最新魔力宝贝私服技术交流
% @  e, t% b/ X妖城在线论坛bbs.mocwww.com( s3 e) T3 J3 d2 o, C* V

itsong

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

。▂.Get.out

4 }% x$ |6 ^% B2 ]# F—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートbbs.mocwww.com1 j  A$ e8 l4 }$ Q: }
LS还没休息额..- -..高手..

u-know

Private Sub Command3_Click(), m4 [4 F. S! ]% |# ~
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# S0 V( J& k& M5 w4 B& y3 U' j
Dim file As String, para As String7 ]4 q% N, q( j- ~

  A7 h# N* e: z: @是这个吗

itsong

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

u-know

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

itsong

引用:

原帖由 u-know 于 2008-4-28 01:25 发表
3 T* B3 i6 U6 C6 Y" ^魔力私服,最新魔力宝贝私服技术交流难道说，红色部分是启动CG的文件名？

# k/ Q: \% ]3 c
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000bbs.mocwww.com# g  h$ E2 k7 `2 ?
'    Timer1.Enabled = True
0 k% s- Y: u  U9 v0 @魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'    StartCG.Enabled = True
3 b( C2 N$ j2 }8 Z( j$ p$ l7 O魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'
7 F# @0 w4 d( a6 u; I—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'    cgCount = 0: \; B5 T5 Q: c5 A  |
'    EnumWindows AddressOf EnumWindowsProc, 0
- P( n6 A3 L  f9 }6 p7 W魔力私服,最新魔力宝贝私服技术交流'    If cgCount >= 2 Thenbbs.mocwww.com3 T, `! I6 Z$ G
'        StartCG.Tag = "-1"      '( Z2 \4 @( A# V0 m4 h% R
'        StartCG.Enabled = False魔力私服,最新魔力宝贝私服技术交流- M/ D2 w; k$ }4 ~: @8 }
'        StartCG.Caption = "超开限制"—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ f6 O, F7 t# e" J
'
; c6 t2 c0 e8 ?( Z1 J* B0 wbbs.mocwww.com'        If App.PrevInstance = True Then
5 [: j) Q' l7 n0 I- J  ]$ t% C魔力私服,最新魔力宝贝私服技术交流'        MsgBox "最多只能两开！"  q& m0 B, o& w) r$ S" }; z+ ^4 w
'        End妖城在线论坛$ Z: u2 w# X' L
'        End If妖城在线论坛9 M! i- g1 v& I2 r* G% F

% {4 [' Z, S1 @  tbbs.mocwww.com* q4 X! l% L3 E& u
只找到一个跟这个相同的

itsong

搜索关键字 bbs.mocwww.com) {# K* ?% Z6 `
”EnumWindows VB“

u-know

感谢LS的帮助
8 s2 i0 z/ G, B7 i) l—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート