Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 31.07.2009, 19:42   #51
artemavd
Старожил
 
Аватар для artemavd
 
Регистрация: 05.06.2008
Сообщений: 4,206
По умолчанию

Я пошел немного другим путем пока что. Пока я пытаюсь вообще хоть что-то обновить в записях. Какой уж там блоб поле. Вот этим запросом я поолчаю ID учащегося:
Код:
 
 Form12.Query1.Active:=false;
 Form12.Query1.SQL.Clear;
 Form12.Query1.SQL.Text:='SELECT ID FROM spisok WHERE Familiy= ' +
                         QuotedStr(Form13.DBlookupComboBoxEh1.Text) + 'AND Imy= ' +
                         QuotedStr(Form13.DBlookupComboBoxEh2.Text) + 'AND Otchest= ' +
                         QuotedStr(Form13.DBlookupComboBoxEh3.Text);
 Form12.Query1.Open;
 Form12.label19.Caption:=Form12.Query1.fieldbyname('ID').AsString;
Вроде бы все логично получается. Если этот человек есть в БД с такой фамилией, таким именем, таким отчеством, у при выборе всех трех параетров в итоге будет верно найден ID этого человека.
А вот этим запросом я пытаюсь изменить значение в БД:
Код:
Form12.Query_update.Active:=False;
Form12.Query_update.SQL.Clear;
Form12.Query_update.Edit;
Form12.Query_update.SQL.Text:='UPDATE spisok SET LetSad= ' + QuotedStr(Form12.Edit5.Text) + 'WHERE ID= ' + QuotedStr(Form12.Label19.Caption);
Form12.Query_update.Post;
Form12.Query_update.Active:=True;
Form12.Table_update.Refresh;
Но выдается ошибка, типа "Cannot perform this opration on a closed dataset"
Не стоит смеяться над человеком делающим шаг назад, возможно он делает разбег.
artemavd вне форума Ответить с цитированием
Старый 31.07.2009, 20:25   #52
начинающий1
Пользователь
 
Регистрация: 30.07.2009
Сообщений: 46
По умолчанию

Цитата:
Сообщение от artemavd Посмотреть сообщение
Я пошел немного другим путем пока что. Пока я пытаюсь вообще хоть что-то обновить в записях. Какой уж там блоб поле. Вот этим запросом я поолчаю ID учащегося:
[CODE]
А вот этим запросом я пытаюсь изменить значение в БД:
Код:
Form12.Query_update.Active:=False;
Form12.Query_update.SQL.Clear;
Form12.Query_update.Edit;
Form12.Query_update.SQL.Text:='UPDATE spisok SET LetSad= ' + QuotedStr(Form12.Edit5.Text) + 'WHERE ID= ' + QuotedStr(Form12.Label19.Caption);
Form12.Query_update.Post;
Form12.Query_update.Active:=True;
Form12.Table_update.Refresh;
Но выдается ошибка, типа "Cannot perform this opration on a closed dataset"
Попробуй так:
Код:
Form12.Query_update.SQL.Clear;
Form12.Query_update.SQL.Add('UPDATE spisok SET LetSad= ' + QuotedStr(Form12.Edit5.Text) + 'WHERE ID= ' + QuotedStr(Form12.Label19.Caption)+'');
Form12.Query_update.ExecSQL;
Form12.Query_update.Close;
начинающий1 вне форума Ответить с цитированием
Старый 31.07.2009, 20:32   #53
Evgeniy26
Форумчанин
 
Аватар для Evgeniy26
 
Регистрация: 29.05.2009
Сообщений: 384
По умолчанию

С учетом, что LetSad - текстовое поле.
Код:
with Form12.Query_update do
begin
  SQL.Clear;
  SQL.Text := 'UPDATE spisok SET LetSad=''' + ':LetSad''' + 'WHERE ID= :id';
  ParamByName('LetSad').Value := QuotedStr(Form12.Edit5.Text);
  ParamByName('id').Value := StrToInt(Form12.Edit5.Text));
  ExecSQL;
end;
Посмотри в книге что такое Edit, Insert, Post. И как пользоваться DML запросами.
Опоздал.

Последний раз редактировалось Evgeniy26; 31.07.2009 в 20:37.
Evgeniy26 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

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

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
BLOB поле artemavd БД в Delphi 17 09.08.2016 02:13
Перевод из Memo по английскому в Memo по русскому Sanek777 Общие вопросы Delphi 5 26.09.2008 00:17
Blob поля в делфи dagarik БД в Delphi 2 02.12.2007 17:33
В Memo сделать так, чтобы текст был разного цвета, разноцветный memo Artem Компоненты Delphi 3 07.09.2007 13:40
BLOB в string _andrews_ БД в Delphi 0 20.04.2007 12:05