Написание своих компонентов

[***СкаЙ***]

Дали задание написать свой компонент. Подскажите какую-нибуть идею, можна даже показать, ток не очень сложную и не замысловатую.
Зарание спасиба

[zetrix]

Сделай компонент типа Image, но чтоб выводил анимированный BMP.
Думаю это реально, красиво и применимо.
В свойствах должно указываться
интервал анимации: integer,
по кругу анимация, или нет : boolean;
... что-нибудь ещё.

[Killer_djon]

Очень часто всех мучает вопрос о том как зделать, чтобы в компонент Edit воодилось определенное значение, например только цифры или диапазон значений, например цифры 0 и 1, тоже неплохая идея, да и поможешь многим в решении данной проблемы

[Virtson]

для этого есть TmaskEdit

[Shuraken]

Для этого можно просто добавить пару строчек кода, как например

procedure TForm1.Edit1KeyPress(Sender; TObject; key: Word);
beign
key := UpCase(key);
if not (key in [диапазон через запятую]) then
begin
key := #0;
beep;
end;
end;