помогите с программой

[1234]

ребята помогите я написал чат для внутренней переписки в фирме только вот проблема как сделать так чтоб при приходе нового сообщения чат или мигал или издовал хоть какойто звук
плиззз помогите оч нужно
пишите мне на меил и я пришлю исходник я б его выложил только вот слишком большой

[Stilet]

так чтоб при приходе нового сообщения чат или мигал или издовал хоть какойто звук

Мигать это FlashWindow, если он на панели задач свернут, или менять иконку в Трее. Поиши примеры создавания иконки в трее.
Ну а звук, это windows.beep() или PlaySound для проигрывания музла

[1234]

ну а как это реалезовать ???

[Stilet]

FlashWindow(Application.Handle, True); - Это мигание на панели задач.
По поводу иконки в трее смотри Delphi World там четко описано все.

[1234]

меня больше устроилбы звук поскольку в трей чат не сворачивается

[andrey4623]

поставь на форму компонент TMediaPlayer и все!

[GIO]

Функция PlaySound

Эта функция может воспроизводить любые волновые звуки, а не только звуки событий Windows. Функция API Windows, параметры которой описаны в модуле mmsystem. Поэтому для использования этой функции в Ваших программах, необходимо включить в раздел uses модуль mmsystem. Функция PlaySound определена так:

function PlaySound(pszSound:PChar; hmod:HINST; fdwSound:Cardinal):boolean;

Параметр pszSound является нуль терминированной строкой (последний символ строки имеет нулевой код), он определяет воспроизводимый звук. Параметр hmod используется в случае, когда звук берется из ресурса, поскольку мы этого делать не будем, то можно этот параметр задавать равным 0 или nil.

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

SND_ASYNC - Звук воспроизводится асинхронно и функция возвращается сразу же после начала воспроизведения. Чтобы прекратить воспроизведение нужно вызвать функцию PlaySound с параметром pszSound, равным 0.
SND_LOOP - воспроизведение звука постоянно повторяется, одновременно надо установить флаг SND_ASYNC.
SND_NOSTOP - Если заданный звук не может быть воспроизведен из-за занятости ресурсов, то функция немедленно вернет false (и звук не будет воспроизведен). Если же данный флаг не указан, то функция попытается остановить воспроизведение другого звука, чтобы освободить ресурсы.
SND_PURGE - Останавливает воспроизведение любых звуков, вызванных в данной задаче.
SND_SYNC - Синхронное воспроизведение звука события. Функция PlaySound возвращается только после окончания воспроизведения.

вставляешь в функцию обработки сообщений и всё