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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 18.06.2014, 00:50   #31
xxbesoxx
Участник клуба
 
Регистрация: 10.08.2010
Сообщений: 1,389
По умолчанию

Цитата:
Сообщение от Valentina10121991 Посмотреть сообщение
Подскажите пожалуйста какая здесь ошибка?
Код:
procedure TForm2_books.BitBtn3Click(Sender: TObject);
begin
  if DBGrid1.DataSource.DataSet.RecordCount<>0 then
    begin
      if (MessageBox(Handle, PChar('Вы уверены что хотите удалить эти записи?'), PChar('Внимание!!!'), MB_YESNO)) then
        ADOQuery1.Delete;
    end
        else ShowMessage ('Нет записей для удаления');
end;
end;
Вот держите
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if Application.MessageBox(PChar('Вы уверены что хотите удалить эти записи?:  '+ ADOQuery1CompanyName.AsString), 'Внимание!!!', MB_OKCANCEL)=id_OK then
   ADOQuery1.Delete;
end;
Изображения
Тип файла: jpg 1.jpg (117.6 Кб, 121 просмотров)
Тип файла: jpg 2.jpg (78.0 Кб, 141 просмотров)
Вложения
Тип файла: rar Delete.part1.rar (500.0 Кб, 8 просмотров)
Тип файла: rar Delete.part2.rar (55.9 Кб, 8 просмотров)
xxbesoxx вне форума Ответить с цитированием
Старый 18.06.2014, 09:40   #32
Valentina10121991
Пользователь
 
Регистрация: 30.03.2011
Сообщений: 34
По умолчанию

Цитата:
Сообщение от xxbesoxx Посмотреть сообщение
Вот держите
Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
  if Application.MessageBox(PChar('Вы уверены что хотите удалить эти записи?:  '+ ADOQuery1CompanyName.AsString), 'Внимание!!!', MB_OKCANCEL)=id_OK then
   ADOQuery1.Delete;
end;
Спасибо с удалением я уже разобралась, теперь у меня вопрос с фильтрацией
Valentina10121991 вне форума Ответить с цитированием
Старый 18.06.2014, 10:42   #33
eval
Подтвердите свой е-майл
 
Регистрация: 29.08.2012
Сообщений: 4,011
По умолчанию

а что такое частичное совпадение численного поля?
eval вне форума Ответить с цитированием
Старый 18.06.2014, 20:05   #34
Valentina10121991
Пользователь
 
Регистрация: 30.03.2011
Сообщений: 34
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
а что такое частичное совпадение численного поля?
Ну например вводишь букву р, выводятся все поля содержащие эту букву, вводишь следующую букву, выводятся все поля содержащие эти буквы и т.д. А с числовым полем так сделать можно?
Valentina10121991 вне форума Ответить с цитированием
Старый 18.06.2014, 20:07   #35
Valentina10121991
Пользователь
 
Регистрация: 30.03.2011
Сообщений: 34
По умолчанию

Цитата:
Сообщение от eval Посмотреть сообщение
а что такое частичное совпадение численного поля?
Упс, ошибочку допустила
Valentina10121991 вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Обновление нумерации строк в DBGrid Denis Black БД в Delphi 3 28.05.2012 19:42
Обновление данных DBGrid DS75 БД в Delphi 24 02.11.2011 22:38
DBGrid и обновление данных в БД a_n_n_a БД в Delphi 1 02.08.2011 18:02
DBGrid запись и обновление a_n_n_a БД в Delphi 0 09.04.2011 06:03
Обновление DBGrid + ADOQuery Demonk БД в Delphi 11 04.02.2009 13:42