Вот так принято в KOl писал(а):
OLD_ALIGN - to prevent using new Align by Galkov.
**********************************************
NEW_TRANSPARENT - created by Alexander Karpinsky a.k.a. homm (faster)
***********************************************
// This version of code by Galkov:
************************************************
if not FControl.fDestroying then //!!!fix by Galkov
************************************************
if (Child <> nil)
and (Child <> Self_) //+ by Galkov, Jun-2009
Add(MainForm,2953706,140,28)
{
Height=266
}
Add(ListBox,15186276,196,28)
{
Left=20
Top=30
Width=95
Strings=#6:Первая|6:Вторая|6:Третья|
DataType=1
link(onClick,967198:doAdd,[])
}
Add(ListBox,967198,266,35)
{
Left=155
Top=30
Width=225
}
И по хорошему _OnSelState должно происходить после onClick.
nesco писал(а):
и на этом закончим прения по данном вопросу