equal
deleted
inserted
replaced
20 |
20 |
21 unit uLandGraphics; |
21 unit uLandGraphics; |
22 interface |
22 interface |
23 uses uFloat, uConsts, uTypes; |
23 uses uFloat, uConsts, uTypes; |
24 |
24 |
25 type PRangeArray = ^TRangeArray; |
25 type TRangeArray = array[0..31] of record |
26 TRangeArray = array[0..31] of record |
|
27 Left, Right: LongInt; |
26 Left, Right: LongInt; |
28 end; |
27 end; |
|
28 PRangeArray = ^TRangeArray; |
29 |
29 |
30 function addBgColor(OldColor, NewColor: LongWord): LongWord; |
30 function addBgColor(OldColor, NewColor: LongWord): LongWord; |
31 function SweepDirty: boolean; |
31 function SweepDirty: boolean; |
32 function Despeckle(X, Y: LongInt): Boolean; |
32 function Despeckle(X, Y: LongInt): Boolean; |
33 procedure Smooth(X, Y: LongInt); |
33 procedure Smooth(X, Y: LongInt); |