妖城在线论坛 - Powered by Discuz! Board

标题: [提问] 制作登录器问题 [打印本页]

作者: u-know 时间: 2008-4-28 00:43 标题: 制作登录器问题

在加载工程的时候发现有这样的一段话—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 n6 I0 l! ]6 z  ~

' cgCount = 0
' EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
' If cgCount >= 2 Then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表- D2 n3 I0 P; N% }' b, h5 i, @
'       MsgBox "抱歉!最多只能双开!"妖城在线论坛; r9 o* s" E. u. ?. d& l
'       Exit Sub—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート; ]5 A+ F- Y# a4 e& h% ^' T# m& E$ R( F
' End If妖城在线论坛, i9 O, b: l1 }, T3 o2 k
魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表1 L" }$ ^2 T+ ^/ Y' x, r# J  I$ o
不知道  红色部分该这么写，求高手帮忙分析一下

刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート6 l0 U: q1 T' H* S& n+ @  w$ l, ]

所以在这里发贴，老大不会介意吧

作者: u-know 时间: 2008-4-28 00:55

没有人能帮我解答吗？魔力私服,最新魔力宝贝私服技术交流5 N; e0 V5 m1 m" X, K4 [

自己坐沙发，自己顶自己

作者: itsong 时间: 2008-4-28 01:05

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

作者: u-know 时间: 2008-4-28 01:08

那我这段语句让他运行该设置成什么样的函数？魔力私服,最新魔力宝贝私服技术交流6 }$ t4 r6 N3 ]1 s* o
—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート/ O3 W4 Y, J; E* }1 ^

作者: itsong 时间: 2008-4-28 01:09

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

作者: 。▂.Get.out 时间: 2008-4-28 01:11

LS还没休息额..- -..高手..

作者: u-know 时间: 2008-4-28 01:14

Private Sub Command3_Click()魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表$ R9 e. J6 l$ w: Q% O' B% v

Dim file As String, para As String妖城在线论坛' { k# `5 B, F" V
5 v* }/ l. T9 z
是这个吗

作者: itsong 时间: 2008-4-28 01:20

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

作者: u-know 时间: 2008-4-28 01:25

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

作者: itsong 时间: 2008-4-28 01:32

引用:

原帖由 u-know 于 2008-4-28 01:25 发表
难道说，红色部分是启动CG的文件名？

魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表9 E" P' y" u8 `% k$ v6 q
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

作者: u-know 时间: 2008-4-28 01:35

' Timer1.Interval = 10000& X! p* j2 h" f3 U9 X/ L9 F
' Timer1.Enabled = True
' StartCG.Enabled = True魔力私服,最新魔力宝贝私服技术交流) A+ O7 }1 t* R/ @' l8 c+ A
'
' cgCount = 0
' EnumWindows AddressOf EnumWindowsProc, 02 X8 j' N" C( T* t$ S( I
' If cgCount >= 2 Thenbbs.mocwww.com' `2 D) R, r2 s# p# G. d# c$ s
'       StartCG.Tag = "-1"    'bbs.mocwww.com" ~( ]6 |% l9 t& L- f+ ~
'       StartCG.Enabled = False
'       StartCG.Caption = "超开限制"
'
'       If App.PrevInstance = True Then魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表" l5 o& s5 W5 ]4 f# _
'       MsgBox "最多只能两开！"
'       End
'       End If
" O0 U$ ?! y! b
魔力私服,最新魔力宝贝私服技术交流+ j1 Z# O1 v8 E% E/ r! l+ _
只找到一个跟这个相同的

作者: itsong 时间: 2008-4-28 01:38

搜索关键字魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表2 X5 r+ t* W& N) ^
”EnumWindows VB“

作者: u-know 时间: 2008-4-28 01:45

感谢LS的帮助

欢迎光临妖城在线论坛 (http://bbs.mocwww.com/)