/
lasersquad
/
DynamicArrays
Обзор
Документация
Войти
/
lasersquad
/
DynamicArrays
Код
Задачи
Вики
Пакеты
0
Релизы
0
Аналитика
Безопасность
master
dynamicarrays/docs/Delphi/DynamicHashes.html
546 строк
17 KB
lasersquad
no message
09 мар 2003, 23:29
09 мар 2003, 23:29
e7ab7c9
Код
Авторство
О чём код?
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <title>������������ ����></title> </head> <body> <table width="100%" border="0" cellpadding="5" cellspacing="0"> <tr> <td align=center bgColor=#009999 bgcolor="#264b99"> <font face="verdana,arial" size="5" color="#FFFFFF"> <b>������������ ����<br> (Hashes)</b></font><br> <font face="verdana,arial" size="2" color="#FFFFFF"><b> Version 2.0</b><br></font> </td> </tr> </table> <font face="verdana,arial" size=2> <p>Copyright © 1998-2001 by Andrey Romanchenko<br> All rights reserved. <p><table cellspacing=2 cellpadding=0> <tr> <td><font face="verdana,arial" size=2> <i>e-mail: </i></font> </td> <td><font face="verdana,arial" size=2> <a href="mailto:lasersquard@yahoo.com?subject=Dynamic Arrays version 2.0">lasersquad@tut.by</a></font> </td> </tr> <tr> <td><font face="verdana,arial" size=2> <i>web site: </i></font> </td> <td><font face="verdana,arial" size=2> <a href="http://DynamicArrays.narod.ru" target=_new>http://DynamicArrays.narod.ru/</a></font> </td> </tr> <tr> <td></td> <td><font face="verdana,arial" size=2> <!-- (������ �����: <a href="http://www.dynamicarrays.cjb.net/" target=_new>http://www.dynamicarrays.cjb.net/</a>)</font>--> </td> </tr> </table> <h3>����������</h3> <ul> <li> <a href="#commondescr">����� ��������</a> <li> <a href="#instalation">����������</a> <li> <a href="#globals">���������� �����������</a> <li> ������ <ul> <li> <a href="#THash">THash</a> <li> <a href="#THashExists">THashExists</a> <li> <a href="#THashInteger">THashInteger</a> <li> <a href="#THashBoolean">THashBoolean</a> <li> <a href="#THashPointer">THashPointer</a> <li> <a href="#THashCurrency">THashCurrency</a> <li> <a href="#THashDouble">THashDouble</a> <li> <a href="#THashString">THashString</a> </ul> </ul> <hr> <a name="commondescr"></a> <h3>����� ��������</h3> ���� - ������������ ���������, ��� �������� �������� �� �������. <br> �� ������������ �������� ���������� ���, ���<br> <ol> <li>�������� ������ �� ��������, ������� �����������,�.�. ����� ������� �������� � �������� <strong>1</strong> � � �������� <strong>1 000 000</strong>, ��� ���� ����� ������ ������ ������ ��� ���� ��������. ������ ��� ����������� ��������, ������� ������� �� ����������� � �� �������.</li> <li>�������� ����� ������� �� ������ <strong>integer</strong> (���� � ��������� ���������� ������������ ������ <strong>integer</strong> �������). </ol> ��������� ��� ����� ����������� ��� ������ ��� ����� ��� ���� ����� ��� ���� (������), � ������ ��� ��������.<br> ��� ���� ��� ������ ��������������� �������� ������ ����������. <br> ��������� ������������� ����� � ������� ������ <a href="#IfExist">THash.IfExist</a>.<br> <a href="#THashExists">THashExists</a> �������� �����������. � ��� �������� ������ �������� <strong>True</strong>. ��������������, <a href="#IfExist">IfExist</a> ����� �������� ������ �� ��� <strong>True</strong>, � ������� �� ����� ��������� ����������. �� ������ ��������������� �������� ����� ������������ �������� <strong>False</strong>, � ��� ��������� �������� � <strong>False</strong> ��� ������ �������� �� ����. <br><br> <hr> <a name="instalation"></a> <h3>����������</h3> ������������ ���� ��� � ������������ ������� �� ������� ������� ����������. ���������� �������� ������ <strong>DynamicArrays.pas</strong> � ������ <strong>uses</strong> ������� ������ ������ ������� � ���. ������ �� �������� ������� <strong>Delphi</strong> ���� ��� �� ���������� ���� <strong>DynamicArrays.pas</strong>. ��� ����� ������� ���� � <ul> <li>/Tools/Environment Options/Library/Library Path/ </ul> ���� � <ul> <li>/Project/Project Options/Directories Conditionals/Search Path/ </ul> <hr> <a name="globals"></a> <h3>���������� �����������</h3> ��. <a href="DynamicArrays.html">������������ �������</a> ��� �������� ���������� �����������. <br><br> <hr> <a name="THash"></a> <h3>THash</h3> ���������� ����������� �����. ������ ���� �������-�����. � ������� �� <a href="DynamicArrays.html#THArray">THArray</a> ����� �������������/������ � �� ������������ �� ����� ������� ��������. ������� ���������� ��� ���� �� ���������. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <a name="AIndexes"></a> <td width="40%"> <font face="Courier New" size=2> property <strong>AIndexes</strong>:THArrayInteger; </td> <td><font face="verdana,arial" size=2> ReadOnly �������� ������������ ������ <a href="DynamicArrays.html#THArrayInteger">THArrayInteger</a> ���������� ��� ����� (<strong>Keys</strong>) ���� �������� � ����. </td> </tr> <tr> <td> <font face="Courier New" size=2> property <strong>Count</strong>:integer; </td> <td><font face="verdana,arial" size=2> ���������� �������� � ����. </td> </tr> <tr> <td> <font face="Courier New" size=2> property <strong>Keys</strong>[Index:integer]:integer; </td> <td><font face="verdana,arial" size=2> ���������� ���� (������) ��������, ����������� � <strong>Index</strong> ������� (<strong>Index</strong>: <strong>0</strong>..<strong>Count-1</strong>). </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> procedure <strong>Clear</strong>;virtual; </td> <td><font face="verdana,arial" size=2> ������ ���, �� ������ �� ����������� (��������� ��� �������� ����� ������). ���� ��� ����� �������� ����������������, �� ������ �������� ��������, ������ ������� �� ����������� - ��������� ��� �� ����� ������������� ������, ������� ��� ��������������. ��. ����� ����� <a href="#ClearMem">ClearMem</a>. </td> </tr> <tr> <a name="ClearMem"></a> <td><font face="Courier New" size=2> procedure<strong> ClearMem</strong>;virtual;</td> <td><font face="verdana,arial" size=2> ������ ���, ��� ���� ���������� ��� ������.</td> </tr> <tr> <td><font face="Courier New" size=2> procedure <strong>Delete</strong>(Key:integer); virtual;abstract; <td><font face="verdana,arial" size=2> ������� �������� ��� ����� <strong>Key</strong>. ���� � �������� ��������� �� ����. � ��������� <a href="#IfExist">IfExist</a> ����� ���������� <strong>False</strong> �� ���� ����. </td> </tr> <tr> <a name="IfExist"></a> <td><font face="Courier New" size=2> function <strong>IfExist</strong>(Key:integer):boolean; <td><font face="verdana,arial" size=2> �������� - ���������� �� ������� � ������ <strong>Key</strong>. ���� ���������� �� ���������� <strong>True</strong>, ����� <strong>False</strong>. </td> </tr> </table> <br> <br> <a name="THashBoolean"></a> <h3>THashBoolean</h3> ��� ��� �������� <strong>boolean</strong> �����. ������ ��� <strong>True</strong> ��� � <strong>False</strong> �������� ������� ���������� ����������� �������� ��������� ���� �� �������� � ���� � ���� ���� �� ����� <strong>True</strong> ��� <strong>False</strong>. ��. ����� <a href="#THashExists">THashExists</a>. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:boolean;default; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>False</strong>. </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> constructor <strong>CreateFromHArrays</strong>(IndexHArray:THArrayInteger; ValueHArray:THArrayBoolean); </td> <td><font face="verdana,arial" size=2> ��������� ������� ��� �� ���� ��������. ���� ������ ��������������� ��� ������ �������� (������), � ������ ��� ������ ��������. ��� ���� �������� �� �������� �� ���������� � ���������� ������ ������ �� ��� ������� � ���� ��� ���������� read only �.�. ��������� ������ ������ ��������. </td> </tr> </table> <br> <br> <a name="THashExists"></a> <h3>THashExists</h3> ��� ��� �������� <strong>Boolean</strong> ��������. ������� ������� �� <a href="#THashBoolean">THashBoolean</a> � ��� ��� <strong>THashExists</strong> �� ������ <strong>False</strong> �������� �.�. ��� ��������� �������� � <strong>False</strong> ��� ������������� ��������� �� ����. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:boolean;default; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������.<br> ��� ��������� �������� � <strong>False</strong> ��� ������������� ��������� �� ����. </td> </tr> </table> <br> <br> <a name="THashInteger"></a> <h3>THashInteger</h3> ��� ��� �������� ����� ����� (<strong>integer</strong>). <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>AValues</strong>:THArrayInteger read FAValues; </td> <td><font face="verdana,arial" size=2> ReadOnly ��������. ���������� �������� �������� ��� ������ <a href="DynamicArrays.html#THArrayInteger">THArrayInteger</a>. ��. ��� �� <a href="#AIndexes">THash.AIndexes</a>. </td> </tr> <tr> <td> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:integer;default; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>0</strong>. </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> constructor <strong>CreateFromHArrays</strong>(IndexHArray:THArrayInteger; ValueHArray:THArrayInteger); </td> <td><font face="verdana,arial" size=2> ��������� ������� ��� �� ���� ��������. ���� ������ ��������������� ��� ������ �������� (������), � ������ ��� ������ ��������. ��� ���� �������� �� �������� �� ����������, � ���������� ������ ������ �� ��� ������� � ���� ��� ���������� read only �.�. ��������� ������ ������ ��������. </td> </tr> </table> <br> <br> <a name="THashPointer"></a> <h3>THashPointer</h3> ��� ��� �������� ���������� (<strong>pointer</strong>). ������� ����������� �������� ��� ����������� �� ���������� ������ ������ �� � ���. ������� ��������� ������� ��������� �� ��� ������. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>AValues</strong>:THArrayPointer read FAValues; </td> <td><font face="verdana,arial" size=2> ReadOnly ��������. ���������� �������� �������� ��� ������ <a href="DynamicArrays.html#THArrayInteger">THArrayInteger</a>. ��. ��� �� <a href="#AIndexes">THash.AIndexes</a>. </td> </tr> <tr> <td> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:pointer; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>nil</strong>. </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> constructor <strong>CreateFromHArrays</strong>(IndexHArray:THArrayInteger; ValueHArray:THArrayPointer); </td> <td><font face="verdana,arial" size=2> ��������� ������� ��� �� ���� ��������. ���� ������ ��������������� ��� ������ �������� (������), � ������ ��� ������ ��������. ��� ���� �������� �� �������� �� ����������, � ���������� ������ ������ �� ��� ������� � ���� ��� ���������� read only �.�. ��������� ������ ������ ��������. </td> </tr> </table> <br> <br> <a name="THashCurrency"></a> <h3>THashCurrency</h3> ��� ��� �������� ����� <strong>Currency</strong>. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:Currency; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>0</strong>. </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> constructor <strong>CreateFromHArrays</strong>(IndexHArray:THArrayInteger; ValueHArray:THArrayCurrency); </td> <td><font face="verdana,arial" size=2> ��������� ������� ��� �� ���� ��������. ���� ������ ��������������� ��� ������ �������� (������), � ������ ��� ������ ��������. ��� ���� �������� �� �������� �� ����������, � ���������� ������ ������ �� ��� ������� � ���� ��� ���������� read only �.�. ��������� ������ ������ ��������. </td> </tr> <tr> <td><font face="Courier New" size=2> procedure <strong>Inc</strong>(Key:integer;Value:currency); </td> <td><font face="verdana,arial" size=2> ����������� ���������� �������� � ������ <strong>Key</strong> �� <strong>Value</strong>. ���� �������� �� ���������� �� ������� �������� � ������ <strong>Key</strong> � ��������� <strong>Value</strong>. </td> </tr> </table> <br> <br> <a name="THashDouble"></a> <h3>THashDouble</h3> ��� ��� �������� ����� <strong>Double</strong>. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <td width="40%"> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:Double; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>0</strong>. </td> </tr> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> ������ </td> </tr> <tr> <td><font face="Courier New" size=2> constructor <strong>CreateFromHArrays</strong>(IndexHArray:THArrayInteger; ValueHArray:THArrayDouble); </td> <td><font face="verdana,arial" size=2> ��������� ������� ��� �� ���� ��������. ���� ������ ��������������� ��� ������ �������� (������), � ������ ��� ������ ��������. ��� ���� �������� �� �������� �� ����������, � ���������� ������ ������ �� ��� ������� � ���� ��� ���������� read only �.�. ��������� ������ ������ ��������. </td> </tr> <tr> <td><font face="Courier New" size=2> procedure <strong>Inc</strong>(Key:integer;Value:Double); </td> <td><font face="verdana,arial" size=2> ����������� ���������� �������� � ������ <strong>Key</strong> �� <strong>Value</strong>. ���� �������� �� ���������� �� ������� �������� � ������ <strong>Key</strong> � ��������� <strong>Value</strong>. </td> </tr> </table> <br> <br> <a name="THashString"></a> <h3>THashString</h3> ��� ��� �������� �����.<br> ����� ����������� �������� <a href="#AllowEmptyStr">AllowEmptyStr</a> ������������ ������ ������ ����. <br> ���� <strong>AllowEmptyStr</strong>=<strong>True</strong> �� ��� ����� ������� ������ ������. <br> ���� <strong>AllowEmptyStr</strong>=<strong>False</strong> �� ��� �� ����� ������� ������ ������ � ��� ��������� �������� � ������ ������ �������� ����� ������������� ������� �� ����. <br><br> <table cellspacing="0" cellpadding="5" border="1"> <tr bgcolor="#009999"> <td colspan="2" align="center" valign="middle"><font face="verdana,arial" size=4> �������� </td> </tr> <tr> <a name="AllowEmptyStr"></a> <td width="40%"> <font face="Courier New" size=2> property <br><strong>AllowEmptyStr</strong>:boolean; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� <strong>0</strong>. </td> </tr> <tr> <td> <font face="Courier New" size=2> property <strong>Value</strong>[Index:integer]:string; </td> <td><font face="verdana,arial" size=2> ���������/�������� �������� �� ���� �� �������. ���� �������� �� ���������� �� �� ��������� ���������� ������ ������. </td> </tr> </table> <br> </body> </html>