Форум: "Основная";
Текущий архив: 2003.04.24;
Скачать: [xml.tar.bz2];

Вниз

Редакторый войст умирают.   Найти похожие ветки 

← →
malkolinge   (2003-04-11 17:46) [0]


RegisterComponents("Vimas New Visual", [TvmsDBTreeView]);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "RootField", TvmsRootFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "KeyField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "ListField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "ImageField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "ParentField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "ChildField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeView, "QuickSearchField", TvmsListFieldProperty);

RegisterComponents("Vimas New Visual", [TvmsDBTreeComboBox]);

RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "RootField", TvmsRootFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "KeyField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "ListField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "ImageField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "ParentField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "ChildField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBTreeComboBox, "QuickSearchField", TvmsListFieldProperty);

RegisterComponents("Vimas New Visual", [TvmsDBMultiLookUpBox]);
RegisterPropertyEditor(TypeInfo(string), TvmsDBMultiLookUpBox, "KeyField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBMultiLookUpBox, "ListField", TvmsListFieldProperty);
RegisterPropertyEditor(TypeInfo(string), TvmsDBMultiLookUpBox, "QuickSearchField", TvmsListFieldProperty);

RegisterComponents("Vimas New Modificators", [TvmsIndependentDataSetModifier, TvmsCustomModification]);
RegisterComponents("Vimas Dev Tools", [TvmsDialogStrategyDirector, TvmsMemData, TvmsIbxLogin]);

RegisterComponents("Vimas New Visual", [TvmsUpDownListBox, TvmsMenuButton, TvmsGridCard, TvmsBitBtn, TToolsGrid,
TVimasDBTelePusik, TVmsDBFieldCaption]);


Проблема в том, что для ОДНОИМЕННЫХ свойств остальных(даже стандартных) компонентов редакторы свойств попросту отрубаються. Что делать ? Помогите а ?

---

← →
Skier   (2003-04-11 17:55) [1]

Объявить свой строковые (в данном случае) типы

Например :

TYourRootField = type string;
TYourKeyField = type string;

//...........................

RegisterPropertyEditor(TypeInfo(TYourRootField), TvmsDBTreeView, "RootField", TvmsRootFieldProperty);

RegisterPropertyEditor(TypeInfo(TYourKeyField), TvmsDBTreeView, "KeyField", TvmsListFieldProperty);

//...........................

---

← →
malkolinge   (2003-04-11 17:58) [2]

И компоненты переписывать ? точнее интерфесы менять...мда...спасибо огромное но неужели нету лдругого решения ?

---

← →
malkolinge   (2003-04-14 13:13) [3]

Неужели никто не знает ? :( все теперь точно попрут с работы :(

---

← →
Skier   (2003-04-14 13:20) [4]

>malkolinge
1) см. Skier © (11.04.03 17:55)
2) можно переименовать св-ва, которые по совпадают с дельфийскими
3) нужно думать когда заваёшь имена свойств...ну,...чтобы не
плакать потом...:)
4)
> все теперь точно попрут с работы :(
Мои соболезнования :)

---

← →
Anatoly Podgoretsky   (2003-04-14 13:35) [5]

Пункт 3

---

← →
malkolinge   (2003-04-14 13:52) [6]

Слушай но стандартные имена ДЛЯ стандартных свойст - правильно..Иначе вообще нельзя !

---

← →
malkolinge   (2003-04-14 13:56) [7]

> Anatoly Podgoretsky © (14.04.03 13:35)
> Пункт 3

Если я пишу грид ДБ. С НУЛЯ.. То КАк я должен назвать DataField ?

---

← →
malkolinge   (2003-04-14 14:05) [8]

> Anatoly Podgoretsky ©

Вы при разработке СВОИХ компонент тоже так делаете ? Только честно ?

---

← →
REA   (2003-04-14 14:52) [9]

Насчет думать когда называешь: сколько раз пытался что-то сделать сам (например TObjectList, TClassList, TColorBox), а Borland в следующей версии компилятора свои классы так же называет. И попробуй ему докажи, что он не прав.

---

← →
malkolinge   (2003-04-14 14:55) [10]

TColorBox - Сие имена классов. А имена свойств...Определение инкапусуляции помните ? так вот запрет использования для имен свойств, уже где-то используемых - прямое противоречие этой концепции

---

← →
Skier   (2003-04-14 14:58) [11]

>REA
Советую в следующий раз использовать какой-нибудь префикс
(кстати он есть у всех мало-мальски серьёзных библиотек :
RX, LMD,...)
Например так :

TREAObjectList, TREAClassList, TREAColorBox :)

---

← →
malkolinge   (2003-04-14 15:19) [12]

> TREAObjectList, TREAClassList, TREAColorBox :)

С эти согласен на все сто но все таки :

procedure RegisterPropertyEditor(PropertyType: PTypeInfo; ComponentClass: TClass; const PropertyName: string; EditorClass: TPropertyEditorClass);

Из описания, следует что для ЛЮбого Свйоства Любого класса любого типа можно зарегестрировать свой редактор свойсв....Так чегож тогда не понимаю я ?

---

← →
malkolinge   (2003-04-14 17:26) [13]

Так никто и ничего не придумал ?

---

← →
REA   (2003-04-14 17:46) [14]

Ты хочешь ничего не переписывать и при этом чтобы все работало?
Вряд ли получится.
Решение типа TYourRootField = type string; на мой взгляд наиболее логично.
А попроще примера нет? По-идее класс там явно указан и не должно быть пересечений.

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.04.24;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.48 MB
Время: 0.008 c