I found the issue myself:
In this method:
function TtiMediatorDef.Handles(ASubject: TtiObject; AGUI: TComponent;
APropInfo: PPropInfo): Boolean;
var
N: string;
begin
if (APropInfo = nil) then
Result := FMC.CompositeMediator
else
begin
N := string(APropInfo^.Name);
Result := True;
end;
if not Result then
Exit; // ==>
// At least the classes must match
Result := AGUI.InheritsFrom(FMC.ComponentClass) and
ASubject.InheritsFrom(FMSC);
if Result and not FMC.CompositeMediator then
if (PropertyName <> '') then
Result := (CompareText(N, PropertyName) = 0)
else // Property kind should match. Note that property MUST be set
to something.
Result := (APropInfo^.PropType^.Kind in PropertyTypes); // If
PropertyName is set, it must match
end;
The line "Result := (APropInfo^.PropType^.Kind in PropertyTypes);" gives
a wrong result this is because in D2010 the APropInfo^.PropType^.Kind is
of type Unicode string ( tkUString ) but the Mediator is not registeren
for this type of property (tiDeMediators .pas)
=> gMediatorManager.RegisterMediator(TticxTextEditMediatorView,
TtiObject, [tkString,tkLString,tkInteger,tkFloat]);
Op 29/06/2010 14:16, Werner Schoenmaekers schreef:
> Hi,
>
> We do not have the treelist from Devexpress, so I commented some of the
> code in tiDeMediators.
>
> The sample application gives an error:
>
> Project XXXX raised exception class EtiMediator with message
> 'tiModelMediator1 : Cannot find a mediator for control cxMaskEdit1
> (TcxMaskEdit), property TestString.'.
>
> Did anyone manage to run this sample application with tiOPF3 and D2010?
>
>
> ------------------------------------------------------------------------------
> This SF.net email is sponsored by Sprint
> What will you do first with EVO, the first 4G phone?
> Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
------------------------------------------------------------------------------
This SF.net email is sponsored by Sprint
What will you do first with EVO, the first 4G phone?
Visit sprint.com/first -- http://p.sf.net/sfu/sprint-com-first
_______________________________________________
tiOPF-talk mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/tiopf-talk
