BlueM.DLLAdapter: Difference between revisions

From BlueM
Jump to navigation Jump to search
(→‎Anwendungsbeispiel: Finish() sowohl in Try als auch in Catch)
Line 38: Line 38:
         Call bluem_dll.PerformTimeStep()
         Call bluem_dll.PerformTimeStep()
     Loop
     Loop
    'Simulationszeitraum abgearbeitet
    simOK = True


     'Simulation abschliessen
     'Simulation abschliessen
Line 47: Line 44:
     'Simulation abgeschlossen
     'Simulation abgeschlossen
     MsgBox("Simulation erfolgreich!", MsgBoxStyle.Information, "BlueM")
     MsgBox("Simulation erfolgreich!", MsgBoxStyle.Information, "BlueM")
    simOK = True


Catch ex As Exception
Catch ex As Exception
Line 60: Line 59:
Finally
Finally


     'BlueM.dll deallokieren
     'Ressourcen deallokieren
     Call bluem_dll.Dispose()
     Call bluem_dll.Dispose()



Revision as of 06:17, 10 July 2008

BlueM.DLLAdapter ist ein .NET Wrapper zum Ansprechen des BlueM Rechenkerns in DLL-Form.

Schnittstellendefinitionen

Klassendiagramm

Nachfolgend werden die Schnittstellen-Methoden zur Kommunikation mit der BlueM DLL mit den zugehörigen Übergabe- bzw. Rückgabeparametern aufgelistet.

Falls ein Fehler auftritt wird die Methode CreateAndThrowException aufgerufen (schmeisst einen Fehler).

Basismethoden

Initialize <csharp>public void Initialize(string filePath)</csharp>

filePath ist der Absolute Pfad mit dem Projektnamen ohne die Dateiendung .ALL (Bsp.: "D:\Simulation\TSIM").
Das System wird initialisiert und alle zugehörigen Daten aus den Simulationsdateien geladen.

PerformTimeStep <csharp>public void PerformTimeStep()</csharp>

Berechnet den nächsten Zeitschritt.

Finish / Dispose <csharp>

public void Finish()
public void Dispose()

</csharp>

Schliessen aller Dateien und Freigabe des Speichers

Anwendungsbeispiel

Beispiel zur Nutzung des Bluem.DLLAdapters zur Simulation mittels BlueM.dll in VB.NET: <vbnet> bluem_dll = New BlueM_EngineDotNetAccess("Pfad-zu-BlueM.dll")

Try

   Call bluem_dll.Initialize("Pfad-zu-Datensatz")
   Dim SimEnde As DateTime = BlueM_EngineDotNetAccess.DateTime(bluem_dll.GetSimulationEndDate())
   'Schleife über Simulationszeitraum 
   Do While (BlueM_EngineDotNetAccess.DateTime(bluem_dll.GetCurrentTime) <= SimEnde)
       Call bluem_dll.PerformTimeStep()
   Loop
   'Simulation abschliessen
   Call bluem_dll.Finish()
   'Simulation abgeschlossen
   MsgBox("Simulation erfolgreich!", MsgBoxStyle.Information, "BlueM")
   simOK = True

Catch ex As Exception

   'Simulationsfehler aufgetreten
   MsgBox(ex.Message, MsgBoxStyle.Exclamation, "BlueM")
   'Simulation abschliessen
   Call bluem_dll.Finish()
   simOK = False

Finally

   'Ressourcen deallokieren
   Call bluem_dll.Dispose()

End Try </vbnet>