TrackBar

← →
alexdn © (2011-09-16 10:05) [0]

Здравствуйте! раньше никогда не использовал компонент TrackBar, подскажите плиз, какой код в нём нужно использовать, чтобы получить на выходе rezult[1-10] и дальше его уже применять?..

← →
alexdn © (2011-09-16 10:29) [1]

зделал так, но этоскорее личные измышления -
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;

← →
И. Павел © (2011-09-16 10:36) [2]

> [1] alexdn © (16.09.11 10:29)

Это шутка?

← →
alexdn © (2011-09-16 10:44) [3]

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

← →
И. Павел © (2011-09-16 10:48) [4]

Код из [1] почти эквивалентен:
resultt1 := TrackBar.Position;

← →
И. Павел © (2011-09-16 10:50) [5]

Все, понял, видимо, нужно

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

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

← →
Anatoly Podgoretsky © (2011-09-16 12:12) [6]

Тут массив rezultt[1-10] нужен

← →
Омлет © (2011-09-16 13:31) [7]

Мой телепатор не справился.

← →
И. Павел © (2011-09-16 15:10) [8]

> Мой телепатор не справился.

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

← →
Омлет © (2011-09-16 15:29) [9]

> И. Павел © (16.09.11 15:10) [8]

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

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

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

← →
И. Павел © (2011-09-16 15:52) [10]

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

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

← →
Ega23 © (2011-09-16 16:02) [11]

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

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

← →
Омлет © (2011-09-16 16:11) [12]

> И. Павел © (16.09.11 15:52) [10]

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

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

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

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

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

Вам делать больше нечего ? один идиот спросил, остальные спорят

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

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

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

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

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

Уточните свой вопрос. Вот есть 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;

TrackBar Найти похожие ветки