Tatukgis, enregistrer et charger les propriétés de la couche

Question

Si quelqu'un a des expériences avec le produit du noyau du développeur TatukGIS, pouvez-vous expliquer comment enregistrer et charger par programme les propriétés de la couche comme dans leur produit de visualisation gratuit TatukGIS?

L'environnement i utilise étaient Delphi 7 et BDS 2006

grâce

Modifier, ce code ne fonctionne pas:

 
var 
    lyrPeta: TGIS_LayerSHP; 
begin 
    MapPath:= ExtractFilePath(Application.ExeName) + '\maps\'; 
    lyrPeta:= TGIS_LayerSHP.Create; 
    lyrPeta.Path:= MapPath + 'jabodetabek'+'_asjalan.shp'; 
    lyrPeta.Name:= 'jabodetabek'+'_asjalan.shp'; 
    lyrPeta.IgnoreShapeParams:= True; 
    lyrPeta.UseConfig:= True; 
    lyrPeta.ConfigName:= MapPath + 'jalan.ini'; 
    lyrPeta.ReadConfig; 
    GIS_Viewer.Add(lyrPeta); 

Answer 1

Nous le faisons comme ci-dessous en VB6. Je pense notre code était à l'origine basé sur this FAQ entry. Il makes le contrôle Tatuk enregistrer un fichier INI avec les propriétés de la couche. Je crois qu'il recharge automatiquement les propriétés de la couche lorsque l'application redémarre. Si vous voulez seulement un fichier, plutôt qu'un fichier par couche, vous pouvez try un fichier TTKGP.

With layer ' the layer is an XGIS_LayerVector ' 
    .StoreParamsInProject = False 
    .ConfigName = "c:\test\mylayer.ini" ' a separate INI file for each layer ' 
    .WriteConfig 
    .SaveAll 
End With 

EDIT: Et encore une fois le chargement - Je pense que cela après la couche a été ajoutée au contrôle des SIG. À mon humble avis, l'aide et les échantillons Tatuk sont difficiles à comprendre, même si le produit lui-même est assez puissant. Cela vaut la peine d'essayer le forum pour les questions Tatuk, bien que vous ayez besoin d'un contrat de support pour y accéder :(