Помогите с созданием своего компонента.

В общем хочется реализовать что-то типа TShape. только самому. Наследование идет от TControl. Но чего-то не могу понять. Как сделать чтобы компонент прорисовывался на форме? Чтобы мышкой его размеры менялись? У TShape за это отвечают функции
protected:
virtual void __fastcall Paint(void);
__published:
void __fastcall StyleChanged(System::TObject* Sender);
или что-то другое?
И если Paint() рисует, то откуда она знает на какой форме ей рисовать?