Han-Object is Insertable

From Vectorlab
Jump to: navigation, search


Checks if an object is insertable: pio or symbol. By Orso B. Schmid


{ Orso *********************************************** }
{ checks if h is pio or plug-in }
FUNCTION H_IsInsertable(h: HANDLE): BOOLEAN;
	VAR
		typ : INTEGER;
	BEGIN
		IF h <> NIL THEN
			typ := GetType(h);
			
		H_IsInsertable := ((typ=15) | (typ=86));
	END;