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

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

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

在加载工程的时候发现有这样的一段话
魔力私服,最新魔力宝贝私服技术交流! }  E  b- t; F$ g. O
' cgCount = 0魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表. F  T( C4 u- p
' EnumWindows AddressOf EnumWindowsProc, Val(StartCG.Tag)
' If cgCount >= 2 Then
'       MsgBox "抱歉!最多只能双开!"魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表# J9 r+ s. V1 Z4 ]1 l7 e, ?, `
'       Exit Sub魔力私服,最新魔力私服,魔力宝贝私服,魔力宝贝私服技术,魔力宝贝私服,私服架设技术,妖城,FLASH,电影,黑客,网络,网吧,破解,入侵,注册表/ {  i  \1 \) }; X( J' N
' End If

不知道  红色部分该这么写，求高手帮忙分析一下

刚才在编程里不能发帖，点击新帖时电脑自动重启，郁闷
魔力私服,最新魔力宝贝私服技术交流# X/ w* |( {: ^& a* V" j% u
所以在这里发贴，老大不会介意吧

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

没有人能帮我解答吗？—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート7 S6 Z s/ T b5 C* N7 n; @9 D

自己坐沙发，自己顶自己bbs.mocwww.com9 `6 f3 v% T( M. c

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

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

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

那我这段语句让他运行该设置成什么样的函数？

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

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

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

7 G: A6 s2 O B U( G7 {* y
LS还没休息额..- -..高手..

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

Private Sub Command3_Click()7 s' x- V$ N$ |9 P4 S
  ]1 e0 i1 {0 ]' E) ?# E! J) ?% u
Dim file As String, para As String妖城在线论坛/ l  y1 `! K# |& T& o- X
bbs.mocwww.com& L$ m& z5 t+ }  R1 e
是这个吗

作者: 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的文件名？

魔力私服,最新魔力宝贝私服技术交流( r6 W; \* M7 B& R* ~
具体得看你回调函数”EnumWindowsProc“的实现，才能决定那边到底该写什么。

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

' Timer1.Interval = 10000—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート" F" Y( r/ v. r' a
' Timer1.Enabled = True( \# s% Q5 J% M% q
' StartCG.Enabled = True9 U' k; C  C$ T
'—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート, R7 P7 Y0 S5 H1 p( \' l
' cgCount = 0—魔力私服,魔力宝贝私服技术,DELPHI编程,魔力寶貝, 魔力宝贝, 크로스게이트,クロスゲート9 _$ a. P9 \- V" c. i$ v1 N- X+ b
' EnumWindows AddressOf EnumWindowsProc, 0
' If cgCount >= 2 Thenbbs.mocwww.com5 ]0 B7 I  h. j, `2 V6 D
'       StartCG.Tag = "-1"    '
'       StartCG.Enabled = False妖城在线论坛+ ~0 I! j9 P6 P7 _" m' U
'       StartCG.Caption = "超开限制"
'
'       If App.PrevInstance = True Then妖城在线论坛$ _0 Y" f1 `. {9 V) `' p7 H7 }
'       MsgBox "最多只能两开！"4 T, F. c+ F1 w/ z+ Y  N
'       End魔力私服,最新魔力宝贝私服技术交流& }* V7 t8 i; J* z$ a9 f3 `
'       End If# e3 [" X  Q' M# o! b$ I
) p4 u1 ^0 [6 i7 p% h/ j
bbs.mocwww.com* [* z: u2 Z+ y. |; d9 j  I
只找到一个跟这个相同的

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

搜索关键字 bbs.mocwww.com1 K& ^2 {) {# W: v
”EnumWindows VB“

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

感谢LS的帮助

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