Como muestro dentro de un objeto TMap (llamado
Map1) los label de un deteminado shapefile ???
Puntualmente, el shapefile contiene los tramos (arc) que representan cada una de las calles, y posee un campo
NOM_CALLE, que lleva el nombre de las mismas.
Ya cree la capa correspondiente, le asigne color, y tipo de linea; pero no se como mostrar los nombres de calle:
Código:
procedure TForm1.FormShow(Sender: TObject);
var
conexion: IMoDataConnection;
Ly1,Ly2,Ly3,Ly4: IMoMapLayer;
begin
//Crear conexion con el directorio donde estan los datos...
conexion := IMoDataConnection(CreateOleObject('MapObjects2.DataConnection'));
conexion.Database:= 'C:\DatosGIS';
if not conexion.Connect then exit;
//Crear objetos Layer...
Ly1:= IMoMapLayer(CreateOleObject('MapObjects2.MapLayer'));
//Asignarle el shapefile...
Ly1.GeoDataset:=conexion.FindGeoDataset('Calles_arc.shp');
//Propiedades de la capa...
Ly1.Symbol.Color:= $00C5BDBD;
Ly1.Symbol.Style:= moDotLine;
//Mostrar la capa...
Map1.Layers.Add(Ly1);
end;
Encontre dos objetos:
MapObjects2.LabelPlacer
MapObjects2.LabelRenderer
Pero aun no logro usarlos correctamente !!!
PD: Como se hace Torito !!!