Вопрос № 120382: Здравствуйте, уважаемые эксперты!
Как, зная хендл окна, заставить его мерцать?
FlashWindow и Flashwindowex почему-то ничего не хотят делать ((...Вопрос № 120386: Как зациклить воспроизведение avi файла?...Вопрос № 120412: Здраствуйте!!! Помогите пожалуйста решить две задачи мне завтра надо к зачету:
1)Задать последовательность из 10 чисел. Вывести на экран только те числа, которые больше 100.
2)По заданному числу определить является ли оно четным. Результ...Вопрос № 120445: Уважаемые эксперты!!! Пожалуйста помогите написать мне программу решения уравнений. Например:
Пользователь вводит 2x-6=4-3x;
А в richedit'e выводится:
2x+3x=6+4
5x=10
x:=2
Заранее спасибо!...
Вопрос № 120.382
Здравствуйте, уважаемые эксперты!
Как, зная хендл окна, заставить его мерцать?
FlashWindow и Flashwindowex почему-то ничего не хотят делать ((
Отвечает: Виктор Пырлик
Здравствуйте, Александр Леонидович!
Возможно вы просто не так/не тот дескриптор окна передаёте.
В приложении код тестовый - всё работает. Важно только - передавать точное имя окна, его заголовок (например: Калькулятор и т.д.).
В прикрепленном файле полное тестовое приложение.
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа. --------- Если ничего не помогло - надо читать инструкцию
Ответ отправил: Виктор Пырлик (статус: Специалист)
Ответ отправлен: 27.01.2008, 13:57
При использовании компонента TMediaPlayer для "зацикливания" можно воспользоваться событием OnNotify. Пример приведен в приложении.
Однако хочу заметить, что данный компонент не идеален. При подобном зацикливании Вы будете видеть паузу.
Удачи!
Приложение:
--------- Будь осторожен, когда молишься ради чего-то, потому что можешь это получить...
Ответ отправил: Denisss (статус: Профессионал) Россия, Москва ---- Ответ отправлен: 27.01.2008, 14:55 Оценка за ответ: 5 Комментарий оценки: Спасибо большое! А без паузы можно как-нить? Мне так, чисто ради интереса...
Отвечает: Genia007
Здравствуйте, Екатерина Ходеева!
Вот процедура которая это делает.
Установите свойство Notify в True в инспекторе обектов компонента MediaPlayer,
и в событии OnNotify пропишите следующий код.
procedure TForm1.MediaPlayer1Notify(Sender: TObject);
begin
with MediaPlayer1 do
if NotifyValue = nvSuccessful then
begin
Notify := True;
Play;
end;
end;
Ответ отправил: Genia007 (статус: 5-ый класс)
Ответ отправлен: 27.01.2008, 15:29 Оценка за ответ: 3 Комментарий оценки: Такой ответ уже был! Пожалуйста, просматривайте предыдущие ответы, а то мнение о экспертах после этого портится.
Вопрос № 120.412
Здраствуйте!!! Помогите пожалуйста решить две задачи мне завтра надо к зачету:
1)Задать последовательность из 10 чисел. Вывести на экран только те числа, которые больше 100.
2)По заданному числу определить является ли оно четным. Результат вывести в метку.
Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Черепанов Алексей Витальевич! В приложенном файле проект полностью в виде исходников. В приложении - основной код. На форме: два компонента TMemo (memo1 - для ввода чисел, Memo2 - вывод результата); два TButton (первая кнопка - считывает десять чисел из Memo1 и выводит в Memo2 все больше 100; вторая - проверяет четное число или нет); один TEdit (Edit2) - ввод числа для проверки на четность; TLabel - выводится четное или нечетное число.
Удачи!
Приложение:
Прикреплённый файл: Загрузить >> Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа.
Уважаемые эксперты!!! Пожалуйста помогите написать мне программу решения уравнений. Например:
Пользователь вводит 2x-6=4-3x;
А в richedit'e выводится:
2x+3x=6+4
5x=10
x:=2
Заранее спасибо!
Отвечает: Николай Владимирович / Н.В.
Здравствуйте, Alexander Alexandrovic!
Программа в приложении.
Требовалось всего лишь немного подправить код из ответа на предыдущий Ваш вопрос.
Удачи!
Приложение:
Ответ отправил: Николай Владимирович / Н.В. (статус: Специалист)
Ответ отправлен: 28.01.2008, 07:13 Оценка за ответ: 5 Комментарий оценки: Объясните мне пожалуйста, что такое trim