Возможна сортировка или нет?

[mihali4]

Переделываем:

procedure TForm1.Button3Click(Sender: TObject);
begin
//смотрим
Rabotniki.Close;
Rabotniki.sql.Text:='select * from Rabotniki order by Tabnum';
Rabotniki.Open;
...
//изменяем
Rabotniki2.Close;
Rabotniki2.sql.Text:='update Rabotniki set.........';
Rabotniki2.ExecSQL;
//смотрим результат изменений
Rabotniki.Close;
Rabotniki.Open;
end;

[dron-s]

смотри, у тебя две кнопки и два кверика (первый для выборки, второй для редатирования)
на пером батоне пишем:
Query1.sql.add('select * from rabotniki order by name');
отсортированли по имени...
далее, нам надо изменить фамилию Екатерину Пупкину на Екатерину Зайцеву... сделать это можно через запрос updete по ID
к примеру, ID нашей записи 8
запрос будет следующий
Query2.sql.add('update sotrudniki set fio='Екатерина Зайцева' where id=8');
делаем ExecSQL и переоткрываем запрос у первого кверика у которого в SQL написано select * from rabotniki order by name'

общая картина такова
Query1.close;
Query1.sql.clear;
Query1.sql.add('select * from rabotniki order by name');
Query1.open;
Query2.close;
Query2.sql.clear;
Query2.sql.add('update sotrudniki set fio='Екатерина Зайцева' where id=8');
Query2.ExecSQL;
Query1.Open;

[Constellation]

mihali4, Бог с ней с этой строкой, удалю я ее, главное, у меня сортировка не работает!

[Constellation]

СПАСИБО!!!!!! Заработала!!! =) С меня пиво

[Constellation]

Простите, рано радовалась... редактирование-то так и не работает))) Сами попробуйте по этому запросу, после нажатия на кнопку сортировки что-нибудь сдулать с таблицей... у меня не получилось(

[mihali4]

Нет, меня просто убивает такая конструкция:

Query1.sql.clear;
Query1.sql.add('select * from rabotniki order by name');

Ну ведь проще же:
Query1.sql.Text:='select * from rabotniki order by name';

[mihali4]

Сообщение от Constellation

Простите, рано радовалась... редактирование-то так и не работает))) Сами попробуйте по этому запросу, после нажатия на кнопку сортировки что-нибудь сдулать с таблицей... у меня не получилось(

На форме - Query1, Query2, DataSource1, Button1, Button2, DBGrid.
Используем DBDEMOS.
По Button1:

Query1.Close;
Query1.SQl.Text:='select * from country order by capital';
Query1.Open;

В DBGrid - отсортировано по столицам.
По Button2:

Query2.Close;
Query2.SQL.Text:="update country set capital='Bagota mod' where capital='Bagota'";
Query2.ExecSQL;
Query1.Close;
Query1.Open;

В DBGrid - 'Bagota mod' вместо 'Bagota'.
Что вы там такое делаете?

[Constellation]

Я понимаю, что вы меня уже скоро побьете, но не так оно все работает, как должно! Во всех примерах (и у меня в книге в том числе), используется после update поле set, а если у меня просто дан список сотрудников с полями TabNum, Fio, Name, Otch and etc., причем эта таблица повязана с другой, с таблицей дети (по таб. номеру) На форме располагается 2 кнопки. Пока не нажата сортировка я могу свободно изменять какие угодно данные в исходной таблице. Как только я запускаю режим сортировки, она происходит, но таблица становится фиксированной, я уже не раз говорила. Мне нужно просто отсортировать по таб. ном., но таким образом, чтобы пользователь мог щелкнуть на нужном поле и мог изменить данные... Я не понимаю, что в set вносить, если тут могут быть любые данные из таблицы.

[mihali4]

Ну вот, один из простейших вариантов.
Параллельно с Query1 работает Query2, но у нее в запросе нет "ORDER BY".
На Query2 висят DBEdit-ы на каждое поле.
На DBGrid1CellClick:
Query2.Locate('Tabnum',Query1.Field ByName('Tabnum').Value,[]);
После редактирования (в DBEdit-ах!!! DBGrid такого не позволит!) жмем кнопку "сохранить":
Query2.Post;
Query1.Close;
Query1.Open;
И... любуемся отредактированными записями.

[dron-s]

Ну ведь проще же:
Query1.sql.Text:='select * from rabotniki order by name';

называется найди пять отличий