
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;
|