Question

我是新来的人，我正在使用DevExpress XAF在XAF平台上创建我的Win和Web应用程序，但是找不到在XAF中使用n_partitions = int(math.ceil(dataframe.count() / float(file_size))) #where file_size can be 500 records. dataframe1 = DynamicFrame.toDF(dataframe).repartition(n_partitions)的明确答案。

假设我在SQL Server中已经有数据库。当我添加ORM数据建模向导来构建类时，我具有Image字段（varbinary（max）），并且在属性中看到CUSTOM ATTRIBUTE，我想使用它。

Edit Attribute Screen

应用程序运行时，最终用户可以剪切，复制，粘贴，删除，加载，保存

为此，我使用了CUSTOM ATTRIBUTE：Private Sub Worksheet_Change(ByVal Target As Range) Const RNG_VENDOR As String = "B6:B37,B46:B77" Dim v, f As Range, vendor, vendorCount If Target.Count > 1 Then Exit Sub If Intersect(Target, Me.Range(RNG_VENDOR)) Is Nothing Then Exit Sub v = Target.Value If IsNumeric(v) And Len(v) > 0 Then 'see if there's a numeric match Set f = Sheet8.Range("A:A").Find(v, lookat:=xlWhole, LookIn:=xlValues) If Not f Is Nothing Then vendor = f.EntireRow.Cells(1, "B").Value 'get the vendor name '#### edit below to fix lookup range vendorCount = Application.CountIf(Me.Range("B6:B77"), vendor) 'count any existing 'update the vendors sheet? With f.EntireRow.Cells(1, "J") If vendorCount = 0 Then .Value = .Value + 1 End With Application.EnableEvents = False Target.Value = vendor 'switch from vendor number to vendor name Application.EnableEvents = True Else Application.EnableEvents = False Target.Value = "" 'clear the value Application.EnableEvents = True MsgBox "The Vendor number '" & v & "' entered is not listed....", vbExclamation End If 'was found End If 'is a number End Sub

但是我希望最终用户也能够从他们的相机中获取照片，以获取此自定义属性。

Answer 1

您需要提供代码以实现您的用户功能。 DevExpress XAF框架并不能为您做任何事情。

为此，XAF方法通常是使用ViewController创建一个SimpleAction。有a tutorial for this。然后，您需要编写代码以与相机接口（DevExpress不为此提供任何代码）。您可以使用以下方法将捕获的图像分配给属性编辑器：

((MyBusinessObject)View.CurrentObject).MyImageProperty = theImage;

从屏幕快照中可以看出，就像您正在构建Windows Forms XAF应用程序一样，但是该方法对于Web和移动平台将是相似的。

Data Model Wizard帮助您创建代表数据模型的C＃类并将其映射到基础SQL表。除了此映射之外，它不提供任何定义功能的能力。

将ImageEditor分配给属性时，您要做的就是通知框架varbinary列中存储的数据是图像，并且XAF为此自动分配了适当的属性编辑器（提供加载，保存等）

DevExpress XAF中的自定义属性

1 个答案: