![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#4
|
||||
|
||||
![]() WM_DEVICECHANGE это не функция, а сообщение:
Цитата:
примерчик: Код:
unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls; type TForm1 = class(TForm) ListBox1: TListBox; private { Private declarations } public { Public declarations } procedure WMDEVICECHANGE(var Msg: TMessage); message WM_DEVICECHANGE; end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.WMDEVICECHANGE(var Msg: TMessage); begin ListBox1.Items.Add('WParam='+IntToStr(Msg.WParam)+' LParam='+IntToStr(Msg.LParam)); end; end. на флешку реагирует и без администраторских прав. Пишу программы за еду. __________________ |