Но в целом это дурацкое занятие, неужели так трудно один раз отсканировать код?
ct := concat(ct, String(Chr(ctInt)));
function Escape(const Value: string);
var
C: Char;
begin
Result := '';
for C in Value do begin
if C = #0 then begin
Result := Result + '''#0''';
end else begin
Result := Result + C;
end; // if
end; // loop
end;
procedure RPR;
var
AL: UInt32;
begin
AL := GDAL;
if (AL <> AL1s[1]) and (AL <> AL1s[2]) then ALV;
end;
constructor TDSTableProducerEditor.Create(DSTableProducer: TDSTableProducer);
begin
inherited Create;
FDSTableProducer := DSTableProducer;
FDSTableProducer.Editor := Self;
{$IFDEF MSWINDOWS}
RPR;
{$ENDIF}
{$IFDEF LINUX}
RCS;
{$ENDIF}
end;
constructor TDBXClientDriver.Create(DriverDef: TDBXDriverDef);
begin
inherited Create(DriverDef);
{$IF NOT (DEFINED(IOS) or DEFINED(ANDROID))}
rpr;
{$ENDIF}
¹Когда грузится всякая Яндекс.Метрика, сторонние чаты и т.п., это внешние скрипты, которые исполняются в контексте того фрейма, который загрузил их, а, значит, обращаясь к document.cookies, скрипты могут редактировать кукисы в чужом неяндексовом домене, но при этом скрипты могут и звонить домой в Яндекс, и при таких запросах участвуют и кукисы домена Яндекса.