发新话题
打印

[提问] 制作登录器问题

制作登录器问题

在加载工程的时候发现有这样的一段话
, g4 j3 X! b! h% }0 `5 \$ n- K—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
0 J6 P- C: @/ l+ Q$ C魔力私服,最新魔力宝贝私服技术交流'    cgCount = 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- z( @9 e$ f0 X" M! R, W+ }
'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)魔力私服,最新魔力宝贝私服技术交流* H1 F3 [( |# h. J
'    If cgCount >= 2 Thenbbs.mocwww.com: I: E3 E, w( l- i2 N
'        MsgBox "抱歉!最多只能双开!"+ M& z3 l: Z. }* h
'        Exit Sub魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" X& k; i3 u% l, x* J9 n' }
'    End If
* ?# G7 N3 t5 h1 t3 F—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
. n$ S3 M' X( v  J不知道  红色部分该这么写,求高手帮忙分析一下bbs.mocwww.com7 r* c* e( x  H; p4 Y
魔力私服,最新魔力宝贝私服技术交流/ u3 y+ Q5 R* b8 I3 Q& b
刚才在编程里不能发帖,点击新帖时电脑自动重启,郁闷
+ U; s; E: q' A: l1 P" M) G5 J
& D4 K$ g" S' `& i7 t9 e妖城在线论坛所以在这里发贴,老大不会介意吧

TOP

没有人能帮我解答吗?
6 j0 ]6 @9 g: Xbbs.mocwww.com& i+ ?* @4 t3 X+ g7 b; B4 |0 G1 ?
自己坐沙发,自己顶自己
4 K( w# u% `5 y9 n- O( Y' t( rbbs.mocwww.com

TOP

那我这段语句 让他运行该设置成什么样的函数?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# O3 p& p8 ]' E6 `& H+ X* c. U: y
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート& Y# n0 Z6 V: s6 m

7 D( Q8 ~( J/ u: Y1 j

TOP

Private Sub Command3_Click()bbs.mocwww.com  n- \9 ~, i6 z6 z7 |# P
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* Z  e& h4 b3 g$ h/ @
Dim file As String, para As String
' k% `* A5 p% w! K. _1 O) q—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート妖城在线论坛. y; N0 h5 M' f" Y. S1 `7 F
是这个吗

TOP

难道说,红色部分是启动CG的文件名?

TOP

'    Timer1.Interval = 10000bbs.mocwww.com: k+ J- D0 \* \( p
'    Timer1.Enabled = True
4 t* ~4 D! |8 q! o4 I% o5 K魔力私服,最新魔力宝贝私服技术交流'    StartCG.Enabled = True妖城在线论坛1 w2 U+ a: K+ C: i
'妖城在线论坛" W1 F4 U' ]* n3 Z; B. d: P% p5 Z
'    cgCount = 0
7 C, Q) R. B; q. y( [) |+ Wbbs.mocwww.com'    EnumWindows AddressOf EnumWindowsProc, 0
- p, x1 K; q/ q妖城在线论坛'    If cgCount >= 2 Then魔力私服,最新魔力宝贝私服技术交流- _0 p- ?* N# S: Z" T5 U
'        StartCG.Tag = "-1"      '
& l0 j3 n3 L! k: ?魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'        StartCG.Enabled = False
# T8 p# y* Q4 T; `4 n3 P2 x6 s'        StartCG.Caption = "超开限制"
3 F7 F% `* h; r& b9 f! r—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表( T6 k. j7 H+ }7 n, Y/ Z" s
'        If App.PrevInstance = True Then—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 E1 t6 l; K5 @3 ?
'        MsgBox "最多只能两开!"妖城在线论坛( \$ M. `5 b8 `& R) R5 U; d: P
'        End
  O& Q4 J2 B9 g4 Z3 t—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        End If
/ p, k4 L1 W! X1 p9 \魔力私服,最新魔力宝贝私服技术交流
: H5 E; i. m0 D" I2 j妖城在线论坛魔力私服,最新魔力宝贝私服技术交流7 F: y% q7 ?* z1 s' [6 S
只找到一个跟这个相同的

TOP

感谢LS的帮助
, S5 I2 W" B% l. ^—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート

TOP

发新话题