Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Закрытие окна

Страницы: < 1 2
batya17 © (2006-07-20 03:19:00)
НELP!!! Как сделать так чтобы при закрытии окна появлялось сообщение, что то вроде "Вы действительно хотите выйти" и кнопки да и нет если нет то прога не закрывается. Если знаеет отправте мне на мыло
batya15@rambler.ruЗаранее спасибо.

Плохиш (2006-07-20 21:55:00) [21]

> PSPF2003 © (20.07.06 21:19) [8]

Просто выпрямитель рук надо купить.

Джо (2006-07-20 21:45:00) [22]
> [8] PSPF2003 © (20.07.06 21:19)
> Читается побайтно100-килобайтный файл.

А не нужно заниматься таким извращением...

Пусик (2006-07-20 21:41:00) [23]

> Как сделать так чтобы при закрытии окна

Окна, или, все же, формы?

> Если знаеет отправте мне на мылоbatya15@rambler.ruЗаранее
> спасибо.

Заранее пожалуйста, но не стоит на мыло. Лучше здесь.

Мефисто (2006-07-20 21:26:00) [24]

> PSPF2003 © (20.07.06 21:19) [8]

Прям заинтриговал. Кинь код в форум или на www.zalil.ru. Что-то тут не чисто :)

PSPF2003 (2006-07-20 21:19:00) [25]

> Самый доступный и самый лучший источник - это исходники
> VCL.

Хм... Данные из книги "Нестандартные приемы программирования на Delphi" Юрия Ревича

Читается побайтно100-килобайтный файл. Без графического длительность процедуры составила 2сек,с ProgressBar 55сек, Gauge 130сек.
Так самый ли лучший источник VCL ?

Юрий Зотов (2006-07-20 14:29:00) [26]
> PSPF2003 © (20.07.06 14:10) [6]

> где его посмотреть этот “правильный стиль написания кода”

Самый доступный и самый лучший источник - это исходники VCL.

PSPF2003 (2006-07-20 14:10:00) [27]

> Не просто возможно, а это нормальный правильный стиль написания
> кода. Привыкай.

Понял, был неправ, но исправлюсь :)

> правильный стиль написания кода

Еще кто-нибудь сказал бы, где его посмотреть этот “правильный стиль написания кода”

Amoeba (2006-07-20 14:03:00) [28]

> PSPF2003 © (20.07.06 12:31) [4]
>
> > Лучше так, и никаких "else" здесь не надо:
>
> Хм... Возможно.

Не просто возможно, а это нормальный правильный стиль написания кода. Привыкай.

PSPF2003 (2006-07-20 12:31:00) [29]

> Лучше так, и никаких "else" здесь не надо:

Хм... Возможно.

Amoeba (2006-07-20 10:43:00) [30]

> PSPF2003 © (20.07.06 07:52) [2]
> procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose:
> Boolean);
> begin
> if MessageBoxA(Handle, 'Выходим ?', 'Дурацкий вопрос ..
> .', MB_YESNO + MB_ICONQUESTION) = IDYES then
> CanClose := true
> else
> CanClose := false;
> end;

Лучше так, и никаких "else" здесь не надо:

procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); begin CanClose := MessageBoxA(Handle, 'Выходим ?', 'Дурацкий вопрос ...', MB_YESNO + MB_ICONQUESTION) = IDYES; end;

PSPF2003 (2006-07-20 07:52:00) [31]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean);
begin
if MessageBoxA(Handle, 'Выходим ?', 'Дурацкий вопрос ...', MB_YESNO + MB_ICONQUESTION) = IDYES then
CanClose := true
else
CanClose := false;
end;

SergP (2006-07-20 07:36:00) [32]
OnCloseQuery

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »