u-know

在加载工程的时候发现有这样的一段话
2 n3 F8 [9 S" d, @魔力私服,最新魔力宝贝私服技术交流bbs.mocwww.com! z' h# P6 o* G6 ^) [3 q
'    cgCount = 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 S. L/ {/ b0 N8 j# O* \
'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
! x% T2 u5 o0 x/ J& h3 h'    If cgCount >= 2 Then
+ j8 I* ]' @2 u/ |( \妖城在线论坛'        MsgBox "抱歉!最多只能双开!"妖城在线论坛4 r/ K2 T* x8 j4 k" y
'        Exit Subbbs.mocwww.com; j+ v8 d! p2 w; R! O4 n
'    End If1 x2 U/ X3 k8 F7 Q

6 B  I; ~8 k' t0 {bbs.mocwww.com不知道  红色部分该这么写，求高手帮忙分析一下bbs.mocwww.com' }' Y, T7 Z; I1 ?

9 n  [/ e0 f. p/ P妖城在线论坛刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷
" w4 K4 d2 T4 s7 L. \1 Gbbs.mocwww.com
( w+ X8 O/ l  E( L5 p$ r: z$ Abbs.mocwww.com所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？
" R  L: |7 }+ Q8 @" `魔力私服,最新魔力宝贝私服技术交流9 Q/ B' f7 q3 V/ M; a3 b' S+ ]
自己坐沙发，自己顶自己
0 `/ n9 ]; A* s1 [% o( ?' F9 `魔力私服,最新魔力宝贝私服技术交流

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表! _- F- }6 Z, I  s

0 C6 x' p" u' O6 a* Z; D魔力私服,最新魔力宝贝私服技术交流6 s% u4 j/ C1 [1 D

itsong

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

。▂.Get.out

$ c, y/ S2 A2 h9 ?* [# T& Dbbs.mocwww.com
8 }6 `9 {! E5 t: [+ b# ?6 P魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表LS还没休息额..- -..高手..

u-know

Private Sub Command3_Click()
) H& P1 D( h$ L& w9 v6 @% K  ]—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
; j( \  l: @: X* @- J2 |bbs.mocwww.comDim file As String, para As String魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ j! K; N) m2 n6 O8 t
bbs.mocwww.com1 W' m! U2 d# s2 H, X( W2 D: i
是这个吗

itsong

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

u-know

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

itsong

引用:

原帖由 u-know 于 2008-4-28 01:25 发表
/ Z- g8 j- h; p6 c, ?+ y—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート难道说，红色部分是启动CG的文件名？

—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& @0 j* g$ k1 b4 E
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000
9 I. q. @- h1 _妖城在线论坛'    Timer1.Enabled = Truebbs.mocwww.com: E! A3 h$ z, c$ _& D0 O& x# p$ q
'    StartCG.Enabled = True
: u$ C/ D4 u# W  M( P妖城在线论坛'妖城在线论坛$ ]& {8 m5 H  L9 S
'    cgCount = 0
8 N1 R9 a6 {) o0 r: J$ F5 F魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'    EnumWindows AddressOf EnumWindowsProc, 0bbs.mocwww.com4 N0 I9 k! s/ g. A
'    If cgCount >= 2 Then
/ v5 n( c! x1 m'        StartCG.Tag = "-1"      '妖城在线论坛' S  Q3 U" s! z0 f* p, |6 c
'        StartCG.Enabled = Falsebbs.mocwww.com) U, N* M5 z6 |+ g' d4 l
'        StartCG.Caption = "超开限制"
* z6 l, ~( ]- P  o3 k: n; u魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'
5 d+ R  W  l8 J4 M" J5 f'        If App.PrevInstance = True Then魔力私服,最新魔力宝贝私服技术交流8 r: n8 p- E/ b) x7 m
'        MsgBox "最多只能两开！"
2 n1 c0 l3 e% @  I/ n/ U1 E魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'        End—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" V, Q! s/ q: _  R3 u1 C& O& O
'        End If
( M$ ~6 H7 K1 N# z* d% Zbbs.mocwww.com
! R9 h6 R" y) a—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートbbs.mocwww.com9 o) Q6 D! ~/ L3 N/ |
只找到一个跟这个相同的

itsong

搜索关键字
3 e# d% b3 Q! n5 ~% _! ~”EnumWindows VB“

u-know

感谢LS的帮助
- K( a# [! r+ Z4 Ybbs.mocwww.com