запрос на обновление - проблема -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [3.149.28.145]

ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi

Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.

Обязательно указание:
1) типа базы данных (Paradox/Oracle/Interbase и т.п.)
2) способа доступа к базе данных (ODBC/ADO/DAO/BDE и т.п.)
Например: Paradox/BDE, MS Access/ADO

Наиболее часто задаваемые вопросы:
Базы даных для начинающих. Первые шаги. Понятие о BDE.
Переход на клиент-сервер и начала ADO
Приёмы работы с BLOB (OLE/Memo) полями
Запросы и параметры или как избавиться от многих проблем. Проблемы с датами в запросах.
Нужели мне нужно устанавливать BDE? (или почему не работает программа на другом компьютере)

Модераторы: Bas, Rouse_

Новое голосование

запрос на обновление - проблема , нужно дважды нажать кнопку???

tomsksmile

Сообщ. #1 , 24.12.03, 08:37

Profi

Профиль · PM

Поощрения: 2 Dgm

Рейтинг (т): 6

почему нужно дважды жать на кнопку, чтобы изменение сработало?

//------------------------------------------------------------------------------
procedure TForm1.BtnHideLineClick(Sender: TObject);
var i: integer;
begin

if Form1.ADOQuery1.Active then Form1.ADOQuery1.Close;

DataModule2.ADOTable1.First;

Form1.ADOQuery1.SQL.Clear;
Form1.ADOQuery1.SQL.Add('UPDATE model SET model.del = True WHERE (([model]![check])=True)');
Form1.ADOQuery1.ExecSQL;

DataModule2.ADOTable1.Active:=false;
DataModule2.ADOTable1.Active:=true;

end;
//------------------------------------------------------------------------------

1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0135 ] [ 15 queries used ] [ Generated: 20.05.24, 11:30 GMT ]