20楼#
发布于:2005-03-13 18:47
MAPX如何从文本文件读取数据,自动进行绘图?
|
|
21楼#
发布于:2005-03-05 12:26
怎么正?
|
|
22楼#
发布于:2005-01-18 16:38
?
|
|
23楼#
发布于:2005-01-07 17:35
111
|
|
24楼#
发布于:2005-01-05 15:18
<img src="images/post/smile/dvbbs/em01.gif" />
|
|
25楼#
发布于:2004-12-24 14:26
<P>修改了一下自动滚屏的代码,大家看看效果</P><P>前提:VB,Form+Map+Timer</P><P>Private strDirection As String</P><P>Private Sub Map1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
Timer1.Enabled = False If X > Map1.MapScreenWidth - 10 Then strDirection = "R" Timer1.Enabled = True Else If X < 10 Then strDirection = "L" Timer1.Enabled = True Else If Y > Map1.MapScreenHeight - 10 Then strDirection = "U" Timer1.Enabled = True Else If Y < 10 Then strDirection = "D" Timer1.Enabled = True End If End If End If End If End Sub</P><P>Private Sub Timer1_Timer()</P><P> Select Case strDirection Case "R" Map1.CenterX = Map1.CenterX + 0.5 Case "L" Map1.CenterX = Map1.CenterX - 0.5 Case "U" Map1.CenterY = Map1.CenterY - 0.5 Case "D" Map1.CenterY = Map1.CenterY + 0.5 End Select</P><P>End Sub </P> |
|
26楼#
发布于:2004-12-24 09:33
看一看
|
|
27楼#
发布于:2004-12-17 10:37
<img src="images/post/smile/dvbbs/em02.gif" /><img src="images/post/smile/dvbbs/em01.gif" />
|
|
28楼#
发布于:2004-12-09 10:48
我怎么看不见啊?
|
|
29楼#
发布于:2004-11-12 19:20
要配准一下。
|
|