Как сделать калькулятор в Delphi?
Delphi - объектно-ориентированный язык программирования, разработанный компанией Borland в 1995 году. Он основан на языке программирования Pascal, но имеет более расширенные возможности и добавлены новые функции.
Как Delphi реализует многоплатформенную разработку?
Delphi является интегрированной средой разработки (IDE), которая позволяет разрабатывать программное обеспечение для различных платформ, включая Windows, macOS, Android и iOS. Delphi достигает многоплатформенности с помощью...
Определить, что WIN.INI был изменен
{
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
;