Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- function MSSL_FindColorTolCS(var x, y: Integer; color, XS, YS, XE, YE, tol: Integer; settings: MSSL_TColorSettings): Boolean;
- {==============================================================================]
- Created: March 29th, 2013.
- Contributors: Janilabo
- Explanation: FindColorTol(), but with parameter for custom color settings (settings) - function performs these steps:
- 1. Captures original (current) color settings in the begin to 'cs' variables
- 2. Sets custom color settings to SCAR Divi
- 3. Performs the FindColorTol() function, just like it should!
- 4. Restores the original color settings for SCAR Divi
- [==============================================================================}
- var
- cs: MSSL_TColorSettings;
- begin
- cs := MSSL_GetColorSettings;
- MSSL_SetColorSettings(settings);
- Result := FindColorTol(x, y, color, XS, YS, XE, YE, tol);
- MSSL_SetColorSettings(cs);
- end;
Advertisement
Add Comment
Please, Sign In to add comment