|
@@ -653,14 +653,6 @@ begin
|
|
inherited;
|
|
inherited;
|
|
end;
|
|
end;
|
|
|
|
|
|
-procedure TInnoSetupStyler.ApplyPendingSquigglyFromToIndex(const StartIndex, EndIndex: Integer);
|
|
|
|
-begin
|
|
|
|
- if (CaretIndex >= StartIndex) and (CaretIndex <= EndIndex + 1) then
|
|
|
|
- ApplyStyleByteIndicators([inPendingSquiggly], StartIndex, EndIndex)
|
|
|
|
- else
|
|
|
|
- ApplyStyleByteIndicators([inSquiggly], StartIndex, EndIndex);
|
|
|
|
-end;
|
|
|
|
-
|
|
|
|
procedure TInnoSetupStyler.AddWordToList(const SL: TStringList;
|
|
procedure TInnoSetupStyler.AddWordToList(const SL: TStringList;
|
|
const Word: AnsiString; const Typ: Integer);
|
|
const Word: AnsiString; const Typ: Integer);
|
|
begin
|
|
begin
|
|
@@ -670,6 +662,14 @@ begin
|
|
SL.Add(String(Word));
|
|
SL.Add(String(Word));
|
|
end;
|
|
end;
|
|
|
|
|
|
|
|
+procedure TInnoSetupStyler.ApplyPendingSquigglyFromToIndex(const StartIndex, EndIndex: Integer);
|
|
|
|
+begin
|
|
|
|
+ if (CaretIndex >= StartIndex) and (CaretIndex <= EndIndex + 1) then
|
|
|
|
+ ApplyStyleByteIndicators([inPendingSquiggly], StartIndex, EndIndex)
|
|
|
|
+ else
|
|
|
|
+ ApplyStyleByteIndicators([inSquiggly], StartIndex, EndIndex);
|
|
|
|
+end;
|
|
|
|
+
|
|
procedure TInnoSetupStyler.ApplyPendingSquigglyFromIndex(const StartIndex: Integer);
|
|
procedure TInnoSetupStyler.ApplyPendingSquigglyFromIndex(const StartIndex: Integer);
|
|
begin
|
|
begin
|
|
ApplyPendingSquigglyFromToIndex(StartIndex, CurIndex - 1);
|
|
ApplyPendingSquigglyFromToIndex(StartIndex, CurIndex - 1);
|
|
@@ -689,8 +689,7 @@ begin
|
|
WordStringList.Sort;
|
|
WordStringList.Sort;
|
|
|
|
|
|
Result := '';
|
|
Result := '';
|
|
- for var S in WordStringList do
|
|
|
|
- begin
|
|
|
|
|
|
+ for var S in WordStringList do begin
|
|
var A := AnsiString(S);
|
|
var A := AnsiString(S);
|
|
if Result = '' then
|
|
if Result = '' then
|
|
Result := A
|
|
Result := A
|
|
@@ -1420,7 +1419,7 @@ end;
|
|
class function TInnoSetupStyler.IsParamSection(
|
|
class function TInnoSetupStyler.IsParamSection(
|
|
const Section: TInnoSetupStylerSection): Boolean;
|
|
const Section: TInnoSetupStylerSection): Boolean;
|
|
begin
|
|
begin
|
|
- Result := not (Section in [scCustomMessages, scLangOptions, scMessages, scSetup]);
|
|
|
|
|
|
+ Result := not (Section in [scCustomMessages, scLangOptions, scMessages, scSetup, scCode]);
|
|
end;
|
|
end;
|
|
|
|
|
|
class function TInnoSetupStyler.IsSymbolStyle(const Style: TScintStyleNumber): Boolean;
|
|
class function TInnoSetupStyler.IsSymbolStyle(const Style: TScintStyleNumber): Boolean;
|