стандартами "Ринку" самі по собі в силу корисності своїх якостей. p> Іноді це декілька порушує стандарт мови, хоча хороші ідеї мають тенденцію розвиватися і ставати стандартами ринку в силу корисності своїх якостей.
Для тієї мети, щоб користувачам було легше знайти якусь запис (інформацію), у багатьох програмах, що працюють з величезними архівами даних - зокрема і базах даних, програмісти постачають свої додатки засобами сортування. Деякі з них прошивають код сортування, а деякі програмісти дозволяють користувачам самим вибирати із запропонованих ними видів сортировок ту, яка більш підійде користувачеві.
Ось і в нашому додатку теж представлена ​​можливість вибору сортування - з перерахованих 6 видів. Звичайно, всі ці види сортують дані по алфавіту (для тексту - від А до Я (AZ), для цифрової інформації, на зростаючою від 0), але вибравши потрібний вид, можна швидше знайти те, що потрібно.
Розглянемо SQL запит для додатку В«ПрацевлаштуванняВ». p> Всі SQL-запити виконуються автоматично по вибору відповідного пункту у списку сортировок, "SQL-сортування" для цих візуальних компонентів, опис оператора SELECT проводиться нижче. p> КОД ПРОГРАМИ
void __ fastcall TForm1 :: SKChange (TObject * Sender)// Вибір таблиці
{Table1-> Active = false;
Table1-> Active = false;
if (SK-> Position == 0)
{Table2-> Active = false;
DB-> DataSource = DataSource1;
DBN-> DataSource = DataSource1;
Table1-> Active = true;}
if (SK-> Position == 1)
{Table1-> Active = false;
DB-> DataSource = DataSource2;
DBN-> DataSource = DataSource2;
Table2-> Active = true;}
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: CBChange (TObject * Sender) // вибираємо в спливаючому списку сортування ...
{
DB-> DataSource = DataSource3;
Table1-> Active = false;
Table2-> Active = false;
if (CB-> ItemIndex == 0) // якщо в спливаючому списку сортування ...
Код організації .... то
{
Query1-> Active = false; // активність Query - false (вимкнено )
Query1-> SQL-> Clear () ;// функція очищення буфера SQL-запиту
/* додати в буфер нов. запис S QL-запиту */
Query1-> SQL-> Append ("SELECT KOD_ORG as КОД_ОРГАНІЗАЦІІ, FIO as ПІБ, DATA_ROG as ДАТА_РОЖДЕНІЯ, POL as ПОЛ, OBRAZOV as ОСВІТА, SPEC as СПЕЦІАЛЬНІСТЬ, RAION as РАЙОН FROM ORG2 ORDER BY KOD_ORG ");
Query1-> Active = true;} // активність Query-true ( включено )
else if (CB-> ItemIndex == 1) // якщо в спливаючому списку сортування "ПІБ" то ....
{
Query1-> Active = false;
