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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 02.05.2012, 09:22   #21
Прик
Форумчанин
 
Регистрация: 08.09.2010
Сообщений: 880
По умолчанию

Проще не бывает:
Код:
 if Form5.BookName.RecordCount > 0 then
  Form5.BookName.Delete;
Прик вне форума Ответить с цитированием
Старый 02.05.2012, 17:41   #22
temaps
Форумчанин
 
Регистрация: 15.05.2011
Сообщений: 160
По умолчанию

Думаю человеку лучше показать более важные операторы:
Код:
if not (Form5.BookName.RecordCount = 0) then
  Form5.BookName.Delete;
или
Код:
if Form5.BookName.RecordCount <> 0 then
  Form5.BookName.Delete;
офтоп

Спасибо! Просто плакал! Настроение на весь день!

Последний раз редактировалось temaps; 02.05.2012 в 17:43.
temaps вне форума Ответить с цитированием
Старый 02.05.2012, 18:14   #23
Юсуп
Пользователь
 
Аватар для Юсуп
 
Регистрация: 25.12.2011
Сообщений: 76
По умолчанию

Цитата:
Сообщение от Прик Посмотреть сообщение
Проще не бывает:
Код:
 if Form5.BookName.RecordCount > 0 then
  Form5.BookName.Delete;
Я так и сделал спасибо

Цитата:
Сообщение от temaps Посмотреть сообщение
Думаю человеку лучше показать более важные операторы:
Код:

if not (Form5.BookName.RecordCount = 0) then
Form5.BookName.Delete;

или
Код:

if Form5.BookName.RecordCount <> 0 then
Form5.BookName.Delete;

[/CODE]
Спасибо))
Иметь знания и не делиться ими это скупость.....будьте щедрыми))))
Юсуп вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TDBDateEdit как проверить на наличие значения? delphicoding Общие вопросы Delphi 6 03.04.2012 11:34
Как проверить наличие программы googl Общие вопросы Delphi 13 22.03.2012 16:14
Как найти ячейку с заданным текстом, проверить наличие пустых ячейк справа и записать в них 0 Squarded Microsoft Office Excel 9 24.07.2011 20:20
как проверить наличие папки на удаленном сервере? xxxsas PHP 4 18.01.2011 16:16
Как проверить TImage на наличие в нём картинки soonner Мультимедиа в Delphi 3 16.03.2009 22:01