Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2013-12-08 19:16:22 ЛС | профиль | цитата
Medvedoc, Ввод В таблицу - ПКМ- Добавить, двойной клик на добавленой строке - ввод данных.
Удалить - выделить строку-ПКМ-Удалить
code_32552.txt
------------ Дoбавленo в 18.40:
Установи цвет в таблице - тогда будет видно добавленную строку.
------------ Дoбавленo в 19.16:
Леонид писал(а):
Вариант меню:
Леонид, и нафига столько математики ? Разьве что только как вариант.

Add(MainForm,8468706,112,105)
{
}
Add(Menu,7726516,168,105)
{
Menu=#8:Таблички|1:(|5:Табл1|5:Табл2|5:Табл3|3:Нет|1:)|
Point(onSelectNum)
link(onSelectNum,4898908:doOperation,[])
}
Add(StringTable,16590104,441,98)
{
Left=45
Top=30
Width=230
Height=220
Visible=1
Columns=#12:Месяц [№]=70|14:Темп [Гр C]=70|
Grid=0
Point(Strings)
Point(doVisible)
}
Add(StringTable,7213902,399,91)
{
Left=20
Top=25
Width=230
Height=220
Visible=1
Columns=#12:Месяц [№]=70|14:Облачн. [%]=70|
Grid=0
Point(Strings)
Point(doVisible)
}
Add(StringTable,14715635,357,84)
{
Top=20
Width=225
Height=220
Visible=1
Columns=#12:Месяц [№]=70|16:Ветер [м/сек]=70|
Grid=0
Point(Strings)
Point(doVisible)
}
Add(Math,4898908,231,112)
{
OpType=9
Op1=1
ResultType=0
link(onResult,7130626:doBits,[])
}
Add(IntToBits,7130626,287,112)
{
Count=4
Data_0=Integer(0)
Data_1=Integer(1)
link(onBit2,14715635:doVisible,[])
link(onBit3,7213902:doVisible,[])
link(onBit4,16590104:doVisible,[])
}
Medvedoc, и обнуляет сразу.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
файлы: 1code_32552.txt [9KB] [380]