class TCustomEditor : public TDefaultEditor
{
protected:
virtual void __fastcall EditProperty(const Designintf::_di_IProperty Prop,
bool &Continue);
};
void __fastcall TCustomEditor::EditProperty(const Designintf::_di_IProperty Prop,
bool &Continue)
{
if (CompareText(Prop->GetName(), "TARGET") == 0)
{
Prop->Edit();
Continue = false;
}
else
inherited::EditProperty(Prop, Continue);
}
Continue 가 false 가 될 때까지 모든 Property 에 대하여 순서대로 EditProperty 가 호출된다.
대소문자 구분없이 Property name 을 비교하여 Edit 를 하고 Continue = false; 를 하면 된다.
'Windows > RAD Studio' 카테고리의 다른 글
[RAD] TZipBuilder 설치 순서 (0) | 2008.05.27 |
---|---|
[RAD] TListBox (0) | 2008.05.27 |
[RAD] VCL Package 에서 Register 유닛 생성시 주의사항 (0) | 2008.05.20 |
[RAD] TCollection 사용시 주의사항 (0) | 2008.05.20 |
[RAD] 16진 문자열을 숫자로 변환 (0) | 2008.05.14 |