Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > Базы данных
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 19.09.2008, 23:26
psash psash вне форума
Прохожий
 
Регистрация: 06.09.2008
Сообщения: 6
Репутация: 10
По умолчанию Как создать програмно для таблиц индекс?

Имеется компонет Table1, я им открываю табличку из трех полй (NN, UL, Tip_ul). Так вот мне нужно, что бы при нажатии на кнопку Button2 программа создала индекс и отсортировала по UL и TIP_ul. Кто знает подскажите! Плиззззз!
Ответить с цитированием
  #2  
Старый 20.09.2008, 01:28
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,034
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Вообще, создание индекса - разовая операция.
А для сортировки воспользуйся лучше комплнентом TQuery. Запрос в нем будет примерно такой:

SELECT * FROM [Твоя таблица] ORDER BY UL, TIP_ul
Ответить с цитированием
  #3  
Старый 20.09.2008, 11:19
psash psash вне форума
Прохожий
 
Регистрация: 06.09.2008
Сообщения: 6
Репутация: 10
Хорошо CСПАСИБО!!!!!!!!!!!

CСПАСИБО!!!!!!!!!!!CСПАСИБО!!!!!!!!!!!CСПАСИБО!!!! !!!!!!!CСПАСИБО!!!!!!!!!!!
Ответить с цитированием
  #4  
Старый 20.09.2008, 12:03
psash psash вне форума
Прохожий
 
Регистрация: 06.09.2008
Сообщения: 6
Репутация: 10
По умолчанию

Только сейчас не получается добавлять записи в таблицу
Ответить с цитированием
  #5  
Старый 20.09.2008, 13:29
mik mik вне форума
Прохожий
 
Регистрация: 17.09.2008
Сообщения: 33
Репутация: 10
По умолчанию

Для сортировки можно попробовать сделать так:
Код:
Table1.IndexFieldNames := 'UL,TIP_ul'
Ответить с цитированием
  #6  
Старый 20.09.2008, 16:11
psash psash вне форума
Прохожий
 
Регистрация: 06.09.2008
Сообщения: 6
Репутация: 10
По умолчанию

Так не получается, потому что индексов нет, их нужно создать програмно.
Ответить с цитированием
  #7  
Старый 22.09.2008, 09:16
mik mik вне форума
Прохожий
 
Регистрация: 17.09.2008
Сообщения: 33
Репутация: 10
По умолчанию

Тогда вот так:
Код:
Table1.AddIndex('ИмяИндекса', 'СписокПолей', [опции]);
Только таблица должна быть открыта монопольно.
Код:
Table1.Exclusive := True;
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 02:13.


 

Сайт

Форум

FAQ

RSS лента

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2023

ВКонтакте   Facebook   Twitter