In "address2name", when I add name that already exist there is an exception.
A key with the name of "йй" already exists
HFS 2.0 beta23
----------------------------------------------------------------
Stack list, generated 18.5.2005 г. 17:27:28
[004E0FB2]{hfs.exe } ValEdit.TValueListStrings.KeyIsValid + $82
[004E1418]{hfs.exe } ValEdit.TValueListStrings.Put + $3C
[004DFAB7]{hfs.exe } ValEdit.TValueListEditor.SetCell + $AB
[004E0450]{hfs.exe } ValEdit.TValueListEditor.SetEditText + $108
[004DCA83]{hfs.exe } Grids.TCustomGrid.UpdateText + $4B
[004DC8A0]{hfs.exe } Grids.TCustomGrid.HideEdit + $24
[004DB9A3]{hfs.exe } Grids.TCustomGrid.MouseDown + $1B
[00465E3A]{hfs.exe } Controls.TControl.DoMouseDown + $76
[004649DB]{hfs.exe } Controls.TControl.SetMouseCapture + $17
[00465E86]{hfs.exe } Controls.TControl.WMLButtonDown + $3E
[004DCB89]{hfs.exe } Grids.TCustomGrid.WMLButtonDown + $5
[00465BCC]{hfs.exe } Controls.TControl.WndProc + $188
[004689D3]{hfs.exe } Controls.TWinControl.IsControlMouseMsg + $4F
[00468B6F]{hfs.exe } Controls.TWinControl.WndProc + $157
[004687EC]{hfs.exe } Controls.TWinControl.MainWndProc + $2C
[00428AA8]{hfs.exe } Classes.StdWndProc (Line 10565, "classes.pas" +
+ $0
[00433192]{hfs.exe } Contnrs.TComponentList.GetItems + $A
[00455873]{hfs.exe } Forms.TApplication.ProcessMessage + $83
[004558AA]{hfs.exe } Forms.TApplication.HandleMessage + $A
[00452727]{hfs.exe } Forms.TCustomForm.ShowModal + $147
[00490586]{hfs.exe } ComCtrls.TPageControl.SetActivePage + $3E
[004F8AF5]{hfs.exe } main.showOptions (Line 5461, "main.pas" + 2) + $1A
[004FC28C]{hfs.exe } main.TmainFrm.Address2name1Click (Line 6380, "main.pas" + 0) + $10
[0045C5F6]{hfs.exe } Menus.TMenuItem.Click + $A6
[0045D7CF]{hfs.exe } Menus.TMenu.DispatchCommand + $13
[0045E4AE]{hfs.exe } Menus.TPopupList.WndProc + $82
[0045E3FD]{hfs.exe } Menus.TPopupList.MainWndProc + $1D
[00428AA8]{hfs.exe } Classes.StdWndProc (Line 10565, "classes.pas" +
+ $0
[00433192]{hfs.exe } Contnrs.TComponentList.GetItems + $A
[00455873]{hfs.exe } Forms.TApplication.ProcessMessage + $83
[004558AA]{hfs.exe } Forms.TApplication.HandleMessage + $A
[00455ACA]{hfs.exe } Forms.TApplication.Run + $96
[004FD648]{hfs.exe } hfs.hfs (Line 58, "C:\code\mine\hfs\hfs.dpr" + 14) + $2
----------------------------------------------------------------
System : Windows XP Professional, Version: 5.1, Build: A28, "Service Pack 2"
Processor: AMD, Unknown CPU Type, 2300 MHz MMX
Display : 1024x768 pixels, 32 bpp
----------------------------------------------------------------
----------------------------------------------------------------
Product Versions
hfs.exe: Build: 0 02.4.2005 г. 03:37:48