Показать сообщение отдельно
  #7  
Старый 15.05.2011, 22:01
Человек_Борща Человек_Борща вне форума
Новичок
 
Регистрация: 17.09.2010
Адрес: Беларусь, г. Минск
Сообщения: 58
Версия Delphi: 7, 2010,XE
Репутация: 10
По умолчанию

ТС, проще пареной репы:
Код:
begin
//Диалог. сообщение скнопками ДА и НЕТ
//Если нажата кнопка ДА
if  MessageBox(Application.Handle,'Желаете добавить в listbox строку из Edit1.Text?','Сообщение',MB_YESNO or MB_ICONQUESTION) = IDYES then
 ListBox1.Items.add(Edit1.text); 
//Иначе ничего не происходит(Сообщение closed <=> отмене действия).
end;
Ответить с цитированием