Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 04.07.2008, 13:45   #1
Petrucci
Пользователь
 
Регистрация: 03.07.2008
Сообщений: 17
По умолчанию TComboBox (ввод чисел в верхнюю позицию)

Доброго время суток!
Подскажите как можно реализовать возможность добавления значений в верхнюю позицию!(по умолчанию добавляеться в нижнюю)

и как указать максимальное количество хранимых результатов в выпадающем меню (не отображаемых, а именно хранимых)
Petrucci вне форума Ответить с цитированием
Старый 04.07.2008, 13:50   #2
Старовъръ
Форумчанин
 
Аватар для Старовъръ
 
Регистрация: 25.06.2008
Сообщений: 100
По умолчанию

Насчет второго вопроса: это внутренняя реализация проекта. Должно быть разделение между Моделью, Контроллером, Отображением. Компонент должен отвечать только за отображение данных. Хранение данных, добавление, изменение и т.д. и т.п. - это все внутренняя(модельная) организация.
Старовъръ вне форума Ответить с цитированием
Старый 04.07.2008, 14:08   #3
Petrucci
Пользователь
 
Регистрация: 03.07.2008
Сообщений: 17
По умолчанию

Цитата:
Сообщение от Старовъръ Посмотреть сообщение
Насчет второго вопроса: это внутренняя реализация проекта. Должно быть разделение между Моделью, Контроллером, Отображением. Компонент должен отвечать только за отображение данных. Хранение данных, добавление, изменение и т.д. и т.п. - это все внутренняя(модельная) организация.
тут под отображением имелось ввиду свойство DropDownCount которое показывает в видимой области количество пунктов указанное в нем, а к остальным можно добраться со скролом! а мне надо что бы удалялось первое значение при введении 4-го, если максимально допустимое 3(три)
Petrucci вне форума Ответить с цитированием
Старый 04.07.2008, 14:15   #4
_Engine_
Форумчанин
 
Регистрация: 29.06.2008
Сообщений: 603
По умолчанию

на счет первой части вопроса:
Combobox1.Items.Insert(0, 'Текст');

чтобы удалялось первое при вводе 4-го:
if ComboBox1.Items.Count > 3 then
ComboBox1.Items.Delete(0);
_Engine_ вне форума Ответить с цитированием
Старый 04.07.2008, 14:18   #5
Старовъръ
Форумчанин
 
Аватар для Старовъръ
 
Регистрация: 25.06.2008
Сообщений: 100
По умолчанию

Ну, я про это и говорил. Ну ладно, как говорится, мы друг друга поняли
Старовъръ вне форума Ответить с цитированием
Старый 05.07.2008, 16:09   #6
Petrucci
Пользователь
 
Регистрация: 03.07.2008
Сообщений: 17
По умолчанию

Цитата:
чтобы удалялось первое при вводе 4-го:
if ComboBox1.Items.Count > 3 then
ComboBox1.Items.Delete(0);
спасибо работает, но когда такая проверка должна быть не в одном месте становиться не совсем удобно...

как сделать что бы проверка была постоянной, т.е. выбираем кол-во хранимых значений в TComboBox с помощью TSpinEdit. Что бы было еще понятней это калькулятор в котором все вводимые и выводимые значения должны сохраняться в ComboBox но кол-во этих значений необходимо задавать...
Petrucci вне форума Ответить с цитированием
Старый 07.07.2008, 08:47   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
как сделать что бы проверка была постоянной
А где ты добавляешь в Комбик данные? Вот ту строчку добавления выдели в отдельную процедуру, и там же пропиши этот код, а усаму процедуру вызывай в местах добавления.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 08.07.2008, 14:26   #8
Petrucci
Пользователь
 
Регистрация: 03.07.2008
Сообщений: 17
По умолчанию

Всем огромное спасибо за помощь!
добавление в верхнюю позицию было реализовано с помощью
Код:
combobox1.Items.Insert(0,edit1.Text);
а контроль хранимых значений сделал так
Код:
procedure TForm1.ComboBox1DropDown(Sender: TObject);
var i2:integer;
begin
if spinedit2.Value<combobox1.Items.count then
begin
for i2:=combobox1.Items.Count downto spinedit2.Value do
combobox1.Items.Delete(i2);
end;
end;
P.S.: если кому интересно могу выложить готовый калькулятор, вместе с исходником, только не знаю как и куда
Petrucci вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Ввод чисел с клавиатуры SAVIK Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 19 26.05.2008 12:54
ввод чисел со знаком... maLoy*508 Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 2 21.05.2008 19:32
Ввод последовательности чисел POPOV Общие вопросы Delphi 5 16.02.2008 22:13
ввод, запись массива чисел в файл Sairut Помощь студентам 1 11.12.2007 23:19
ввод чисел bruce Microsoft Office Excel 1 08.02.2007 17:58