Вверх ↑
Этот топик читают: Гость
Ответов: 704
Рейтинг: 44
#1: 2012-03-19 18:36:25 ЛС | профиль | цитата
Здравствуйте всем!!! Вы бы не могли мне подсказать с одной проблемой. Мне нужно с помощью кнопок перемещать текст в ListBox выше или ниже, как в редакторе элемента там есть кнопки Add Up и Down, но не могу своими силами сделать,сижу 2 часа и не как не могу сообразить, всю голову сломал. Я где то видел на форуме подобную схему но не могу найти, так что извиняйте за топик. Вот схема code_27239.txt
карма: 0

0
файлы: 1code_27239.txt [1.1KB] [182]
Ответов: 1821
Рейтинг: 168
#2: 2012-03-19 18:39:20 ЛС | профиль | цитата
Kazbek17, а точки doUp и doDown в этом самом компоненте для кого созданы
карма: 5

0
Ответов: 704
Рейтинг: 44
#3: 2012-03-19 18:46:20 ЛС | профиль | цитата
sаmakacd писал(а):
а точки doUp и doDown в этом самом компоненте для кого созданы
Нет!!! а что? и причем здесь doUp и doDown в компоненте ListBox, без точек ни как нельзя что ли?
карма: 0

0
Ответов: 495
Рейтинг: 163
#4: 2012-03-19 19:11:13 ЛС | профиль | цитата
Kazbek17 писал(а):
причем здесь doUp и doDown в компоненте ListBox
А чем точки то не устраивают..
code_27240.txt

карма: 4

0
файлы: 1code_27240.txt [795B] [308]
Ответов: 704
Рейтинг: 44
#5: 2012-03-19 19:13:41 ЛС | профиль | цитата
tig-rrr писал(а):
А чем точки то не устраивают
Спасибо за пример но нет у меня этих точек.Видимо старый у меня Listbox.
карма: 0

0
Ответов: 3889
Рейтинг: 362
#6: 2012-03-19 19:22:42 ЛС | профиль | цитата
Kazbek17 писал(а):
Видимо старый у меня Listbox

Я и на старом показывал, как это делать. У нас целое соревнование, помню, было, огромная тема и множество, множество схем.
карма: 1

0
Ответов: 704
Рейтинг: 44
#7: 2012-03-19 19:25:28 ЛС | профиль | цитата
1nd1g0 писал(а):
У нас целое соревнование, помню, было, огромная тема и множество, множество схем

Дойду до ваших высот!!! так же будут участвовать в соревнование по схемам , Действительно искал не нашел по форуму.
карма: 0

0
Ответов: 3889
Рейтинг: 362
#8: 2012-03-19 19:29:18 ЛС | профиль | цитата
Kazbek17 писал(а):
Дойду до ваших высот!

Это было клятвенное обещание побороть лень ?
------------ Дoбавленo в 19.29:
Kazbek17 писал(а):
искал не нашел

Я подскажу: списки доступны как массивы, а в массивах можно обменивать ячейки парой простых операций
карма: 1

0
Ответов: 704
Рейтинг: 44
#9: 2012-03-19 19:55:38 ЛС | профиль | цитата
1nd1g0 писал(а):
Это было клятвенное обещание побороть лень ?
[flood]Это было обещание, и лень , немного мозгов пока не хватает а так все есть. [/flood]
карма: 0

0
Ответов: 8930
Рейтинг: 823
#10: 2012-03-19 21:15:55 ЛС | профиль | цитата
1nd1g0 писал(а):
обменивать ячейки парой простых операций
Что-то никак просто не получилось code_27243.txt
Kazbek17, если нажать правой кнопкой на элементе в палитре из меню можно выбрать "Обновить"
карма: 19

0
файлы: 1code_27243.txt [4.3KB] [176]
Ответов: 3889
Рейтинг: 362
#11: 2012-03-19 21:22:09 ЛС | профиль | цитата
Леонид писал(а):
Что-то никак просто не получилось

Просто - это обновиться с SVN
карма: 1

0
Ответов: 704
Рейтинг: 44
#12: 2012-03-19 21:26:16 ЛС | профиль | цитата
Леонид писал(а):
если нажать правой кнопкой на элементе в палитре из меню можно выбрать "Обновить"

Леонид Спасибо уже разобрался, я просто не знал что добавили такие методы.
карма: 0

0
Ответов: 1841
Рейтинг: 369
#13: 2012-03-19 22:15:07 ЛС | профиль | цитата
Леонид писал(а):
Что-то никак просто не получилось code_27243.txt

Немного упростил
см. ниже
------------ Дoбавленo в 22.15:
И ещё немного упростил (окончательный вариант).

Add(MainForm,15710605,452,259)
{
}
Add(ListBox,8727693,602,231)
{
Left=170
Top=10
Width=85
Height=250
Strings=#1:a|1:b|1:c|1:d|1:f|
Point(doSelect)
Point(Index)
Point(String)
}
Add(Button,4369445,451,315)
{
Left=140
Top=95
Width=25
Caption="^"
Data=Integer(-1)
link(onClick,4084530:doWork1,[(506,321)])
}
Add(Button,14069706,451,348)
{
Left=140
Top=120
Width=25
Caption="v"
Data=Integer(1)
link(onClick,4084530:doWork3,[(506,354)])
}
Add(Math,9215059,525,332)
{
link(onResult,13850682:doRead,[])
link(Op1,16074437:getVar,[])
}
Add(ArrayRW,13850682,616,332)
{
link(onRead,5410194:doEvent1,[])
link(Array,8727693:Array,[])
}
Add(LineBreakEx,5161180,623,305)
{
Caption="idx"
Type=3
link(_Data,8727693:Index,[])
}
Add(LineBreakEx,16074437,525,305)
{
Caption="idx"
Type=2
}
Add(LineBreakEx,7762775,563,339)
{
Caption="write"
Type=1
link(OnEvent,13850682:doWrite,[])
}
Add(LineBreakEx,11461772,746,332)
{
Caption="write"
}
Add(MT_AddData,7018019,701,393)
{
InputMT=1
link(onAdd,2140705:doWork,[])
link(Data1,11082757:getVar,[])
}
Add(Hub,5410194,660,332)
{
OutCount=3
link(onEvent1,978926:doAdd,[])
link(onEvent2,7018019:doAdd,[(691,345)(691,399)])
link(onEvent3,5610638:doData,[(683,352)(683,461)])
}
Add(LineBreakEx,16715620,525,375)
{
Caption="idxop"
Type=3
link(_Data,9215059:Result,[])
}
Add(LineBreakEx,11082757,701,366)
{
Caption="idx"
Type=2
}
Add(MT_AddData,978926,700,332)
{
InputMT=3
link(onAdd,11461772:doWork,[])
link(Data1,4393809:getVar,[])
link(Data2,8727693:String,[(713,300)(636,300)])
}
Add(LineBreakEx,4393809,700,307)
{
Caption="idxop"
Type=2
}
Add(LineBreakEx,2140705,744,393)
{
Caption="write"
}
Add(DoData,5610638,700,455)
{
link(onEventData,3788102:In,[])
link(Data,11712886:getVar,[])
}
Add(LineBreakEx,11712886,700,428)
{
Caption="idxop"
Type=2
}
Add(LineBreak,3657895,559,273)
{
Caption="sel"
link(Out,8727693:doSelect,[])
Primary=[3788102,188,182]
}
Add(HubEx,4084530,502,332)
{
link(onEvent,9215059:doOperation,[])
}
карма: 1
0
13
Сообщение
...
Прикрепленные файлы
(файлы не залиты)