+1 800 256 3608 (toll-free in North America) or +49 7531 90 60 10| service@combit.com

PictureBox.Image als Result-Value von Designer Function


(Guest) #1

Hi,

ich möchte gerne eine eigene DesignerFunction einem LL16 Report hinzufügen, in dem ich ein selbst generiertes (dynamisches) Image übergebe.

Leider bleibt das Image-Feld im Report aber immer leer.

Kann mir jemand sagen was ich falsch mache und wie ich ein dynamisch erzeugtes Bild aus meiner VB.NET (VS2010) Anwendung in den Bericht bekomme?

Hier mein Code:

Dim WithEvents MyImageGenerator As New DesignerFunction()

Private Sub LLAddImageGenerator()
  MyImageGenerator.FunctionName = "MyImageGenerator"
  MyImageGenerator.GroupName = "My Callbacks"
  MyImageGenerator.MinimalParameters = 1
  MyImageGenerator.MaximumParameters = 1
  MyImageGenerator.ResultType = LlParamType.Drawing
  LL.DesignerFunctions.Add(MyImageGenerator)

End Sub

Sub MyImageGenerator_EvaluateFunction(ByVal sender As Object, ByVal e As EvaluateFunctionEventArgs) Handles MyImageGenerator.EvaluateFunction
Dim pic As New PictureBox

  Try

     pic.Image = System.Drawing.Image.FromFile("SAMPLE.BMP")
     'später: pic.Image = ImageGenerator.GenerateImage(e.Parameter1)
     
     e.ResultValue = pic.Image

  Catch ex As Exception

  End Try

End Sub

(eventuell geht das auch mit DesignerObjekt(), aber dazu finde ich keinerlei Code Beispiele)
Ich bin über jeden Hinweis dankbar.

Vielen Dank im Voraus
Ole Grossklaus