Сохраненки

[Андрей]

[Андрей]

https://support.google.com/phoneapp/ans ... 9196?hl=ru

[Андрей]

Выровнять Label по центру в Delphi:

всё в режиме дизайнера делается, в инспекторе объектов установил свойства: Alignment = taCenter; AutoSize = false; Anchors - все в true, кроме akBottom; растянул этот Label на максимально уместную ширину и расположил по центру формы.

[Андрей]

Размещение в памяти типа String (Delphi)

String - это указатель на 12-байтовую структуру, в которой находятся:
счётчик ссылок на строку (смещение -8),
длина её тела в байтах (смещение -4),
указатель на тело строки (смещение 0).

Само же тело строки хранится отдельно и размещено непрерывным экстентом памяти. Поэтому копировать тело строки Str можно очень даже просто (Move, CopyMemory), но начинать надо с адреса @Str[1], а не с @Str.

[Андрей]

PowerShell:
https://www.itechguides.com/powershell-exe-command/

[Андрей]

Как заставить спикер пищать на Windows 7 или Windows 10?

На авторской странице https://www.waldbauer.com/tmp/dl.php?download=beepx размещён подписанный драйвер, активирующий спикер в системе (beepxp.sys).

Код: Выделить всё

type BEEP_PARS = record 
Tone: cardinal;
Time: cardinal;
end;

const IOCTL_BEEP_SET = $10000;   
FileNameStr: array [0..9] of char = '\\.\BeXP'#0;   
FileName: PChar=@FileNameStr[0];   
DevName: PChar=@FileNameStr[3];  

var DevPath: array [0..MAX_PATH] of char;  

function CustomBeep (Freq, Duration: cardinal): longint; stdcall; 
var BeepSetParams: BEEP_PARS;   
BytesReturned: cardinal;
hBeep: cardinal;
OwnDevName: longbool; 

begin   
OwnDevName:= FALSE;   
if (QueryDosDevice(DevName,DevPath,MAX_PATH)=0) then begin DefineDosDevice(DDD_RAW_TARGET_PATH,DevName,'\Device\BeepXP'); OwnDevName:= TRUE; end;   

hBeep:= CreateFile (FileName, GENERIC_READ or GENERIC_WRITE, 0, nil, OPEN_EXISTING, 0, 0);   
if (hBeep=INVALID_HANDLE_VALUE) then begin Result:= E_FAIL; Exit; end;   

BeepSetParams.Tone:= Freq;
BeepSetParams.Time:= Duration;
DeviceIOControl (hBeep, IOCTL_BEEP_SET, @BeepSetParams, sizeof(BEEP_PARS), nil, 0, BytesReturned, nil);
if OwnDevName then DefineDosDevice (DDD_REMOVE_DEFINITION, DevName, nil);   
Sleep(BeepSetParams.Time);
CloseHandle(hBeep);
Result:= S_OK; 
end;

Готовая утилита для воспроизведения звука:
https://rlvision.com/misc/beep.php

[Андрей]

В каком формате хранятся дата и время в таблицах phpbb?

В таблицах phpbb дата и время хранятся в полях типа int(11). Они содержат количество секунд, прошедших с определённой даты, а именно с 1 января 1970 года.

Для нормального вывода даты и времени можно использовать запрос типа:

Код: Выделить всё

SELECT FROM_UNIXTIME (unix_timestamp, format)

например

Код: Выделить всё

SELECT FROM_UNIXTIME (1650915724)

https://dev.mysql.com/doc/refman/8.0/en ... tions.html

[Михаил Киселев]

В редакторе кода Lazarus есть возможность выделения прямоугольного блока текста.
Для этого надо удерживая нажатой клавишу ALT, перетащить указатель мыши по тексту.

[Андрей]

Как устроены компьютерные блоки питания (БП):
https://habr.com/ru/company/dcmiran/blog/558970/

[Андрей]

Чтобы добавить значок favicon.ico на форум (работает для всех стилей):
Oткройте:

Код: Выделить всё

/styles/Ваш_стиль/template/overall_header.html

Найдите:

Код: Выделить всё

</head>

Добавьте перед найденным:

Код: Выделить всё

<link rel="shortcut icon" href="https://www.yoursite.com/favicon.ico" />

Измените yoursite.com на URL форума.

Ваш значок favicon.ico должен быть загружен в корень форума (туда, где находится файл config.php) и обязательно сохранен с именем favicon.ico. Существуют сайты, которые помогут Вам создать favicon, например: Favicon.ru.