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

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

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.04.2011, 14:50   #1
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
Восклицание Запрет на удаление пустой строки StringGrid

del.jpg
доброго времени суток! мне надо сделать так, чтобы единственная пустая строка(на скрине) не удалялась, а остальные удалялись. у меня не получается помогите, пожалуйста!
Sheeby вне форума Ответить с цитированием
Старый 22.04.2011, 14:56   #2
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
По умолчанию

я пробовал вот так сделать
Код:
procedure TForm1.BitBtn3Click(Sender: TObject);
var i,j: Integer;
begin
if StringGrid2.Cells[1,i]<>'' then
TFakeGrid(StringGrid2).DeleteRow(StringGrid2.Row)
else
begin
  Beep;
  showmessage('Нельзя удалить эту строку');
  exit;
end;
end;
Sheeby вне форума Ответить с цитированием
Старый 22.04.2011, 17:32   #3
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
По умолчанию

господа, "помощники студентам", вы тут болтовню развели на форуме или реально помогаете?..
Sheeby вне форума Ответить с цитированием
Старый 22.04.2011, 18:38   #4
Mad_Cat
Made In USSR!
Старожил
 
Аватар для Mad_Cat
 
Регистрация: 01.09.2010
Сообщений: 3,657
По умолчанию

Цитата:
господа, "помощники студентам", вы тут болтовню развели на форуме или реально помогаете?..
здесь вам никто ничего не должен
А по теме
Цитата:
присваиваешь i:=1
идешь строкам пока не найдешь пустую
прибавляешь к i:=i+1;
удаляешь все строки с i до конца в цикле
ферштейн7
"...В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал..."
(c) Юрий Клинских aka "Хой"
Mad_Cat вне форума Ответить с цитированием
Старый 23.04.2011, 12:10   #5
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
По умолчанию

Цитата:
Сообщение от Mad_Cat Посмотреть сообщение
здесь вам никто ничего не должен
я и не говорил, что мне здесь кто-то что-то должен. просто нормально по человечески попросил
Цитата:
Сообщение от Mad_Cat Посмотреть сообщение
ферштейн7
я-то понял, но вы меня нет. чтобы каждая удалялась в отдельности, но только на пустую стоял запрет
Sheeby вне форума Ответить с цитированием
Старый 23.04.2011, 14:47   #6
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,543
По умолчанию

Цитата:
Сообщение от Sheeby Посмотреть сообщение
я пробовал вот так сделать
Код:
procedure TForm1.BitBtn3Click(Sender: TObject);
var i,j: Integer;
begin
if StringGrid2.Cells[1,i]<>'' then
TFakeGrid(StringGrid2).DeleteRow(StringGrid2.Row)
else
begin
  Beep;
  showmessage('Нельзя удалить эту строку');
  exit;
end;
end;
пустая строка это когда все ячейки данной строки пустые.
и советую почитать (перевести) ПРЕДУПРЕЖДАЮЩИЕ сообщения warning cсообщения компилятора. Они не зря придуманы.
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 23.04.2011, 14:50   #7
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
Плохо

Цитата:
Сообщение от evg_m Посмотреть сообщение
пустая строка это когда все ячейки данной строки пустые.
и советую почитать (перевести) ПРЕДУПРЕЖДАЮЩИЕ сообщения warning cсообщения компилятора. Они не зря придуманы.
да все, разобрался сам уже. вы тут только советы раздавать умеете. толку ноль....
Sheeby вне форума Ответить с цитированием
Старый 23.04.2011, 15:59   #8
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,543
По умолчанию

Цитата:
вы тут только советы раздавать умеете. толку ноль...
Если помощь это готовый код то на это есть фриланс. где ПОСЛЕ определения условий ($) вы сможете что-то требовать.
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Старый 25.04.2011, 07:31   #9
Sheeby
Пользователь
 
Регистрация: 21.04.2011
Сообщений: 20
По умолчанию

Цитата:
Сообщение от evg_m Посмотреть сообщение
Если помощь это готовый код то на это есть фриланс. где ПОСЛЕ определения условий ($) вы сможете что-то требовать.
если не заметил - я ничего не требую. я прошу помощи. не можешь помочь нормально нефиг писать. к вам тут ламера по делфи обращаются вы смотрю никому толком ничего сказать не можете. только сделай это, это, это и ни одной строки кодом
Sheeby вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание пустой строки и копирование в неё содержимое предыдущей строки Gvaridos Microsoft Office Excel 2 29.10.2010 13:33
Удаление пустой строки ggxxx Microsoft Office Excel 2 30.04.2010 16:10
удаление строки, начинающейся с пустой ячейки grichanuk Microsoft Office Excel 3 01.12.2009 05:31
Удаление пустой страницы Word Flame_of_Death Общие вопросы Delphi 1 16.07.2009 07:07
запрет на ввод пустой записи ГОСЕАН БД в Delphi 10 08.03.2008 03:48