【Rectangle_Exist】
[code]inputs: RectangleID( numericsimple ) ;variables: var0( 0 ) ;
Condition1 = false ;
var0 = RectangleGetFirst( 3 ) ;
while var0 >= 0
begin
if var0 = RectangleID then
begin
Condition1 = true ;
var0 = -2 ;
end
else
var0 = RectangleGetNext( var0, 3 ) ;
end ;
Rectangle_Exist = Condition1 ;
[/code]
页:
[1]