代码搜索:mapbasic
找到约 68 项符合「mapbasic」的源代码
代码结果 68
www.eeworm.com/read/218098/14938324
mb covermenu.mb
Include "menu.def"
Include "icons.def"
include "mapbasic.def"
Declare Sub CoverMenu
sub CoverMenu
dim datapath as string '* 定义程序中数据的路径
dim i as integer
dim bflag as logical
www.eeworm.com/read/434528/7861679
mb 旋转文本.mb
include "mapbasic.def"
declare sub main
declare sub mnu_textangle
declare sub rotate_text
global tabname() as string
global angle as float
sub main
create menu "改变文本角度" as
"文本角度" cal
www.eeworm.com/read/434528/7861619
mb 查找点对象.mb
include "mapbasic.def"
declare sub main
declare sub mnu_findpoint
declare sub find_point
global tabname() as string
sub main
create menu "查找点" as
"选择所有点" calling mnu_findpoint
alter
www.eeworm.com/read/218101/14937615
mb openlayer.mb
Include "menu.def"
Include "icons.def"
include "mapbasic.def"
Declare Sub openlayer
Sub openlayer
Dim wnd_id As Integer
Dim datapath As string
dim i as integer
dim bflag, m, n, k, l, r
www.eeworm.com/read/434528/7861614
mb connect_to_oracle816_odbc.mb
include "mapbasic.def"
include "menu.def"
include "icons.def"
declare sub main
declare sub sub1
declare sub exit_sub
declare sub pushbtn_sub
sub main
create menu "test" as
"Connet to
www.eeworm.com/read/434528/7861682
mb 动态图层.mb
Include "mapbasic.def"
Include "icons.def"
Include "menu.def"
Declare Sub main
Declare Sub open_tables
Declare Sub move_trucks
Declare Sub end_program
Global Use_Animation as Logical
Sub
www.eeworm.com/read/434528/7861641
mb 屏蔽鼠标双击事件.mb
Include "mapbasic.def"
Include "menu.def"
Include "icons.def"
'*****This is used in in VB OLE
'dim x,y as float
'dim obj1 as object
'x=commandinfo(CMD_INFO_X)
'y=commandinfo(CMD_INFO_y)
'o
www.eeworm.com/read/434528/7861671
mb connect_to_oracle816_oci.mb
include "mapbasic.def"
include "menu.def"
include "icons.def"
declare sub main
declare sub sub1
declare sub exit_sub
declare sub pushbtn_sub
sub main
create menu "test" as
"Connet t
www.eeworm.com/read/434528/7861631
mb show_mul_sel.mb
include "mapbasic.def"
include "menu.def"
include "icons.def"
declare sub main
declare sub sub1
declare sub sub2
declare sub sub3
declare sub WinClosedHandler
global mul_sel_list(15) as st
www.eeworm.com/read/434528/7861635
mb 自定义双击事件.mb
'注意:双击地图对象时,速度不能太快,否则达不到双击的效果
Include "mapbasic.def"
Include "menu.def"
Include "icons.def"
declare sub main
declare sub custom_tool_routine
declare sub SelChangedHandler
dim flag as Logical