Определить, что WIN.INI был измененDelphi , Файловая система , INI файлыОпределить, что WIN.INI был изменен
Оформил: DeeCo { An application sends the WM_WININICHANGE message to all top-level windows after making a change to the WIN.INI file. The SystemParametersInfo function sends this message after an application uses the function to change a setting in WIN.INI. } type TForm1 = class(TForm) private { Private declarations } procedure WMWinIniChange(var Message: TMessage); message WM_WININICHANGE; // or WM_SETTINGCHANGE end; var Form1: TForm1; implementation {$R *.dfm} procedure TForm1.WMWinIniChange(var Message: TMessage); var status: Bool; Area: TRect; begin inherited; case Message.wParam of // Example: Detect when the screen saver is enabled/disabled SPI_SETSCREENSAVEACTIVE: begin SystemParametersInfo(SPI_GETSCREENSAVEACTIVE, 0, @status, 0); if Status = True then ShowMessage('Screensaver has been enabled.') else ShowMessage('Screensaver has been disabled.'); end; end; end; Статья Определить, что WIN.INI был изменен раздела Файловая система INI файлы может быть полезна для разработчиков на Delphi и FreePascal. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |