Developing.ru

Привет MOTOCoder и нетолько!

Сповибо, что зделал из 3х форм 2ве, но суть была не в этом. Проблема тоже нев этом.
Да и объясни что это за файл "Project1.bdsproj.local" Я такого не невидел!
Если с можешь помоги, а если нет то и на том спосибо!


У меня Курсовая. "часы с будильником".
Когда на будильнике устонавливаю время и нажимаю ОК!
Через определённое время появляется форма. Су ведомлением. Например: Всиавай.
При этом звучит одна стандартная мелодия windows "TADA".
Теперь к главному!!!
У меня должно в Combo Box быть помещено 5 мелодий .wav формата.
Я должен выбрать одну из них. После чего нажать на кнопку ОК.
По истечению времени должна появиться форма уже с другим звуковым сигналом.
Я её пробовал прописать через Case, но у меня шото не сильно получилось.

+2 звуковых файла.


Вторая моя проблемка:

(стрелка от будильника) Когда я устонавливаю время в будильнике и нажимаю кнопку "Ок" то форма с будильником исчезает и на форме там где часы должна появиться стрелка которая указывает на ту временную точку где должен прозвинеть будильник. (это моя проблемка) Я не могу сделать так чтобы она там появлялась и правильно роботала.

Прикрепляю вам програмку. Подправте её пожалуйста.

Во! Так вроде!


Андрей.

На счет стрелок - координаты можно высчитать так:

[syntax='Delphi']
const
GRAD = 0.0174532;
procedure Vector(x0,Y0:integer;angle:integer;L:integer);
var
ZX,ZY:integer;
a:integer;
begin
a:=360-angle+90;
canvas.MoveTo(x0, y0) ;
zx := Round(x0 + l*cos(a*GRAD));
zy := Round(y0 - l*sin(a*GRAD));
canvas.LineTo(zx,zy);
end;
[/syntax]
Здесь X0, Y0-координаты центра
L - длина стрелки
angle - угол в градусах.
На счет прикрепленного проекта-в нем не хватает файла Unit3.pas.
P.S. Чем старая тема не устраивает?

MOTOCoder большое те спосибо за помощь. Дело в том меня всё устраивает, но просто мы невстречальсь с такими файлами!!!

&quot писал(а):просто мы невстречальсь с такими файлами!!!

С какими "такими" файлами?

Tofast, читаем правила, вдумчиво!
1. Название темы - кандидат на удаление без прочтения!
2. Раздел не тот