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