Han-Object is VP

From Vectorlab
Jump to: navigation, search


Checks if an object is a sheet layers viewport. You need to load the routine H_SubType before this. By Orso B. Schmid


{ Orso *********************************************** }
{ checks if h is sheet layer viewport }
FUNCTION H_IsVP(h: HANDLE): BOOLEAN;
	BEGIN
		IF h = NIL THEN
			H_IsVP := FALSE
		ELSE
			H_IsVP := (H_SubType(h) = 506);
	END;