Този сайт използва бисквитки (cookies). Ако желаете можете да научите повече тук. Разбрах
IDG  •  PC World  •  Computerworld  •  CIO  •  CFO  •  Networkworld  •  Дискусии  •  Кариерна зона  •  Събития
computerworld | кариерна зона | Lang Cloud
Computerworld | кариерна зона | programming | Delphi

Озвучаване на приложение

Delphi 881 прочитания


Когато мишката навлиза и излиза от пределите на компонент, вие можете да прихванете съобщенията CM_MOUSEENTER и CM_MOUSELEAVE, за да произведете звук.

CODE
1
2
3
TMyComponent = class(TComponent)    private      procedure CMMouseEnter(var msg: TMessage) ;
В  message CM_MOUSEENTER;
В  procedure

CODE
1
2
3
4
5
6
7
8
9
10
11
12
13
CMMouseLeave(var msg: TMessage) ;
В  message CM_MOUSELEAVE;    
end;  

implementation  procedure TMyComponent.CMMouseEnter(var msg: TMessage) ;
begin
В  sndPlaySound('c:\mysound.wav', snd_Async or snd_NoDefault)
end;  

procedure TMyComponent.CMMouseLeave(var msg: TMessage) ;
begin    
В  sndPlaySound(nil, snd_Async or snd_NoDefault) ;
end;

ICON ICON ICON Tweet it! ICON

Изпращане на електронно писмо с Outlook
Когато ви се налага да изпратите по програмен път електронно писмо, може да си послужите със следната техника
Delphi 2050 прочитания
Как да затворим приложение на Delphi с бутона „escape"
Използвайте кода в примера
Delphi 1123 прочитания
Как ще разберете, че средата на Windows се затваря в Delphi приложение
Когато средата на Windows се затваря, до всички отворени приложения се изпраща съобщението WM_QueryEndSession. Ето как това съобщение може да бъде прихванато и обработено
Delphi 1092 прочитания
Работа с Cookie
В този пример е показано как да използвате класа HttpCookie, за да направите бисквитка и да й зададете време на живот
ASP.NET 1150 прочитания
WordPress функция за разделяне заглавието на два реда
// split nameif (!function_exists('the_title')) {    function the_title($name) {        if($name!
PHP 619 прочитания
Въпрос на броя
Как можете да разберете в Java дали даден файл има атрибут hidden?
Java 562 прочитания
Използване на оператора unless
В арсенала си от ключови думи Perl има оператора unless. Той изпълнява функцията за контрол на логиката, подобно на конструкцията if … else, но с тази разлика, че прави в определени случаи кода по-лесен за четене и проследяване, а освен това може да служи
Perl 733 прочитания
Как може да намерите родителската директория на зададен файл в Delphi?
Най-лесният начин е да използвате съществуващите RTL функции
Delphi 1414 прочитания

Слайдшоу

HR на месеца

Петя Костова, старши бизнес партньор „Човешки ресурси“ VMware за България и за регион EMEA

Петя Костова, старши бизнес партньор „Човешки ресурси“ VMware за България и за регион EMEA

“ Петя Костова, старши бизнес партньор „Човешки ресурси“ VMware за България и за регион EMEA, е лице на рубриката HR of the Month („ЧР на месеца“) през февруари. Инициативата се... ” вижте още »

IT сертификати