On Sun, Mar 22, 2009 at 16:37, Alexander Klenin <[email protected]> wrote:
> 1) apply the attached patch
I somehow managed to save incorrect patch. Please use this version instead.
--
Alexander S. Klenin
Index: propedits.pp
===================================================================
--- propedits.pp (revision 19058)
+++ propedits.pp (working copy)
@@ -6811,7 +6811,7 @@
if not (propList^[i]^.PropType^.Kind in AFilter + [tkClass]) then continue;
edClass := GetEditorClass(propList^[i], A.GetComponent(0));
if edClass = nil then continue;
- ed := edClass.Create(nil, 1);
+ ed := edClass.Create(AEditor.FPropertyHook, 1);
try
ed.SetPropEntry(0, A.GetComponent(0), propList^[i]);
ed.Initialize;
_______________________________________________
Lazarus mailing list
[email protected]
http://www.lazarus.freepascal.org/mailman/listinfo/lazarus
