![]() |
|
![]() ![]() ![]() |
|
TBC |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 186 Регистрация: 5.8.2006 Где: Южный Урал Репутация: нет Всего: нет |
Кто подскажет, как после выполнения процедуры поиска,
представленной ниже, можно производить изменения, или дополнения в записи с помощью DBNavigator? Эти кнопки после выполнения запроса становятся неактивны. procedure TForm1.Edit15KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState); var fam: string[30]; begin fam:=Edit15.Text; with form1.Query1 do begin Close; // закрыть файл-результат выполнения предыдущего запроса SQL.Clear; // удалить текст предыдущего запроса // записываем новый запрос в свойство SQL SQL.Add('SELECT *'); SQL.Add('FROM "::army2.db"'); SQL.Add('WHERE'); SQL.Add('(Famil Like "' + fam + '" + "%")'); SQL.Add('ORDER BY Famil'); Open; // активизируем выполнение запроса end; if Query1.RecordCount <> 0 then DataSource1.DataSet:=Query1; // отобразить рез-т выполнения запроса end; --------------------
http://cadcamkbm.com - 1-я в мире интеллектуальная система-автоматhttp://cnconline.ru - ЧПУ программа в автомате с DXF. Нет ни у кого в мире! |
|||
|
||||
ALeXandrK |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 342 Регистрация: 31.1.2007 Где: Санкт-Петербург Репутация: 2 Всего: 6 |
А это
разве не лишнее... одного присвоения достаточно будет. -------------------- Богат не/ни тот, у кого много, а тот, кому хватает |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Базы данных и репортинг" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами Обязательно указание: 1. Базы данных (Paradox, Oracle и т.п.) 2. Способа доступа (ADO, BDE и т.д.)
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович. |
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |