ProgMan13
|
 Posted: Wed Jan 21, 2026 00:49 Post subject: |
 |
|
Ini в папке с локальными символами можно обойти так:
| Code: | procedure ListSetDefaultParams(dps: pListDefaultParamStruct); stdcall;
var
B: TBytes;
begin
B := nil;
SetLength(B, StrLen(dps^.DefaultIniName));
if Length(B) > 0 then
begin
Move(dps^.DefaultIniName[0], Pointer(B)^, Length(B));
ListerIniFilename:= TEncoding.ANSI.GetAnsiString(B);
end;
end;
|
Чтобы плагин не падал (в примере с падением в QuickView), нужно убирать Application.ProcessMessages.
Для теста можно поменять на CheckSynchronize, но по файлам в режиме QuickView "пробежаться" не удастся. Для начала можно начинать раскраску по таймеру. |
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
