На главную... Продукты | Технологии | Классификаторы | Проекты | Скачать | Цены| Форум | Статьи | Обучение | Контакты

WebDav

Поиск  Пользователи  Правила  Войти
Форум » Настольные приложения » GIS ToolKit, GIS ToolKit Active, ГИС Конструктор для Windows
Страницы: 1
RSS
WebDav, WebDav
 
Вот этот код
procedure Tform_Edtxt.SpeedButton1Click(Sender: TObject);
Var
ss : string;
wname : array [0..80] of Char;
begin
Radius := StrToFloat(Edit1.Text);
form_main.MapSelectObjectRsc.ExecuteForMapObj(form_main.MapObj2, true);
loc_new := mapObjectLocal(form_main.MapObj2.ObjHandle);  // имеющаяся локализация
kd_new := mapObjectExcode(form_main.MapObj2.ObjHandle);
ho := mapCreateObject(form_main.mvMap.MapHandle,1,KM_IDDOUBLE2,0);
mapReadCopyObject(ho,form_main.MapObj1.ObjHandle);
mapInsideZoneObjectEx(Radius,ho, 0, 0, Radius/15, 3);
mapRegisterObject(ho,kd_new, loc_new);
mapObjectLocal(ho);
mapPointCount(ho, 0);
MetricCount := mapPointCount(ho, 0);
mapCommitObjectAsNew(ho);
IDObject := copy(GetGuid,2,25);
mapAppendSemanticUn(ho,10,PChar(IDObject),25);
mapCommitObject(ho);
mapFreeObject(ho);
form_main.mvMap.Repaint;

работает отлично на локальном компьютере
работает очень хорошо на файловом корпоративном сервере
работает  более менее на WebDav если ОС на компьютере пользователя Windows 7
не работает совсем на WebDav если ОС на компьютере пользователя Windows 8 и выше

Почему?
 
Такое поведение, скорее всего, зависит от настроек политики безопасности доступа к файловой системе в конкретной версии ОС. Вам придется вникнуть в этот вопрос.
 
Да, вы правы. Мы похоже много захотели и сразу.
Не будем использовать эту технологию.
Будем осваивать GIS Server.
Очень надеемся на смягченную к нам финансовую политику по его приобретению
и внедрению.
Страницы: 1
Читают тему (гостей: 1)



© КБ Панорама, 1991-2024

Регистрируясь или авторизуясь на форуме, Вы соглашаетесь с Политикой конфиденциальности