Показать сообщение отдельно
  #2  
Старый 11.07.2007, 10:43
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Не знаю как у тебя реализовано, поэтому каркас такой:
На форме есть DBCon:TADOConnection он подключен к базе и находится в активизированном состоянии. OrdQuery:TADOQuery у него свойство Connection = DBCon. OrdDataSource:TDataSource и OrdGrid:TDBGrid, тут думаю связка понятна.
Теперь "шаблонный" код:
Код:
begin
  with OrdQuery do
    begin
      Close;
      SQL.Text:='SELECT * FROM [тут_имя_твоей_таблицы] ORDER BY [Тут_Имя_Или_Номер_Поля_По_Которому_Сортировать]';
      try
        Open;
      except
        on E:Exception do
           ShowMessage(Format('Ошибка %s при открытии набора данных',[E.Message]));
      end;
    end;
end;
Ответить с цитированием