procedure THITabControl._work_PageInsert;
var s:string;
begin
s:=ReadString(_Data,_data_NewPageText,');
Control.TC_Insert(ReadInteger(_Data,_data_Index,0),s,3); //3 - это чаво ???
end;
Если не считать того, что мне неизвестно, на что показывает индекс 3 в отсутствующем ImageListe
btw: деструкторы элементам писать не модно, однако
![](/img/smilies/icon_evil.gif)
[size=-2]------ Добавлено в 12:02
Dilma, думаю, что Леонид-а больше тревожил этот вопрос
![](/img/smilies/icon_wink.gif)