removeprimitiv

Функция удаления объекта со схемы по его идентификатору.

Синтаксис:

removeprimitiv(gid);

Аргументы:

gid – идентификатор объекта на схеме.

Описание:

removeprimitiv(gid) – функция удаление объекта со схемы по его идентификатору gid.

Результат:

нет

Пример:

initialization
 gid = createprimitiv(6, [(0 , 0),(-28 , -48),(-88 , -108)]);
end
var oldfl: boolean; 

if paintstep then begin
 fl = flash(500);
 if fl <> oldfl then begin
  if fl then              
   bringtofront(FillRect) 
  else                    
   bringtofront(FillCircle);
  end;                      
 oldfl = fl;                
end;                        

finalization
 removeprimitiv(gid);
end;

В результате выполнения данного примера динамически создается объект «Залитый прямоугольник» с идентификатором gid, после чего объекты c идентификаторами gid и FillCircle (который уже был на схеме) будут попеременно с периодом 500 мс. накладываться друг на друга. Перед остановкой выполнения созданный объект с идентификатором gid удаляется.