Lines Matching refs:newBidi

211         newBidi: TUnicodeBidiClass;
217         for newBidi := low(TUnicodeBidiClass) to high(TUnicodeBidiClass) do
219           codes[newBidi] := TIntegerList.Create;
220           gaps[newBidi] := 0;
225           'CS': newBidi := ubcCommonSeparator;
226           'L': newBidi := ubcLeftToRight;
227           'EN': newBidi := ubcEuropeanNumber;
228           'ES': newBidi := ubcEuropeanNumberSeparator;
229           'ET': newBidi := ubcEuropeanNumberTerminator;
230           'R': newBidi := ubcRightToLeft;
231           'AL': newBidi := ubcArabicLetter;
232           'AN': newBidi := ubcArabicNumber;
233           'NSM': newBidi := ubcNonSpacingMark;
234           'BN': newBidi := ubcBoundaryNeutral;
235           'B': newBidi := ubcParagraphSeparator;
236           'S': newBidi := ubcSegmentSeparator;
237           'WS': newBidi := ubcWhiteSpace;
238           'ON': newBidi := ubcOtherNeutrals;
241 …if (newBidi = ubcLeftToRight) and (UnicodeData[i].Category = 'Mc') then newBidi := ubcCombiningLef…
242 …else if (newBidi = ubcOtherNeutrals) and UnicodeData[i].Mirrored then newBidi := ubcMirroredNeutra…
248               if (codes[newBidi].Count > 0) and (codes[newBidi].Last+1 <> curCode) then
249                 inc(gaps[newBidi]);
250               codes[newBidi].Add(curCode);
251               if gaps[newBidi] > MaxGapsPerClass then
252                 FlushCase(newBidi);
256         for newBidi := low(TUnicodeBidiClass) to high(TUnicodeBidiClass) do
258           FlushCase(newBidi);
259           codes[newBidi].Free;