Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Gráficos (https://www.clubdelphi.com/foros/forumdisplay.php?f=8)
-   -   Herramientas Cartograficas!! (https://www.clubdelphi.com/foros/showthread.php?t=4056)

torito 30-09-2003 17:18:11

Herramientas Cartograficas!!
 
Saludos amigos foreros:

yo actualmente me dedico a programar con herramientas cartograficas (mapobjects y arcobjects), somos pocos los que usamos a delphi como lenguaje de programación para este tipo de herramientas activeX, me gustaria saber si alguien en este foro tambien lo hace para poder compartir conocimientos para poder desarrollarnos más, ya que esta herramienta ya la enfocan más al visual basic, y se tienen que hacer trucos para poder trabajarla con delphi..... Saludos a todos desde Querétaro, Mex.

SLAKE 20-10-2003 14:26:04

Hola Torito, yo tambien estoy con MapObjects y Delphi, para cualquier cosa que necesites ...

torito 18-11-2003 19:13:02

Hola Slake, que padre que al fin conosco otro loco de delphi con mapobjects, ya que en realidad somos pocos, sabes yo program con MO21, y por ahora no se si tu ya pudiste imprimir a Escala los mapas??? lo has logrado??

saludos

PALANCA 18-11-2003 23:25:27

Yo estoy tratando de empezar a desarrollar con MapObject, pero no tengo ni idea de dónde puedo conseguir una versión de MapObject y cómo utilizarlo desde Delphi; si álguién me puede dar una mano se lo agradecería.

Desde ya muchas GRACIAS.

torito 19-11-2003 00:46:07

Saludos Palanca, no se en Argentina pero Aqui en México tenemos a SIGSA, seria interesante que entraras a la página de Esri.com y ahi checaras los distribuidores que tienen allá, creo que también en la pagina hay un free, o no se como se maneje, es la versión lt, sería cuestión de que lo checaras

madriles 24-11-2003 15:20:45

hola amigos
yo tambien estoy interesado, aunque soy totalmente novato en GIS, acabo de descargarme una version de evaluacion.
me gustaria si teneis algun pequeño programita o ejemplo para ver las posibilidades. he encontrado algo por la red, pero esta en VB o en ingles con lo que no me etero de nada

torito 24-11-2003 15:27:51

Pues bienvenido madriles... ahora solo una duda... con que herramienta cartografica vas a trabajar y con que versión de delphi para asi poderte pasar información, yo tengo un manual básico de mapobjects con delphi ...

saludos

madriles 24-11-2003 19:00:11

hola torito
trabajo con delphi 6 y el ESRI mo20.ocx y mo21ScaleBar.ocx corriendo en Win-XP.
como comente antes de ingles ni idea ( lo digo por los manuales ).
gracias por responder tan rapido
un saludo

torito 24-11-2003 19:56:08

Pues le vas a batallar bastante, ya que lo unico que vas a encontrar la mayoria es en ingles, yo he llegado a encontrar hasta en chino jejeje, si quieres un manual de inicio lo tengo pero esta en ingles.... pero para inicio sigue estas instrucciones antes de instalar los ocx de mapobjects... esto sirve para delphi 6 y 7...
Dale click en tools, ->Enviroments Options->Type Library
habilitas el checkbox de Ignore special CoClass.... y habilitas can Create....
todo esto es para que no tengas problemas al instalar el legend ni el scalebar... ya que si no los habilitas vas a tener problemas en las librerias de ambos dispositivos... saludos

madriles 24-11-2003 20:26:50

gracias
voy a seguir tus consejos de instalacion a ver que tal.
en cuanto al manual Si, mandamelo, aunque sea en ingles, siempre vendran ejemplos o algo con lo que poder iniciarme.
si encuentro algo en castellano ya lo pondre para quien lo quiera
un saludo

pelandros 04-02-2004 20:10:17

Mapobjects legend....
 
Hola a todos, espero que alguien me pueda ayudar pq creo que mi problema debe ser muy facil para alguien que haya hecho algo con MO21, yo soy nuevo en esto.

Tengo una aplicacion, Delphi5, con un form y en el un Map (MapObject21) y un legend.
Solo quisiera saber como lincar el Map con el legend

debe de ser algo asi, en el FormActivate, creo.

legend1.setMapSource ¿¿¿?????Map1¿¿¿?????;
y luego
legend1.LoadLegend ¿¿¿:=????true;

el problema viene pr setMapSource me pide una variable del tipo ''IDispatch", que francamente no se como darsela.

La ayuda que encuentro es para VB, que mania!!!.


Gracias

torito 04-02-2004 20:22:18

saludos pelandros
 
ok por lo que me platicas aun tampogo te has metido a los foros de ARCGIS, ya que ahi ya respondi la duda que planteas, pero te la vuelvo a decir... antes que nada es bueno ver a otra persona de delphi metida en todo esto jejeje, y no sabes la broncota que te metiste jeje... solucion:
en delphi 5 no existe una cualidad de delphi 6 y 7, que es que en las opciones le indicas respetar los active X y asi no tendrias problemas... asi que la solucion en delphi 5 esta en la misma libreria del legend.... por lo tanto si quieres modificarlos con todo y explicación te mandaré un par de archivos, uno con la solucion paso a paso o solo sustituye el .pas del legend con el otro archivo que subo.... asi que sube tu dirección mail por favor y ante cualquier otra duda solo preguntame.. saludos

pelandros 05-02-2004 19:25:20

gracias
 
Muchas gracias.

La verdad es que tienes razón, no se encuentra mucha gente de delphi trabajando con MO, pero aún así me resito a dejar delphi.
Mi email esta en mi perfil, pero aqui lo tienes de todas formas amaurandil@hotmail.com, te estaria muy agradecido si me mandas el .pas, pero si también tienes ganas y tiempo de explicarme el metodo paso a paso pues genial.


Espero serte de utilidad algun día.

Pelandros.

Aldevaran 08-10-2004 14:55:07

Cita:

Empezado por SLAKE
Hola Torito, yo tambien estoy con MapObjects y Delphi, para cualquier cosa que necesites ...

Hola SLAKE, soy nuevo en esta tipo de programacion, estoy utilizando la vercion 2.3 de mapobjects como inicio, pero es una vercion trial, pero para empesar esta bien por el momento, al grano, necesito una vista rapida de como utilizar el MapObjects en Delphi 7, si tienes un manual o una guia me seria muy util, por te doy mi email Aldevaran_2003@hotmail.com, te lo agradecere un monton.

ALDEVARAN :)

torito 08-10-2004 21:53:23

oye Aldevaran, por favor vacia un pococ tu mail para poderte enviar el curso, o si no bajalo de esri.com... saludos

Aldevaran 14-10-2004 21:02:57

Texto verificado
 
Torito
Gracias por la direccion, verificare el texto y si tengo problemas con los ejemplos que muestran te consultare, por sierto mi correo esta vacio...!

asta la proxi.:p

fredy_boots 13-11-2004 20:29:28

Conversion latitud/longitud a UTM(x,y)
 
Hola amigos, les escribo de Chihuahua Chih, estoy programando con delphi 5 y Mapobject 2.0 y quiero hacer una aplicacion de GPS, ya logre obtener la informacion del GPS, solo que ésta, me la da solo en longitud y latitud y quiero convertirla a UTM(x,y) para manejarla en el mapa, si alguien sabe como hacer esto le agradeceria mucho que me ayudara o me dijera si hay algun componente para hacerlo, gracias, espero urgentemente la ayuda de alguien.

Esque hasta donde yo se, (que es poco je) el Mapcontrol maneja coordenadas creo UTM, no es asi? y el GPS me da latitud y longitud en "grados", entonces, ademas pregunto: no puedo configurar el sistema de coordenadas del MapControl? para poder meter esos grados de latitud y longitud como la X y Y de parametros para el metodo "MoveTo" de un "Geoevento"??? o esque necesito convertir afuerza esos grados a coordenadas UTM???

juan_205 02-12-2004 15:14:13

Mismo problema con la union de la legend y el Map1 en Delphy 5
 
Cita:

Empezado por torito
ok por lo que me platicas aun tampogo te has metido a los foros de ARCGIS, ya que ahi ya respondi la duda que planteas, pero te la vuelvo a decir... antes que nada es bueno ver a otra persona de delphi metida en todo esto jejeje, y no sabes la broncota que te metiste jeje... solucion:
en delphi 5 no existe una cualidad de delphi 6 y 7, que es que en las opciones le indicas respetar los active X y asi no tendrias problemas... asi que la solucion en delphi 5 esta en la misma libreria del legend.... por lo tanto si quieres modificarlos con todo y explicación te mandaré un par de archivos, uno con la solucion paso a paso o solo sustituye el .pas del legend con el otro archivo que subo.... asi que sube tu dirección mail por favor y ante cualquier otra duda solo preguntame.. saludos

Hola! Yo tambien tengo el mismo problema con la union de la legend y el Map1 en Delphy 5...

Espero me puedan ayudar a encontrar la solucion!

torito 02-12-2004 16:00:14

que delphi tienes??

Fernando 12-12-2004 01:27:23

hola geodelphimaniacos:

Desarrollé una aplicación para fincas/ranchos/haciendas plataneras. Ahora quiero implementar mapas en el proyecto.
Me explico:
- las fincas están dividades en lotes.
- cada lote tiene una superficie y forma diferente
- se realizan actividades (ej. fertilizar) en cada lote

La idea es que cuando el usuario solicite conocer el avance de la fertilización, el programa despliegue el mapa de la finca (dividida por lotes) y cada lote tenga dos colores: verde para la superficie fertilizada y amarillo para la superficie por trabajar.

Si es posible hacer esto, les estaría muy agradecido me indicaran cúal programa necesito.
Desarrollo en Delphi 7 Enterprise.

Les agradezco de antemano su ayuda.

Salu2.

torito 13-12-2004 15:11:57

Hola Fernando, yo solo he trabajado con Mapobjects, el trial lo consigues en la pagina de esri.com, y lo enlazo a delphi 7 o a delphi 5.... saludos

Fernando 18-12-2004 17:15:21

Gracias Torito, revisaré el demo.

Salu2

Fernando 19-12-2004 04:39:09

Pues nada, con la novedad que el susodicho MapObjects cuesta 5 mil dólares. :confused:

Eso significa que a mis clientes (3) les tendré que cobrar 1,666.66 dólares por cabeza (significativo y demoniaco el precio, no creen?)

Claro que, como mis clientes no siembran cocaína o marihuana, dirán que "gracias, pero no"

Si alguno de ustedes, impresindibles foreros, conoce otro programa para controlar el despliegue de mapas, les estaré muy agradecido si me informan.

Salu2.

kinobi 19-12-2004 13:05:53

Cita:

Empezado por Fernando
Si alguno de ustedes, impresindibles foreros, conoce otro programa para controlar el despliegue de mapas, les estaré muy agradecido si me informan.

Echa un vistazo aquí: http://www.freegis.org/

Tal vez puedas encontar algo que te sirva y sea libre.

Saludos.

torito 20-12-2004 15:17:42

Oye Fer, el MO no cuesta 5000 dolares, ya que a nosostros nos costo 5000 pesos Mexicanos, eso seria como 480 dolares

Fernando 21-12-2004 17:41:32

Gracias por esta información Kinobi (y por las anteriores) ;)

Con respecto al precio, Torito, en la página de ESRI dice $ 5,000.00 y como está en inglés pensé que eran dólares. Revisaré mejor la información (tengo vista cansada y astigmatismo ¡glup!) y si el precio es en pesos mexicanos (mejicanos) :D lo compro.

Por otra parte, en un sitio de Argentina describen un sistema de fumigación/asperción aérea utilizando GPS y un programa/software que conduce al piloto del avión a través de la superficie a fumigar. ¿Alguno de los geodelphimaniacos ha trabajado o conoce sobre este tema?

Gracias a todos por su ayuda.

Salu2

torito 22-12-2004 00:43:02

Pues lo que mencionas no es muy dificil, solo requires un mapa base u ortofoto, tomas de un servidor tus coordenadasd xy y las plasmas sobre tu imagen y se crea la ruta

wleon 20-02-2005 19:27:07

sig con argis
 
buenas, soy un nuevo usuario de ArcGis y necesito realizar una personalizaciòn alguen me podria ayudar, no se si se pueda con mapobject o como gracias de antemano.

torito 22-02-2005 01:20:58

Pues mira, si vas a trabajar con arcgis te recomiendo que le metas la personalización con Visual Basic ya que es lo más idoneo... ahora si lo vas a hacer con MapObjects te recomiendo ampliamente el Delphi... Saludos

torito 04-03-2005 20:52:48

Hola Fer...

Si apenas vas a iniciar vas a tenes un problema principalmente, requieres información de base o mejor dicho, capas base... ya cuando las tengas de acuerdo a su tipo puesdes trabajarla con Maps Objects, mapInfo, Workstation, etc... ahora si tienes bajos costos hay herramientas free, que el problema es encontrarlas... saludos

Onti 17-03-2005 00:22:37

Mapas y base de datos
 
Tengo un a base de datos con informacion de inmuebles
(la estucutra de las tblas es algo como
-codigo_inmueble
- descripcion
- tipo_inmueble
- etc


, ahora me piden que los resultados de una consulta Por ejemplo

" todos los imnuebles tipo 'X'"

sean reflejados en un mapa hecho con Arcview



Por favor alguien me puede orientar cual es la mejor forma para lograr esto.



muchas gracias

y salu2

torito 17-03-2005 00:43:09

oye pero solo tienes la tabla de datos o ya tieneas la información georefenciada, osea ya tienes esa información geograficamente??

Onti 17-03-2005 20:33:39

Solo tengo tabla de datos, como hago la georeferenica (disculpa pero desconosco totalmente el tema)

torito 17-03-2005 21:46:00

ups, si esta bastante complicadon, primero requieres una capa base de tu ciudad, al referirme a capa me refiero a un mapa (geografico)de tu ciudad y de ahi empiezas generando otra capa para tus puntos de referencia de tus muebles... tienes forma de conseguir esa capa base??

Onti 18-03-2005 14:23:58

gracias por responder ,
En que formato debe estar el mapa?

torito 18-03-2005 15:04:11

El formato depende de que herramienta geografica vayas a usar, yo por ejemplo use arcobjects y actualmente mapobjects, en ambos el archivo debe ser shape, extención .shp

sierraja 21-03-2005 14:24:40

Demo de aplicación
 
Fernanado, podrías enviarme un demo de tu aplicación, estoy desarrollando una aplicación para mi finca sobre el control ganadero y rotación de potreros, me sería muy util lo que tienes desarrollado. Mi correo: sierraja2000@yahoo.mail

Magui 21-03-2005 23:06:16

Asignar colores
 
Tengo una cobertura Uv.shp la cual tiene los siguientes campos:
shape,id,color y le he asignado diferentes colores

Como puedo hacer para que lo cargue en el mapa con los colores que yo le he asignado?

estoy trabajando con mapObjects2 y delphi 7

Si alguien me puede ayudar o enviar un ejemplo se lo agradecere...
mi correo es maguipsc@hotmail.com

torito 22-03-2005 15:59:01

ok magui, tu tienes que trabajar con el renderer de tu capa y de ahi escalarla, te mando el ejemplo de esto
Código:

procedure TForm2.bbuniClick(Sender: TObject);
var
a,breakVal,z : integer;
zaz : string;
begin
try
memo1.Clear;
recs:=l.Records;
l.Renderer:=nil;
l.Renderer:=ImoClassBreaksRenderer(CreateOleObject('MapObjects2.ClassBreaksRenderer'));
tdesc:=recs.TableDesc;
fields:=recs.Fields;
cbr:=ImoClassBreaksRenderer(l.Renderer);
cbr.Field:=tdesc.FieldName[cbx.ItemIndex];
if cbx.Text='' then
 begin
 showmessage('No Se Eligio Un Campo');
 exit;
 end;
 strsUniqueValues:= IMoStrings(CreateOleObject('MapObjects2.strings'));
 //fld := IMoField(CreateOleObject('MapObjects2.Field'));

 fld := fields.Item(tdesc.FieldName[cbx.ItemIndex]);

except//if varisempty(fld) then
 //begin
 showmessage('Hay Un Error En La Tabla!!');
 exit;
 end;
z:=0;
recs.MoveFirst;
a:=1;
while (not recs.EOF) do
 begin
 strsUniqueValues.Add(fld.value);
 recs.MoveNext;
 inc(z);
 if z = 100 then
  begin
  a:=application.MessageBox( 'USTED TIENE MÁS DE 100 VARIABLES UNICAS, DESEA CONTINUAR A PESAR DE QUE DILATE MUCHO EL PROCESO??', 'EXCEDENTE DE VARIABLES...', MB_OKCANCEL);
  if  a=2 then
  exit; //se sale de la aplicacion
  end; //fin if
 end; //fin while
{a:=1;
if strsUniqueValues.Count > 100 then
 a:=application.MessageBox( 'USTED TIENE MÁS DE 100 VARIABLES UNICAS, DESEA CONTINUAR??', 'EXCEDENTE DE VARIABLES...', MB_OKCANCEL);
if  a=2 then
 exit; //se sale de la aplicacion}
if (vmr=nil)then
vmr:= IMoValueMapRenderer(CreateOleObject('MapObjects2.ValueMapRenderer'));

vmr.SymbolType:=l.Symbol.SymbolType;
vmr.Field:=fld.Name;
vmr.ValueCount:=strsUniqueValues.Count;
vmr.UseDefault:=false;
for a:=0 to strsUniqueValues.Count-1 do
 begin
 vmr.Value[a]:=strsUniqueValues.Item(a);
// showmessage(strsUniqueValues.Item(a));
 end;

memo1.Lines.Add('      LISTADO DE VALORES UNICOS!!');
memo1.Lines.Add('      ');

for a:=0 to vmr.ValueCount-1 do
 begin
 zaz:='';
 zaz:=inttoStr(a+1);
 zaz:=zaz+'    '+vmr.Value[a];
 memo1.Lines.Add(zaz);
 end; //fin for llenado memo1

cbr.BreakCount:=strsUniqueValues.Count;

bbuni2.Enabled:=true;

end; //fin procedure


Magui 22-03-2005 20:13:07

gracias por el codigo..

lo he probado ..pero no me muestra el mapa con los colores asignados, me imagino que esta es la parte donde se cambia los colores..

if (vmr=nil)then
vmr:= IMoValueMapRenderer(CreateOleObject('MapObjects2.ValueMapRenderer'));

vmr.SymbolType:=l.Symbol.SymbolType;
vmr.Field:=fld.Name;
vmr.ValueCount:=strsUniqueValues.Count;
vmr.UseDefault:=false;
for a:=0 to strsUniqueValues.Count-1 do
begin
vmr.Value[a]:=strsUniqueValues.Item(a);
// showmessage(strsUniqueValues.Item(a));
end;

me gustaria que me expliques un poco mas que tengo que hacer para que funcione..


La franja horaria es GMT +2. Ahora son las 02:48:18.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi