AnnRectHeight example for Delphi

procedure TForm1.LEADAnn1AnnEnumerate (hObject: L_HANDLE);
begin
   LEADAnn1.AnnRectHeight [hObject]:= LEADAnn1.AnnRectHeight [hObject] + 50;
end;