| 上一篇主題 :: 下一篇主題 |
| 發表人 |
內容 |
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2160
第 1 樓
|
 發表於: 星期五 一月 06, 2006 6:06 pm 文章主題: 在form中顯示 papago線上地圖 |
 |
|
只要知道要顯示地址中的衛星定位的 X Y 軸
就可以用 DHMLEdit 這個物件來顯示正確的地圖
| 代碼: |
PUBLIC oform1
oform1=NEWOBJECT("form1")
oform1.Show
RETURN
**************************************************
DEFINE CLASS form1 AS form
Top = 0
Left = 0
Height = 477
Width = 496
DoCreate = .T.
Caption = "Form1"
Name = "form1"
ADD OBJECT dhtml AS olecontrol WITH ;
Top = -36, ;
Left = -24, ;
Height = 550, ;
Width = 550, ;
Name = "dhtml"
PROCEDURE Init
LPARAMETERS mposx,mposy,mname
IF EMPTY( mposx) &&--測試內定值
mposx=120684346
mposy=24103400 &&--24103565
mname='尚易資訊有限公司'
endif
WITH thisform.dhtml
mstr = ''
mstr = mstr +[<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">]
mstr = mstr +[<iframe src="http://www.imap.com.tw/enterprise/maps_frame.asp?]
mstr = mstr +[x=]+LTRIM(STR(mposx))+[&y=]+LTRIM(STR(mposy))+[&profile=pc_standard&company=]+mname+[&poi=company" ]
mstr = mstr +[align="middle" frameborder="0" width="500" height="500" scrolling="no">]
mstr = mstr +[</iframe>]
.documentHTML= mstr
endwith
ENDPROC
ENDDEFINE
|
_________________
利用>>搜尋<<的功能會比問的還要快得到答案. |
|
| 回頂端 |
|
 |
bin1x
註冊時間: 2004-08-27
文章: 462
第 2 樓
|
| 發表於: 星期五 一月 06, 2006 7:47 pm 文章主題: |
|
|
我有個地圖檔
是用arc view 作的
所以我拉進 arc view 的control 物件
但常down 掉
因為我手上有個GPS RECEIVER 藍芽的用com1 將serial port 1強制disable 掉
而藍芽的虛擬port 強制轉到com1
所以我想試著作GPS 定位
我有試著用mscomm32 來作聯繫
因為可以用telnet 連上GPS RECEIVER 而取得
GPS 封包,只要解封包,show 定位,就成功了
還在學著寫啦 |
|
| 回頂端 |
|
|
goto-dream
註冊時間: 2004-05-11
文章: 909
第 3 樓
|
|
| 回頂端 |
|
|
bin1x
註冊時間: 2004-08-27
文章: 462
第 4 樓
|
| 發表於: 星期五 一月 06, 2006 9:33 pm 文章主題: |
|
|
| goto-dream 寫到: | | 這個好，終於有地圖的SOURCE |
其實地圖資訊好像也蠻便宜的
像papago 好像就500元
gps receiver 我買的無線藍芽2600元
地圖是沒買啦
就試著玩玩看而已
不過上面的例子
我vfp 5.0無法跑
它會去叫到ole 的畫面
newobject 是新語法嗎? |
|
| 回頂端 |
|
|
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2160
第 5 樓
|
| 發表於: 星期五 一月 06, 2006 9:51 pm 文章主題: |
|
|
newobject 是新版語法,
因為是用 class browser 所產生的,
才會採用這個 newobject,
用舊版的語法 createobject 也不會有問題.
這個例子用到的ole物件 是 DHMLEdit
檔名為 DHTMLED.OCX ,應該不難找到
_________________
利用>>搜尋<<的功能會比問的還要快得到答案. |
|
| 回頂端 |
|
|
215001
註冊時間: 2003-06-11
文章: 393
第 6 樓
|
| 發表於: 星期四 九月 07, 2006 1:47 pm 文章主題: |
|
|
| bin1x 寫到: | 我有個地圖檔
是用arc view 作的
所以我拉進 arc view 的control 物件
|
地圖檔,我也想玩玩看,不知 bin1x 兄可否告知那邊可以取得
我的E-mail: dannylu.wp@msa.hinet.net |
|
| 回頂端 |
|
|
garfield
Site Admin
註冊時間: 2003-01-30
文章: 2160
第 7 樓
|
|
| 回頂端 |
|
|
215001
註冊時間: 2003-06-11
文章: 393
第 8 樓
|
| 發表於: 星期四 九月 07, 2006 11:27 pm 文章主題: |
|
|
此方法,必須要連上網路的時候才可以用,很不方便(因為我的客戶大部份都在外面)
況且UrMAP 好像只能依地址查詢,我要的是可依經緯度座標查詢(授權版可依經緯度查詢,但費用不低)
有試過PaPaGO的IMAP,雖然能依經緯度座標查詢,但是路名不多,太簡單了 |
|
| 回頂端 |
|
|
|
常見問題
搜尋
會員列表
會員群組
會員註冊
個人資料
登入檢查您的私人訊息
登入
