Здравствуйте, Гость
Воскресенье, 24.09.2017, 16:21
Главная Главная страница форума Регистрация Вход
Новые сообщения Участники форума Правила форума Поиск
Страница 1 из 11
Модератор форума: stalker, Ekz 
Форум » Все о Delphi » Начинающим » CheckBox and If then ! SOS (CheckBox and If then ! SOS)
CheckBox and If then ! SOS
pakkkДата: Среда, 13.01.2010, 21:48 | Сообщение # 1
Ранг 1
Группа: Пользователи
Сообщений: 1
Награды: 0
Репутация: 0
Статус: Offline
здравствуйте, мне нужна маленькая помощь.
к примеру я кидаю на форму CheckBox1 и Memo1
и мне нужно чтобы при нажатие на CheckBox1(появляется галка) в Memo1 появилась любая строчка (Memo1.Lines.Insert(0,'Любая строчка');
А потом при нажатия опять CheckBox1(галачка снимается) это строчка удалилась(Memo1.Lines.Delete(0) wink
Я немогу разобратся c If then else
Помогиту)
 
skycarДата: Четверг, 14.01.2010, 02:11 | Сообщение # 2
Ранг 6
Группа: Проверенные
Сообщений: 116
Награды: 5
Репутация: 31
Статус: Offline
Code
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
   if CheckBox1.Checked then Memo1.Lines.Insert(0, 'Test')
   else Memo1.Lines.Delete(0);
end;

Обработчик OnClick CheckBox'a)
Если при нажатии ставится галочка, то и добавляется строка. При снятии галочки происходит обратное.

 
Форум » Все о Delphi » Начинающим » CheckBox and If then ! SOS (CheckBox and If then ! SOS)
Страница 1 из 11
Поиск:

Copyright DelphiDevelop.ru © 2008-2017
Хостинг от uCoz