Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

TrackBar

alexdn © (2011-09-16 10:05:00)
Здравствуйте! раньше никогда не использовал компонент TrackBar, подскажите плиз, какой код в нём нужно использовать, чтобы получить на выходе rezult[1-10] и дальше его уже применять?..

Servy (2011-09-18 18:34:00) [1]

> Просто помоему обсуждение уже ушло в немного другую плоскость,
> так чего вмешиваться то..

Дык оно ушло потому, что вы не сформулировали вопрос должным образом, и началось соревнование, кто лучше отгадает, что на самом деле вы имели в виду.

Уточните свой вопрос. Вот есть TrackBar. И у него есть TrackBar.Position - целое число из интервала TrackBar.Min..TrackBar.Max. А вы из этого хотите получить собственно что? Что за rezult[1-10], это массив? 1-10 это границы диапазона индексов, или это таки -9? Массив чего, и что в нем должно быть? Каким образом вы намереваетесь его дальше использовать? Ваш пост номер [1] нисколько не проясняет ситуацию, ибо в нем нет ни массива rezult, а есть странный код, эквивалентный следующему:

if (TrackBar.Position >= 1) and (TrackBar.Position <= 10) then resultt1 := TrackBar.Position;

alexdn (2011-09-18 11:44:00) [2]
> Германн © (18.09.11 01:04) [16]
> Да ну! А мужики-то и не знают и всё спорят и спорят.
Просто помоему обсуждение уже ушло в немного другую плоскость, так чего вмешиваться то..

Германн (2011-09-18 01:04:00) [3]

> а между прочим всё сделано) и ужо давно..

Да ну! А мужики-то и не знают и всё спорят и спорят.
Издеваешься, значит?

alexdn (2011-09-17 21:21:00) [4]
> Игорь Шевченко © (17.09.11 20:33) [14]
а между прочим всё сделано) и ужо давно..

Игорь Шевченко (2011-09-17 20:33:00) [5]
Вам делать больше нечего ? один идиот спросил, остальные спорят

И. Павел (2011-09-16 17:30:00) [6]

> Это бесполезное условное разделение.

Не считаю его бесполезным, т.к. оно может определяет особенности языка. Компиляторы PHP как таковые есть, но они содержат кучу особенностей, под которые нужно подстраиваться, править код. Костыли, проще говоря. Такие же костыли можно привесить к delphi7, сделав его интерпретируемым.

> Тогда PHP - не интерпретируемый язык.

Интерпретируемый компилируемого типа, если быть точным. Но сути это не меняет: там можно включить в название переменной значение другой переменной, про что я и писал в [8].

Омлет (2011-09-16 16:11:00) [7]
> И. Павел © (16.09.11 15:52) [10]

Это бесполезное условное разделение. Для Delphi можно написать такой же интерпретатор, как для PHP. И кстати, для PHP есть компиляторы.

Ega23 (2011-09-16 16:02:00) [8]

> а исполняется с помощью специальной программы-интерпретатора.

Тогда PHP - не интерпретируемый язык.

И. Павел (2011-09-16 15:52:00) [9]
> Хочешь сказать, Delphi - неинтерпретируемый язык? Приехали
> )

Из википедии: Интерпретируемый язык программирования — язык программирования, в котором исходный код программы не преобразовывается в машинный код для непосредственного выполнения центральным процессором, а исполняется с помощью специальной программы-интерпретатора.
По-моему Delphi - компилируемый язык. Хотя не знаю, что будет в Delphi XE2.

Омлет (2011-09-16 15:29:00) [10]
> И. Павел © (16.09.11 15:10) [8]

Хочешь сказать, Delphi - неинтерпретируемый язык? Приехали )
И какие тут нужны ссылки?

> Скорее всего, речь идет о том, как можно обращаться к переменным resulttX, где X может принимать значения 1, 2, 3 и т.д

Пойду я лучше домой. Сами разбирайтесь.

И. Павел (2011-09-16 15:10:00) [11]
> Мой телепатор не справился.

Скорее всего, речь идет о том, как можно обращаться к переменным resulttX, где X может принимать значения 1, 2, 3 и т.д. В PHP все просто, а в неинтерпретируемых языках уже нужны ссылки.

Омлет (2011-09-16 13:31:00) [12]
Мой телепатор не справился.

Anatoly Podgoretsky (2011-09-16 12:12:00) [13]
Тут массив rezultt[1-10] нужен

И. Павел (2011-09-16 10:50:00) [14]
Все, понял, видимо, нужно

1: resultt1:=1;
2: resultt 2:=2;
и т.д.

Если это единичный случай - то по моему, пойдет и такой код. А если групполвые операции с result встречаются часто, то есть смысл завести массив указателей на переменные result и использовать его.

И. Павел (2011-09-16 10:48:00) [15]
Код из [1] почти эквивалентен:
resultt1 := TrackBar.Position;

alexdn (2011-09-16 10:44:00) [16]
> И. Павел © (16.09.11 10:36) [2]
а что) сам придумал, но работает.. если есть другие версии я не против посмотреть.

И. Павел (2011-09-16 10:36:00) [17]
> [1] alexdn © (16.09.11 10:29)

Это шутка?

alexdn (2011-09-16 10:29:00) [18]
зделал так, но этоскорее личные измышления -
case TrackBar.Position of 1: resultt1:=1; 2: resultt1:=2; 3: resultt1:=3; 4: resultt1:=4; 5: resultt1:=5; 6: resultt1:=6; 7: resultt1:=7; 8: resultt1:=8; 9: resultt1:=9; 10: resultt1:=10; end;

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »