https://gsbelarus.com:80/gs/wiki/index.php?action=history&feed=atom&title=Gedemin_TLB.IgsQueryList.Delete 2026-07-17T00:00:41Z История изменений этой страницы в вики MediaWiki 1.19.16 https://gsbelarus.com:80/gs/wiki/index.php?title=Gedemin_TLB.IgsQueryList.Delete&diff=6753&oldid=prev 2016-01-17T10:19:48Z

<p>Новая страница: «{{MethodDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|visibility=public|class={{#explode:{{PAGENAME}}|.|1}}|src=procedure Delete(Index: Integer); safecall;}} &lt;…»</p> <p><b>Новая страница</b></p><div>{{MethodDef_Template|unit={{#explode:{{PAGENAME}}|.|0}}|visibility=public|class={{#explode:{{PAGENAME}}|.|1}}|src=procedure Delete(Index: Integer); safecall;}}<br /> <br /> &lt;onlyinclude&gt;Удаляет набор данных с заданным индексом.&lt;/onlyinclude&gt; <br /> <br /> <br /> Индексы всех следующих за ним в списке запросов уменьшаются на 1. Например, при выполнении кода:<br /> <br /> function rp_Main147051802_612792051<br /> <br /> BaseQueryList.Clear<br /> <br /> set q = BaseQueryList.Query(BaseQueryList.Add(&quot;q&quot;, 0))<br /> q.SQL = &quot;SELECT * FROM GD_CONTACT&quot;<br /> q.Open<br /> set q1 = BaseQueryList.Query(BaseQueryList.Add(&quot;q1&quot;, 0))<br /> q1.SQL = &quot;SELECT * FROM GD_CONTACT&quot;<br /> q1.Open<br /> call BaseQueryList.Delete(0)<br /> call BaseQueryList.Delete(1)<br /> set rp_Main147051802_612792051 = BaseQueryList<br /> end function<br /> <br /> получим ошибку &quot;List index out of bounds (1)&quot;, а если заменить:<br /> <br /> call BaseQueryList.Delete(0)<br /> call BaseQueryList.Delete(1)<br /> <br /> на: <br /> <br /> call BaseQueryList.Delete(0)<br /> call BaseQueryList.Delete(0),<br /> <br /> скрипт выполнится без ошибок (результат — пустой [[BaseQueryList]]).</div>

SYSDBA