u-know

在加载工程的时候发现有这样的一段话魔力私服,最新魔力宝贝私服技术交流* C4 C7 G# c) s* J/ J2 ]; L) ?
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& z1 r# y5 C+ f$ u& L
'    cgCount = 0
8 L2 Q2 a8 g( x" H  Q. K8 a" L/ M5 H妖城在线论坛'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)) b* Y$ n( t9 ?1 O& W1 C5 {
'    If cgCount >= 2 Then妖城在线论坛9 d  |5 P+ ~0 Y. d) O
'        MsgBox "抱歉!最多只能双开!"
( N- O- M& f, s4 `! M妖城在线论坛'        Exit Sub妖城在线论坛/ \7 T7 V7 l$ b. c
'    End If
# m8 O0 p! P/ c+ O- Jbbs.mocwww.com$ {; K& V3 W9 a4 p+ B, d
不知道  红色部分该这么写，求高手帮忙分析一下bbs.mocwww.com* N. _# \: v/ q5 ]( m8 ^

) B5 O& w4 P# D. C8 a- |$ Zbbs.mocwww.com刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷
' |' g; y; h  Y, s, k. `" n4 ^魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
6 A4 q7 k, l: [: j# d7 f) R—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？
* L  M  O& k3 r* ?& `bbs.mocwww.com
. Y% O- |3 W5 `- E5 d; ~+ d5 Dbbs.mocwww.com自己坐沙发，自己顶自己魔力私服,最新魔力宝贝私服技术交流% O$ }& o& j. B) u$ I# `4 C

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？
+ O: P+ b; w6 F% b( ^4 J% B妖城在线论坛妖城在线论坛$ R, t. q, p- `" V8 z$ }; G% x

! ~( F5 s* R- c妖城在线论坛

itsong

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

。▂.Get.out

- q) I7 P- ?" ~—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
3 R2 y- {9 \# o( r0 z* B- K魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表LS还没休息额..- -..高手..

u-know

Private Sub Command3_Click()
" m" `4 j5 n+ G4 F0 S+ y& i6 v—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
- \- V# l2 `( t3 H妖城在线论坛Dim file As String, para As String
8 j# g  S- G0 j8 a魔力私服,最新魔力宝贝私服技术交流( H6 l9 n# N: s1 j3 s/ A# [
是这个吗

itsong

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

u-know

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

itsong

引用:

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

- C0 A5 e0 d6 w; T# V. J* e+ @具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート$ N1 U+ |/ K5 w$ X6 w
'    Timer1.Enabled = True& \; S$ K& T, `
'    StartCG.Enabled = Truebbs.mocwww.com: v2 e+ t; V8 _7 L4 b( ?2 g
'
2 h$ s  J0 J% |# [( q- }3 M妖城在线论坛'    cgCount = 0
* ^# @, l* j" m+ p8 F魔力私服,最新魔力宝贝私服技术交流'    EnumWindows AddressOf EnumWindowsProc, 0
3 x$ u% e6 W* p0 z" F/ ~—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'    If cgCount >= 2 Then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表) b6 M2 V+ _8 Z) q2 D' s( F
'        StartCG.Tag = "-1"      '
3 C4 `  ^) \  I/ h) I: J) L- n魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'        StartCG.Enabled = Falsebbs.mocwww.com& r" _/ U+ y) C* @7 S2 J# ~1 a
'        StartCG.Caption = "超开限制"
# s4 N, c) V  m. B. y  m. t妖城在线论坛'
$ X; n8 i3 x& \  a  @; `魔力私服,最新魔力宝贝私服技术交流'        If App.PrevInstance = True Then, |; }( I0 G5 c8 I; W& {! t
'        MsgBox "最多只能两开！"魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; S6 r# I  H# `+ U2 I* y  R
'        End
) z" k2 q) r* O( \& B'        End If
. i, G% E3 p, D  e/ c5 l" s魔力私服,最新魔力宝贝私服技术交流- n, x  V; Y9 w9 z( t/ L
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート' F8 s+ _6 g8 F
只找到一个跟这个相同的

itsong

搜索关键字
' Q2 l4 K0 z7 \( _  L9 ~4 N+ v魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表”EnumWindows VB“

u-know

感谢LS的帮助
5 l7 f+ a' A; P) q. K+ l" k  j! h% m—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート