Хотелось бы уйти от перебора, групповые объекты могут состоять из 8-10т (
24.05.2016 09:48:33
Может плохо искал, но не нашел как в одном контексте объединить результаты apSampleSelect + mapSelectSemanticAppend
Задача простая, может не с той стороны подошел. Надо сделать мультиселектирование объектов пользовательской карты. Объекты м.б. простые и групповые. При запуске, номера объектов читаются в список (ListBox1.Items) при селектировании\мультиселектировании элементов списка, селектируются объекты карты Виделось простое решение ))) : [CODE]procedure TForm14.ListBox1Click(Sender: TObject); Var i: Integer; begin mapClearSelectContext(sel1); mapSetSiteViewSelect(Map, Site1, sel1); for I := 0 to ListBox1.Items.Count-1 do if ListBox1.Selected[i] then begin // выделение группы по групповой хар-ке mapSelectSemanticAppend(Sel1, ORD(SC_EQUAL), 32802, GtkPChar(GtkString(ListBox1.Items[i]))); mapSelectSemanticAppend(Sel1, ORD(SC_EQUAL), 32801, GtkPChar(GtkString(ListBox1.Items[i]))); // выделение простого по номеру mapSelectSample(Sel1, GtkPChar(GtkString(Site1Name)), StrToInt(ListBox1.Items[i])); end; MapScreen1.ViewSelect.SetSiteEnabledForSample; MapScreen1.SetViewSelected(true, clRed); mapscreen1.Repaint; end; [/CODE] но mapSelectSemanticAppend и mapSelectSample у меня работают только по отдельности. Подскажите где допилить. Спасибо Delphi XE3, GTK11
Изменено: |
|
|
© КБ Панорама, 1991-2024 Регистрируясь или авторизуясь на форуме, Вы соглашаетесь с Политикой конфиденциальности |