freepascal.ru

Начал делать новый компонент - TRxDateRangeEdit
Предназначен для выбора периода - месяц и год.
Жду пожеланий и замечаний.
В планах реализовать DB вариант данной компоненты.

Добавлено спустя 29 секунд:
Если у кого есть красивая пиктограмка для компоненты - тоже буду рад.

Добрый день. Можно опционально в компонент добавить выбор квартал, год, полугодие. На пример, я делал на наследовании от TComboBox

procedure TmoMonthComboBox.Loaded;
begin
inherited;
if {(csLoading in ComponentState) or }(csDesigning in ComponentState) then exit;
LoadItems;
end;


procedure TmoMonthComboBox.LoadItems;
begin
with Items do
begin
if not OneMonth then Add('Год');
Add('Январь');
Add('Февраль');
Add('Март');
Add('Апрель');
Add('Май');
Add('Июнь');
Add('Июль');
Add('Август');
Add('Сентябрь');
Add('Октябрь');
Add('Ноябрь');
Add('Декабрь');
if not OneMonth then Add('1-й квартал');
if not OneMonth then Add('2-й квартал');
if not OneMonth then Add('3-й квартал');
if not OneMonth then Add('4-й квартал');
if not OneMonth then Add('полугодие');
ItemIndex := 0;
end;
end;

Спасибо за предложение. Доработаю

Добавлено спустя 4 часа 11 минут 57 секунд:
Реализовал.
Теперь есть возможность настроить поведение - выбор месяц/квартал/полугодие