Librería LeafLet

caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

El código es tal cual lo publico Ud.
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

Cual es tu linea 97 de tu prg?
Me llamo Cristobal
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

El ejemplo que estás utilizando lo has descargado del enlace que puse?
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

El código en esa linea es:

Code: Select all | Expand

  cInitMap  += aData[ 1 ][ 3 ] + ", " + aData[ 1 ][ 2 ] + " ], 13);" + CRLF
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

Cuando quiero poner todo el código me da el error indicado anteriormente, en apariencia es cuando hace referencia a HTML
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

caducca wrote:El código en esa linea es:

Code: Select all | Expand

  cInitMap  += aData[ 1 ][ 3 ] + ", " + aData[ 1 ][ 2 ] + " ], 13);" + CRLF


Ok espera que lo pruebo, es raro
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

Pues a mi me funciona tal cual lo he descargado
https://bitbucket.org/fivetech/fivewin- ... fletjs.prg

Image
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

Es posible que no estés utilizando éste y estés utilizando el antiguo antes de mi actualización?
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

Como hago para subir una imagen?
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

caducca wrote:Como hago para subir una imagen?

Tienes que copiarla y pegarla en algun programa, por ejemplo yo uso paint.net y la grabas
Después has de utilizar alguna web para subirla y que te dé el enlace para ponerla en un foro
Yo utilizo https://postimages.org/
Cuando la subas, abajo te dará el enlace que es el que has de poner aqui ( te pondrá varios enlaces, y uno de ellos es "Hotlink for forums:" )
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

Image
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

Application
===========
Path and name: C:\Disco-F\FWH2017\samples\leafletjs.exe (32 bits)
Size: 3,739,136 bytes
Compiler version: Harbour 3.2.0dev (r1801051438)
FiveWin version: FWH 17.05
C compiler version: Borland/Embarcadero C++ 7.0 (32-bit)
Windows version: 6.2, Build 9200

Time from start: 0 hours 1 mins 33 secs
Error occurred at: 10/30/19, 09:50:25
Error description: (DOS Error -2147352567) WINOLE/1007 (0x800704C7): NAVIGATE
Args:
[ 1] = C D:\fwh\fwhteam\samples\GMaps.htm

Stack Calls
===========
Called from: => TOLEAUTO:NAVIGATE( 0 )
Called from: leafletjs.prg => VIEWLEAFLET( 154 )
Called from: leafletjs.prg => MAIN( 13 )

System
======
CPU type: Intel(R) Core(TM) i3-7100U CPU @ 2.40GHz 2400 Mhz
Hardware memory: 3975 megs

Free System resources: 90 %
GDI resources: 90 %
User resources: 90 %

Windows total applications running: 5
1 ,
2 , C:\Disco-F\FWH2017\samples\leafletjs.exe
3 , C:\WINDOWS\System32\shcore.dll
4 DDE Server Window, C:\WINDOWS\System32\OLE32.DLL
5 G, C:\WINDOWS\WinSxS\x86_microsoft.windows.gdiplus_6595b64144ccf1df_1.1.18362.418_none_5f5edc43821bf93

Variables in use
================
Procedure Type Value
==========================
TOLEAUTO:NAVIGATE
Param 1: O Class: ERROR
VIEWLEAFLET
Param 1: C "D:\fwh\fwhteam\samples\GMaps.htm"
Local 1: U
Local 2: U
MAIN
Param 1: A Len: 3
Local 1: C "D:\fwh\fwhteam\samples\GMaps.htm"
Local 2: C "

"
Local 5: C " var mymap = L.map('mapid').setView( [ 40.4597525, -3.4822266 ], 13);
"
Local 6: C " L.polygon([
[ 40.4597525, -3.4822266],
[ 40.4646123, -3.4649566],
[ 40.4559019, -3.477471]
]).addTo(mymap).bindPopup('I am a polygon.');

L.marker( [ 40.4597525, -3.4822266 ] ).addTo(mymap).bindPopup('<b>Marker 1 !</b><br />I am a popup.').openPopup();

L.marker( [ 40.4646123, -3.4649566 ] ).addTo(mymap).bindPopup('<b>Marker 2 !</b><br />I am a popup.').openPopup();

L.marker( [ 40.4559019, -3.477471 ] ).addTo(mymap).bindPopup('<b>Marker 3 !</b><br />I am a popup.').openPopup();

"
Local 7: O Class: TOLEAUTO
Local 8: N 4

Linked RDDs
===========
DBF
DBFFPT
DBFBLOB
DBFNTX

DataBases in use
================

Classes in use:
===============
1 ERROR
2 HBCLASS
3 HBOBJECT
4 WIN_OLEAUTO
5 TOLEAUTO
6 TREG32
7 TSTRUCT

Memory Analysis
===============
360 Static variables

Dynamic memory consume:
Actual Value: 720896 bytes
Highest Value: 720896 bytes


Aquí tuve que eliminar lo que hace referencia al HTML porque sino no me deja subir el texto
User avatar
cnavarro
Posts: 6557
Joined: Wed Feb 15, 2012 8:25 pm
Location: España
Been thanked: 3 times

Re: Librería LeafLet

Post by cnavarro »

Busca esto en el prg
local cMapFile := "D:\fwh\fwhteam\samples\GMaps.htm"

y pon el path que a ti te venga bien, y el nombre del htm claro
Cristobal Navarro
Hay dos tipos de personas: las que te hacen perder el tiempo y las que te hacen perder la noción del tiempo
El secreto de la felicidad no está en hacer lo que te gusta, sino en que te guste lo que haces
caducca
Posts: 104
Joined: Wed Mar 08, 2006 2:24 pm

Re: Librería LeafLet

Post by caducca »

Con la última indicación ya lo pude hacer funcionar.
Gracias
Post Reply