makso134 писал(а):
в открытом combo.txt стираем или добавляем строкуЧем стираем -- своей программой (в той которой ComboBox), или сторонней программой
------------ Дoбавленo в 16.32:
Леонид, на кой черт в твоей схеме If_Else, когда уже сто лет в обед есть отдельная точк onYES
------------ Дoбавленo в 16.42:
Вот то, о чем я говорил
Add(MainForm,16219623,119,161)
{
Left=200
Top=100
Point(onClose)
link(onCreate,11543791:doEvent1,[])
}
Add(ComboBox,4172984,441,245)
{
Left=5
Top=10
Width=115
Height=21
ReadOnly=0
Point(Index)
Point(doSelect)
}
Add(Button,12245508,119,238)
{
Left=25
Top=165
Width=80
Caption="Save"
link(onClick,4721824:doEvent1,[])
}
Add(Memo,13464279,231,203)
{
Left=5
Top=40
Width=120
Height=120
FileName="MyComBox.txt"
ScrollBars=2
}
Add(Hub,4721824,168,238)
{
link(onEvent1,13464279:doSave,[])
link(onEvent2,701304:doWork2,[])
}
Add(DoData,11014080,231,266)
{
link(onEventData,3275367:doCase,[])
link(Data,13464279:Text,[])
}
Add(Case,3275367,287,266)
{
Value=String()
link(onNextCase,45019:doEvent1,[])
}
Add(Hub,11543791,168,175)
{
link(onEvent1,13464279:doLoad,[(206,181)(206,237)])
link(onEvent2,701304:doWork1,[(198,188)])
}
Add(HubEx,701304,194,245)
{
Angle=1
link(onEvent,11014080:doData,[(198,272)])
}
Add(Hub,45019,343,266)
{
link(onEvent1,4172984:doText,[])
link(onEvent2,880715:doData,[(371,279)(371,293)])
}
Add(DoData,880715,385,287)
{
Data=Integer(0)
link(onEventData,4172984:doSelect,[])
}