Пути к файлам

Question

Привет All.

Вопрос в следующем.

Компонент MapControl жестко настраивается на пути к файлам данных (Shape файлам). И если я готовый exe файл несу на другой компутер, то ниче не работет. Качели...

Есть ли какие либо способы заменить абсолютные пути на отностительные, как это делается в apr файле.

Заранее благодарен, Сергей.

Answer 1

грузи при старте формы
tmpRealFN - полное имя файла
aLayer - IMoMapLayer

dc := CoDataConnection.Create;
dc.Database := ExtractFilePath(tmpRealFN);
if dc.Connect then begin
aLayer:= CoMapLayer.Create;
aLayer.GeoDataset := dc.FindGeoDataset(ExtractFileName(tmpRealFN));
FMap.Layers.Add(aLayer);
end

и усе