| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
При нажатии на крестик в правом верхнем углу выводить окно? [D6, WinXP]
Vasya.ru © (2004-07-03 22:56:00)Поясню: При нажатие на кнопку закрытия окна не закрыть его, а вывести диалоговое окно с кнопками "Да" "Нет". Как это реализовать?
YurikGL (2004-07-03 23:09:00) [1]'Çàêðûòü îêíî' это - 'Закрыть окно?'
YurikGL (2004-07-03 23:08:00) [2]procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if MessageDlg('Çàêðûòü îêíî',mtConfirmation,[mbYes,mbNo],0)=mrNo then canclose:=false;
end;
Семен Сорокин (2004-07-03 23:00:00) [3]OnCloseQuery
| |
