u-know

在加载工程的时候发现有这样的一段话. l; g' X( G9 _2 H7 z

3 f) l( y) I+ H" ^- T7 M& Abbs.mocwww.com'    cgCount = 0
4 J" \+ P/ }. |- I' k2 k; p魔力私服,最新魔力宝贝私服技术交流'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)妖城在线论坛0 y1 l9 E" L, p, H; z- D
'    If cgCount >= 2 Then
; m/ a6 c3 q3 ]; H: [0 I'        MsgBox "抱歉!最多只能双开!"
6 |* e2 E+ z3 }3 @4 t魔力私服,最新魔力宝贝私服技术交流'        Exit Sub魔力私服,最新魔力宝贝私服技术交流- c+ C( J* \! D+ S( [1 P
'    End If
  \" n# y; {+ \魔力私服,最新魔力宝贝私服技术交流魔力私服,最新魔力宝贝私服技术交流0 j0 r& I5 j" q1 I6 a  ~- ~
不知道  红色部分该这么写，求高手帮忙分析一下
5 Q& z5 H) Z% {% c( _魔力私服,最新魔力宝贝私服技术交流
* F/ W$ m' ]" X/ ^8 G! M. n8 tbbs.mocwww.com刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷: e- f8 k% ~0 j+ p3 n' c. I
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) S; M$ O5 N$ Y1 ~5 O6 [
所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 ~: G  J* \+ R; v
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート* L; T4 J5 X8 I) F
自己坐沙发，自己顶自己
9 c; G& G+ K6 |  A1 e

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？bbs.mocwww.com& N% M3 e, a  F" C, e

: n+ C9 b5 I- D* E7 Y* ]魔力私服,最新魔力宝贝私服技术交流—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート3 @" x6 v: J. W4 z; T  d& g; A

itsong

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

。▂.Get.out

妖城在线论坛% e" r: T& c+ S$ f( a( D

; g9 U. v7 P. i魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表LS还没休息额..- -..高手..

u-know

Private Sub Command3_Click()
/ H, }. @& {4 Ubbs.mocwww.com
  I& H( t# X- G妖城在线论坛Dim file As String, para As String魔力私服,最新魔力宝贝私服技术交流2 T4 s6 Q, r. V0 ]

' o. ^+ T6 J- @4 Z" y+ t妖城在线论坛是这个吗

itsong

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

u-know

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

itsong

引用:

原帖由 u-know 于 2008-4-28 01:25 发表 魔力私服,最新魔力宝贝私服技术交流: J, @3 o3 V; t& [
难道说，红色部分是启动CG的文件名？

bbs.mocwww.com% n3 h+ O% C. V* [6 L" @
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000
0 y4 l9 J# e8 z! f妖城在线论坛'    Timer1.Enabled = True( a9 E' Y9 t* S+ U- q+ b; h: K3 Y
'    StartCG.Enabled = Truebbs.mocwww.com' ~; o, H/ O1 |, e
'
8 a) z% @7 [/ A! `魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'    cgCount = 0
( _8 z2 S& k) {& D# @- b" b0 Q魔力私服,最新魔力宝贝私服技术交流'    EnumWindows AddressOf EnumWindowsProc, 0妖城在线论坛  K" l* N* ~* ]# X7 X7 `+ Y
'    If cgCount >= 2 Then妖城在线论坛6 m" {4 E( M* A, e  X& ]# b
'        StartCG.Tag = "-1"      '魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表; H* t/ ^) Q2 t- D- m# e
'        StartCG.Enabled = False
. o  j5 B( T7 f: P! T妖城在线论坛'        StartCG.Caption = "超开限制"
" B7 I/ j* k5 E" I  }9 u# s9 u% Z! O—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'
$ i  I) u9 g) T5 f: n'        If App.PrevInstance = True Then
6 z% {9 ~2 \1 v- Mbbs.mocwww.com'        MsgBox "最多只能两开！"
% P; H# V, j% |- K+ {& h( d'        End
0 S  u2 o$ y( T9 o'        End If
( p2 \! B: p1 R3 N2 d# Hbbs.mocwww.combbs.mocwww.com5 O0 H+ C. Y6 @* q

3 C- c4 p# @/ h7 n* Hbbs.mocwww.com只找到一个跟这个相同的

itsong

搜索关键字 4 f, X: D9 c1 q9 c3 d1 X
”EnumWindows VB“

u-know

感谢LS的帮助
' q/ M+ I! N. Z+ X( I6 Z妖城在线论坛