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