Перейти к содержанию
Fire Monkey от А до Я

Rusland

Пользователи
  • Постов

    1 204
  • Зарегистрирован

  • Посещение

  • Победитель дней

    26

Ответы сообщества

  1. Пост Rusland - сообщение в ListView.SearchVisible был отмечен как ответ   
    Из этой темы попробовал сделать так:
    function FindSearchBox(const ARootControl: TControl): TSearchBox; var Child: TControl; begin Result := nil; for Child in ARootControl.Controls do if Child is TSearchBox then Exit(TSearchBox(Child)); end; procedure TFormAdd.SpeedButton1Click(Sender: TObject); var SearchBox: TSearchBox; begin SearchBox:=FindSearchBox(FormMain.ListView1); if SearchBox <> nil then begin SearchBox.Text:=''; end; end; Метод работает.
  2. Пост Rusland - сообщение в TMapView в режиме Normal был отмечен как ответ   
    Вот оно:
    TMapView -> LayerOptions -> Buildings:=True  
×
×
  • Создать...