Procedure FFillBack returns the current fill background color. RGB values are in the range of 0~65535.
PROCEDURE FFillBack(
VAR red : LONGINT;
VAR green : LONGINT;
VAR blue : LONGINT);def vs.FFillBack():
return (red, green, blue)| Name | Type | Description |
|---|---|---|
| red | LONGINT | Returns RGB color component value. |
| green | LONGINT | Returns RGB color component value. |
| blue | LONGINT | Returns RGB color component value. |
FFillBack(redValue,greenValue,blueValue);redValue,greenValue,blueValue = vs.FFillBack()BEGIN
FFillFore (R, G, B);
SetFillFore (objectH, R, G, B);
FFillBack (R, G, B);
SetFillBack (objectH, R, G, B);
END;
structCompsNeedUpdate := ((structMaterialIDNum = updatedMaterialID) & (textureByMaterial = false)) | ((structMaterialIDNum = 0) & materialDeleted);
{AlrtDialog(concat(' Inside HandleMaterialChange(), textureNeedsUpdate = ', textureNeedsUpdate, ' , archMaterialIDNum = ', archMaterialIDNum, ' , structMaterialIDNum = ', structMaterialIDNum,
' , updatedMaterialID =', updatedMaterialID, ' , archCompsNeedUpdate = ', archCompsNeedUpdate, ' , structCompsNeedUpdate = ', structCompsNeedUpdate)); }
FFillFore(redValue, greenValue, blueValue);
FFillBack(redValueBack, greenValueBack, blueValueBack);
begin
FFillBack(redValue,greenValue,blueValue);
SetFillBack(LNewObj, redValue,greenValue,blueValue);
end;import vs
# Procedure FFillBack returns the current fill background color.
red, green, blue = vs.FFillBack()
vs.Message('FFillBack returned: ' + str((red, green, blue)))VS Functions: RGBToColorIndex | ColorIndexToRGB
Availability: from All Versions