u-know

在加载工程的时候发现有这样的一段话
4 `* T( ~0 F. b- q. V妖城在线论坛bbs.mocwww.com. _& ]" Q0 ]/ P% ?) C+ E
'    cgCount = 0魔力私服,最新魔力宝贝私服技术交流5 S0 s9 m1 `9 a* d& X0 P1 S+ N
'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
2 h4 t% Z9 M- [( Q/ g; d( y- T'    If cgCount >= 2 Then
( e3 w2 v1 b- C! ~—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        MsgBox "抱歉!最多只能双开!"妖城在线论坛/ L0 c$ [- v0 B
'        Exit Sub
: u% m) ]1 T: _  E妖城在线论坛'    End If
0 ~, T* w+ x& ]6 X' G—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
6 I. V6 {0 \6 P( |- h; o; a2 ~! c—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート不知道  红色部分该这么写，求高手帮忙分析一下bbs.mocwww.com- R. s& V, Y% {/ N) b* `2 E

5 B4 D$ l4 y6 Y2 V5 V4 }) U4 M魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷妖城在线论坛* ?; y' ^0 e+ C& C
9 z% b$ T' ?) B; L7 x' i# m- q
所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？
, H; t! ^1 X# o: E' r2 @, i3 e+ h, qbbs.mocwww.com
7 z2 U8 a) ~! ]/ X自己坐沙发，自己顶自己- M# I6 B& f& Q, ?' Z9 g

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？
$ M" U, O5 r' k! u8 l5 G" K魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
! ~' d$ e- R' M* _' {+ R妖城在线论坛
$ R( O: G# y/ q9 g% a  y. N—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート

itsong

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

。▂.Get.out

+ b$ s4 [% m( \, a2 f妖城在线论坛
! x( n( k, ^6 y, P+ T6 V0 D2 Qbbs.mocwww.comLS还没休息额..- -..高手..

u-know

Private Sub Command3_Click()
1 u! H2 {/ i% B" y" ^3 Q" H+ w; u魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート! }& ]8 v+ v% K5 I( d
Dim file As String, para As String妖城在线论坛3 a( @3 G, w7 S; e8 l
; e: n+ |, v0 E( t$ N
是这个吗

itsong

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

u-know

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

itsong

引用:

原帖由 u-know 于 2008-4-28 01:25 发表 魔力私服,最新魔力宝贝私服技术交流9 K+ i  ~9 I1 G
难道说，红色部分是启动CG的文件名？

bbs.mocwww.com) d2 E% n% o: p) s  P, Q2 k) Z
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート. N. t0 D# P' F- m. e
'    Timer1.Enabled = True
0 Y, x; L+ w! B. i( }bbs.mocwww.com'    StartCG.Enabled = True
$ w8 n) R, N& e'妖城在线论坛7 `( T6 I9 r& p1 Z4 l
'    cgCount = 0
. Y+ g. P! s1 ], x妖城在线论坛'    EnumWindows AddressOf EnumWindowsProc, 0bbs.mocwww.com* P5 Q7 V+ w1 n) \1 j, h
'    If cgCount >= 2 Then
& f! d% M( \4 o! O6 r) K- G1 y魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'        StartCG.Tag = "-1"      '
9 D  q& {( F9 _8 c- Q' ~魔力私服,最新魔力宝贝私服技术交流'        StartCG.Enabled = False
1 J( z2 A/ H6 E* P8 f+ t'        StartCG.Caption = "超开限制"魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表3 g) \; F; g# C. z$ D1 T( M) V
'魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 \7 J) |0 R( s/ N" B
'        If App.PrevInstance = True Then
1 Y; ?( D- U9 X2 Gbbs.mocwww.com'        MsgBox "最多只能两开！"魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表, D$ _5 V7 Y$ ^1 r6 a
'        End—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート  f- u0 Q: R' E8 p
'        End If
1 s7 S3 `3 ~: i1 `* `1 s( t
& S# g1 X  p0 p7 p! h魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表bbs.mocwww.com' {+ ?0 o. A6 Q+ G6 k
只找到一个跟这个相同的

itsong

搜索关键字
" B$ ~! w* j4 K”EnumWindows VB“

u-know

感谢LS的帮助魔力私服,最新魔力宝贝私服技术交流. e  Y% Q, t$ F) y; U6 l