发新话题
打印

[提问] 制作登录器问题

制作登录器问题

在加载工程的时候发现有这样的一段话妖城在线论坛, b+ W, O; _3 b% w

' ?5 ^5 W. p$ K8 D妖城在线论坛'    cgCount = 0
/ S& O0 x" v: i1 L  |+ E妖城在线论坛'    EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
9 `3 D: S5 A2 F# S( |6 }8 Zbbs.mocwww.com'    If cgCount >= 2 Then
7 e# n, I0 M, s4 y—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        MsgBox "抱歉!最多只能双开!"妖城在线论坛8 d: Z; Q, w: r0 d$ {3 h
'        Exit Sub
* d' C3 Y1 X/ n+ f2 q魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'    End If—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 P4 w+ y0 K2 c. f* N$ S9 h

! L$ F, U/ `$ C4 d; f2 w3 e不知道  红色部分该这么写,求高手帮忙分析一下
) P( Z; O* _( p
0 b; M$ r; E# f# }8 x, f魔力私服,最新魔力宝贝私服技术交流刚才在编程里不能发帖,点击新帖时电脑自动重启,郁闷
8 \' j9 ?) J# t. X/ ?* U3 q魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表
1 F2 [+ p+ _+ Q3 H% F! n9 @所以在这里发贴,老大不会介意吧

TOP

没有人能帮我解答吗?
" K4 R3 v% p/ [7 T  b' T妖城在线论坛妖城在线论坛: m+ H% o3 E8 m; }! l
自己坐沙发,自己顶自己
6 p6 M' y  i  p3 h) h7 L; ?/ f

TOP

那我这段语句 让他运行该设置成什么样的函数?妖城在线论坛4 @5 J- K9 x' D  z1 t1 \9 G

/ Y. T/ H7 ~1 i. B8 g魔力私服,最新魔力宝贝私服技术交流妖城在线论坛8 S5 F5 [5 ^7 a: ^% Z! I

TOP

Private Sub Command3_Click()
6 B* J) `- p6 K0 Z1 g' @—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート
9 I0 s' Q* h# m妖城在线论坛Dim file As String, para As String
: V7 P6 o, U8 V9 X5 ~
6 w" e: p& K" h! a% E" y' u妖城在线论坛是这个吗

TOP

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

TOP

'    Timer1.Interval = 10000
  z# v% w, b2 [bbs.mocwww.com'    Timer1.Enabled = True
. ]1 H- R+ o5 b) O'    StartCG.Enabled = Truebbs.mocwww.com+ T( q! W  K& C' F/ n) K0 [
'
. ~8 a% `+ ]/ j7 A'    cgCount = 0
) X  _- C2 U+ M: W* Z" ?) y' s'    EnumWindows AddressOf EnumWindowsProc, 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート5 K: K8 s/ K% W3 F1 d6 X7 K* X
'    If cgCount >= 2 Thenbbs.mocwww.com8 m# \3 \5 n) c2 x  P
'        StartCG.Tag = "-1"      '
2 o9 m# m" P" V# hbbs.mocwww.com'        StartCG.Enabled = False魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表* F( B- c1 x) r- b: Z0 _
'        StartCG.Caption = "超开限制"妖城在线论坛$ r  w" ~9 S1 {9 R% _) U- p3 K
'
* [% e$ t! z# U1 B妖城在线论坛'        If App.PrevInstance = True Then
3 \% I( l' y+ Y1 m9 w魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表'        MsgBox "最多只能两开!"
; [. [+ J* w# Y! X$ L% H—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート'        End
. X6 \7 ?) g4 U# i'        End If—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 V' g: V& A$ o/ t4 [: M6 V

+ [* P3 x# O5 ?, l, C" Bbbs.mocwww.com0 Z$ n% B! q; C: O8 H- E
只找到一个跟这个相同的

TOP

感谢LS的帮助
0 r. P4 t2 g) o: f8 U魔力私服,最新魔力宝贝私服技术交流

TOP

发新话题