u-know

在加载工程的时候发现有这样的一段话
7 J; q5 s3 r* Z5 e1 {( o* {1 p—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力宝贝私服技术交流3 v& c! f7 ?  ?) ~  [
'    cgCount = 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( n  i- L: D0 T! u7 q7 D* b
'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
) h6 _, J8 [, Obbs.mocwww.com'    If cgCount >= 2 Then
; e% d7 [5 b( w" e6 d( `5 W—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        MsgBox "抱歉!最多只能双开!"
9 \" E5 M5 g; F" G' I魔力私服,最新魔力宝贝私服技术交流'        Exit Sub
1 l$ @: ?* C$ J8 [妖城在线论坛'    End If
  z1 X' l8 Q6 R* g, w3 p/ O0 c8 S) G—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
8 g0 z. ~' x* n% A不知道  红色部分该这么写，求高手帮忙分析一下bbs.mocwww.com) I, {& ?' w9 o8 j# F
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表0 R- ], {( D$ a* Y) J/ f" q
刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷
/ n& U5 @4 j; E6 d魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
. T  n5 C0 F. K$ r0 V魔力私服,最新魔力宝贝私服技术交流所以在这里发贴，老大不会介意吧

u-know

没有人能帮我解答吗？魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 ~! H' ]" A" O) |. z! _

- c- o5 m% D; s0 t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート自己坐沙发，自己顶自己
* g1 |- R3 g0 ]: P

itsong

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

u-know

那我这段语句 让他运行该设置成什么样的函数？
/ I0 D7 u1 M7 C, g8 ^+ l1 K: `. i妖城在线论坛
1 J7 E4 I& n) M- O9 Z, Y* k魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
0 g" ^/ Y. l: y魔力私服,最新魔力宝贝私服技术交流

itsong

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

。▂.Get.out

! n0 q+ g. a9 @% j$ ?  {—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート魔力私服,最新魔力宝贝私服技术交流" ]. x8 J6 w# J
LS还没休息额..- -..高手..

u-know

Private Sub Command3_Click()魔力私服,最新魔力宝贝私服技术交流1 T2 }" I1 @2 Q6 a; d

6 I4 b6 E0 @% r% x4 b—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲートDim file As String, para As String
8 S' a3 r) G' n魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
  l, \3 y3 ?: C2 Q7 N+ Z" y3 P—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート是这个吗

itsong

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

u-know

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

itsong

引用:

原帖由 u-know 于 2008-4-28 01:25 发表
% W$ G& [# p0 W+ kbbs.mocwww.com难道说，红色部分是启动CG的文件名？

bbs.mocwww.com" P) j* Z+ i& e) V
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

u-know

'    Timer1.Interval = 10000bbs.mocwww.com" _6 i- }; U3 Q. o* Z7 m, v
'    Timer1.Enabled = True魔力私服,最新魔力宝贝私服技术交流. U* o0 k: i' X5 l' n
'    StartCG.Enabled = Truebbs.mocwww.com' `- n8 t$ A' v+ D( X) ^
'魔力私服,最新魔力宝贝私服技术交流& [- h2 `+ B  T; L! u5 c" Z
'    cgCount = 03 P7 g4 H- s7 B( F  k' K. a9 |
'    EnumWindows AddressOf EnumWindowsProc, 0妖城在线论坛) Y* _6 y2 e7 v
'    If cgCount >= 2 Then
, n2 a5 G, i+ e3 Q" o妖城在线论坛'        StartCG.Tag = "-1"      '—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート) ]& o' P1 M& \1 E
'        StartCG.Enabled = False
# X0 K. `% K) M6 ]—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        StartCG.Caption = "超开限制"bbs.mocwww.com% _) ~. ^* a4 V6 e- ]/ K, {
'妖城在线论坛! c5 @% l  T: W9 ?1 r
'        If App.PrevInstance = True Then
9 f( l1 }7 @- f) d; p0 ~' q9 M—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        MsgBox "最多只能两开！"妖城在线论坛! ?5 D' b$ c, ?
'        End
- t8 K, g  I- `& k0 S* T! `妖城在线论坛'        End If
, G5 T$ n1 q' N2 u- r—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
$ q) j) _1 G) ^* F3 f8 W; Abbs.mocwww.com
! h3 f* |1 Y/ W8 `* d" m  Y魔力私服,最新魔力宝贝私服技术交流只找到一个跟这个相同的

itsong

搜索关键字
& |# u) @, ~3 }2 Y”EnumWindows VB“

u-know

感谢LS的帮助
* `+ a' L7 n4 S' Q4 d. @魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表