Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Новое направление Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 1124
от 17.04.2008, 18:35

Администратор:Калашников О.А.
В рассылке:Подписчиков: 446, Экспертов: 51
В номере:Вопросов: 3, Ответов: 5

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>


Вопрос № 131728: Здравствуйте, в приложении я написал процедуры вывода диалоговых окон Подскажите мне, что нужно добавить, чтобы при выборе кнопки да (или нет) происходило событие, например, выход из программы. И подскажите пожалуйста еще подобных п...
Вопрос № 131765: Добрый вечер! Подскажите пожалуйста, с помощью чего, каких компонентов можно сделать форму "физической" то есть красиво оформленной "по-физически". Заранее спасибо ...
Вопрос № 131843: Здраствуйте,вот недавно озадачился,как написать пример где шарик будет отскакивать от краев формы...как я не парился с рандомом и условиями,несмог :) видимо плохо парился,так вот о чем я? :) Ах да...обьясните мне тупому как сделать такое? только пожа...

Вопрос № 131.728
Здравствуйте, в приложении я написал процедуры вывода диалоговых окон

Подскажите мне, что нужно добавить, чтобы при выборе кнопки да (или нет) происходило событие, например, выход из программы.

И подскажите пожалуйста еще подобных процедур

Приложение:

Отправлен: 11.04.2008, 18:24
Вопрос задал: Исаак Моисеевич (статус: 3-ий класс)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 2)

Отвечает: 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
Добрый вечер! Подскажите пожалуйста, с помощью чего, каких компонентов можно сделать форму "физической" то есть красиво оформленной "по-физически". Заранее спасибо
Отправлен: 11.04.2008, 21:27
Вопрос задал: Губайдуллин Руслан Мансурович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 4)

Отвечает: 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


Вы имеете возможность оценить этот выпуск рассылки.
Нам очень важно Ваше мнение!
Оценить этот выпуск рассылки >>

Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2008, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале

∙ Версия системы: 4.91 pre 5.0 RC1 от 13.04.2008

Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное