Вопрос № 131728: Здравствуйте, в приложении я написал процедуры вывода диалоговых окон
Подскажите мне, что нужно добавить, чтобы при выборе кнопки да (или нет) происходило событие, например, выход из программы.
И подскажите пожалуйста еще подобных п...Вопрос № 131765: Добрый вечер! Подскажите пожалуйста, с помощью чего, каких компонентов можно сделать форму "физической" то есть красиво оформленной "по-физически". Заранее спасибо ...Вопрос № 131843: Здраствуйте,вот недавно озадачился,как написать пример где шарик будет отскакивать от краев формы...как я не парился с рандомом и условиями,несмог :) видимо плохо
парился,так вот о чем я? :) Ах да...обьясните мне тупому как сделать такое? только пожа...
Вопрос № 131.728
Здравствуйте, в приложении я написал процедуры вывода диалоговых окон
Подскажите мне, что нужно добавить, чтобы при выборе кнопки да (или нет) происходило событие, например, выход из программы.
Отвечает: Mishell
Здравствуйте, Исаак Моисеевич!
if MessageBox(Handle,'Сообщение?','Заголовок',MB_ICONQUESTION+MB_YESNO)=idYes then
begin
// ...
end;
Ответ отправил: Mishell (статус: 10-ый класс)
Ответ отправлен: 11.04.2008, 18:50 Оценка за ответ: 5 Комментарий оценки: Спасибо, желательно бы еще на последнюю процедуру событие сказать
Отвечает: Genia007
Здравствуйте, Исаак Моисеевич!
Вот рабочий код:
If MessageDlg('Выход из программы', mtInformation, [mbOk, mbNo], 0) = mrOk then
close
else
if MessageDlg('Выход из программы', mtInformation, [mbOk, mbNo], 0) = mrNo then
ShowMessage ('Отменено пользователем');
А это описание констант возвращаемых MessageDlg
Значения функции MessageDlg Диалог завершен нажатием кнопки
mrAbort Abort
mrYes Yes
mrOk Ok
mrRetry Retry
mrNo No
mrCancel Cancel
mrIgnore Ignore
mrAll All
А вот константы Константы функции MessageDlg
Константа Кнопка
mbYes Yes
mb Abort Abort
mbNo No
mbRetry Retry
mbOK OK
mblgnore Ignore
mbCancel Cancel
mbAll All
mbHelp Help
Ответ отправил: Genia007 (статус: Студент)
Ответ отправлен: 12.04.2008, 12:43 Оценка за ответ: 5
Вопрос № 131.765
Добрый вечер! Подскажите пожалуйста, с помощью чего, каких компонентов можно сделать форму "физической" то есть красиво оформленной "по-физически". Заранее спасибо
Отвечает: Genia007
Здравствуйте, Губайдуллин Руслан Мансурович!
Красиво оформить форму можно с помощью разных компонентов из разных пакетов:
Например набор компонент AlphaSkins - разные скины для формы и стандартных компонентов, адрес http://www.alphaskins.com/index_rus.php;
набор компонентов chdelphipack- набор компонент крутых - разные компоненты адрес
www.Blue-Xplosion.de:
набор компонент AnimEffect - разные анимационные эффекты адрес http://o-delphi.narod.ru;
formrgn - возможность делать форму любой формы адреса у меня нет:
JEDI JCL/JVCL - тоже много разных интересных компонентов адрес http://www.borland.com/devsupport/delphi/.
Желаю удачи.
Ответ отправил: Genia007 (статус: Студент)
Ответ отправлен: 12.04.2008, 12:27
Вопрос № 131.843
Здраствуйте,вот недавно озадачился,как написать пример где шарик будет отскакивать от краев формы...как я не парился с рандомом и условиями,несмог :) видимо плохо парился,так вот о чем я? :) Ах да...обьясните мне тупому как сделать такое? только пожалуйста непишите готовый код...я хочу понять как самому это сделать...
Отправлен: 12.04.2008, 15:18
Вопрос задал: Melixion (статус: 1-ый класс)
Всего ответов: 2 Мини-форум вопроса >>> (сообщений: 2)
Отвечает: Mishell
Здравствуйте, Melixion!
см. пример в приложении
п.с.: за основу взял Ваш код
п.п.с.: пример не проверял - "писал на лету", но должно работать, т.к. подобные штуки делал сам не раз - хоть это и упрощенный вариант
Приложение:
Ответ отправил: Mishell (статус: 10-ый класс)
Ответ отправлен: 12.04.2008, 20:02 Оценка за ответ: 5 Комментарий оценки: Хороший код...я тоже не тестировал и небуду,так как хочу понять КАК НАПИСАТЬ! А когда код УЖЕ написан...нет спасибо... но за проделаную роботу 5!
Отвечает: Genia007
Здравствуйте, Melixion!
У меня получилась такая вот программка, код в приложении, имитирует игру пинг - понг, когда - то были такие приставки для телевизоров.
Приложение:
Ответ отправил: Genia007 (статус: Студент)
Ответ отправлен: 14.04.2008, 14:04