spring4d

1热度

1回答

我无法在运行时正确创建并填充spring4d ObjectDataSet，“Field ID没有数据集”（在设计时创建字段正常工作）的异常下面是我的代码： procedure TForm2.FormCreate(Sender: TObject); var _id: TIntegerField; _designation: TStringField; _dataset

2热度

2回答

如何Spring4d

我想下面的代码来创建一个不区分大小写的IList创建和使用不敏感的IList 的情况下： procedure TForm1.ListButtonClick(Sender: TObject); var MyList: IList<string>; begin MyList := TCollections.CreateList<string>(TStringComparer.O

2热度

1回答

我为什么要使用TCollections.CreateList <T>而不是TList <T>。创建

我将map（），reduce（）和where（qlint：string）添加到了我的Spring4D分支。当我编程这些函数时，我发现列表的行为有不同，当它们以不同的方式创建时。如果我用TList<TSomeClass>.create创建它们，枚举类型中的对象的类型为TSomeClass。如果我用TCollections.CreateList<TSomeClass>创建它们，枚举类型中的对象的

1热度

1回答

Spring4d - ObjectDataset刷新没有从底层IObjectList获取记录

我正在使用Spring4d TObjectDataset以及从TListBase<TObject>派生的自定义IObjectList适配器。我使用this SOA作为基础，虽然它使用TObjectList，我使用TCollection。我的TObjectDataset.Datalist属性设置为这个适配器的新实例。但是，如果我添加条目直接进入下面的TCollection，并创下TObjectDa

2热度

1回答

AOP和DI：如何创建一个方面感知接口的依赖注入对象？

我想通过Spring/4D框架的方式创建一个方面感知的接口依赖注入对象。我的问题是，我不知道如何组合这两个部分。总的想法是：创建方面层对象和保持两个接口到它：一个通过作为依赖于所述对象（IAspect）和一个编织在作为一方面到物体（IInterceptor ）： Temp := TAspect.Create; Aspect := Temp as IAspect; Interceptor :=

4热度

1回答

德尔福 - 如何使用通用接口GUID支持？

（代码如下）我正在用Delphi和Spring4d库编写事件总线。我被Spring4d库样本的启发（基于事件的体系结构）基本上，事件总线允许向用户添加到它允许分派事件给用户我很感兴趣这里的subscribe方法 TEventBus.subscribe(aHandler : TInterfacedObject; aEvtGuid : TGUID); 我有问题，找到如果给定aHandl

2热度

1回答

如何在Spring4D中使用多接口类如何在Spring4D中使用多接口类

我刚刚学习Spring4D，我有一个问题。如果类实现一个接口它都清楚： IWeapon = interface ['{E679EDA6-5D43-44AD-8F96-3B5BD43A147B}'] procedure Attack; end; TSword = class(TInterfacedObject, IWeapon) public

4热度

1回答

Spring4d：如何“强制”容器相信一个类实现了一个接口

我正在使用RemObjects DataAbstract和Spring4d。 RemObjects生成一个SchemaServer_Intf.pas文件，其中包含存在于其模式中的每种表的接口。它允许“强类型”数据集，允许一个访问使用 (aDataSet as IMyDataSet).MyField := aValue 这里的一场是由DataAbstract IEntiteType = inte

3热度

2回答

Spring4d：拥有Owner：TComponent参数的自动工厂？

随着Spring4d，你可以像这样 aContainer.RegisterInstance<TFunc<string, TMyObject>>(function(aName : string):TMyObject begin Result := TMyObject.Create(aName); end); 以这种方式注册自定义的工厂，我会beleive，对于每一个从TCompon

1热度

1回答

如何将Container1.Resolve <T>委派给Container2.Resolve <T>，如果Container1无法解析T？

使用Spring4D，我想建立一个容器，委托服务解决方案到另一个容器，如果它不能解析服务 - 这些方针的东西： function TContainer.Resolve<T>: T; begin if not TryResolve<T>(Result) then Result := OtherContainer.Resolve<T>; end; 这可能吗？如果是，如何？