Librería LeafLet

[caducca]

El código es tal cual lo publico Ud.

[cnavarro]

Cual es tu linea 97 de tu prg?
Me llamo Cristobal

[cnavarro]

El ejemplo que estás utilizando lo has descargado del enlace que puse?

[caducca]

El código en esa linea es:

Code: Select all  Expand view

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

[caducca]

Cuando quiero poner todo el código me da el error indicado anteriormente, en apariencia es cuando hace referencia a HTML

[cnavarro]

El código en esa linea es:

Code: Select all  Expand view

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

Ok espera que lo pruebo, es raro

[cnavarro]

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

[cnavarro]

Es posible que no estés utilizando éste y estés utilizando el antiguo antes de mi actualización?

[caducca]

Como hago para subir una imagen?

[cnavarro]

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:" )

[caducca]

[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

[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

[caducca]

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