|
|||||||
АвтоАвтоматизацияАрхитектураАстрономияАудитБиологияБухгалтерияВоенное делоГенетикаГеографияГеологияГосударствоДомДругоеЖурналистика и СМИИзобретательствоИностранные языкиИнформатикаИскусствоИсторияКомпьютерыКулинарияКультураЛексикологияЛитератураЛогикаМаркетингМатематикаМашиностроениеМедицинаМенеджментМеталлы и СваркаМеханикаМузыкаНаселениеОбразованиеОхрана безопасности жизниОхрана ТрудаПедагогикаПолитикаПравоПриборостроениеПрограммированиеПроизводствоПромышленностьПсихологияРадиоРегилияСвязьСоциологияСпортСтандартизацияСтроительствоТехнологииТорговляТуризмФизикаФизиологияФилософияФинансыХимияХозяйствоЦеннообразованиеЧерчениеЭкологияЭконометрикаЭкономикаЭлектроникаЮриспунденкция |
Сортировка данныхСортировка имеется на вкладке «Оснащение комнат». Сортировка позволяет сортировать комнаты по номеру, по местам проживания, по блоку. Сортирока доступна как по возрастанию, так и по убыванию. procedure TForm2.RadioButton3Click(Sender: TObject); begin datamodule3.adoquery6.Close; if CheckBox1.Checked then datamodule3.adoquery6.sql[2]:='ORDER BY id_room DESC' else datamodule3.adoquery6.sql[2]:= 'ORDER BY id_room ASC'; datamodule3.adoquery6.Open; end;
procedure TForm2.RadioButton4Click(Sender: TObject); begin datamodule3.adoquery6.Close; if CheckBox1.Checked then datamodule3.adoquery6.sql[2]:='ORDER BY Korpus DESC' else datamodule3.adoquery6.sql[2]:= 'ORDER BY Korpus ASC'; datamodule3.adoquery6.Open; end;
procedure TForm2.RadioButton5Click(Sender: TObject); begin datamodule3.adoquery6.Close; if CheckBox1.Checked then datamodule3.adoquery6.sql[2]:='ORDER BY Kol_mest DESC' else datamodule3.adoquery6.sql[2]:= 'ORDER BY Kol_mest ASC'; datamodule3.adoquery6.Open; end;
procedure TForm2.CheckBox1Click(Sender: TObject); begin form2.RadioButton5.Checked:=false; form2.RadioButton4.Checked:=false; form2.RadioButton3.Checked:=false; end; Поиск по сайту: |
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав. Студалл.Орг (0.003 сек.) |