Verschiedenes #

Weitere nützliche Funktionen, die keiner spezifischen Kategorie zugeordnet sind.

Farb-Konvertierung #

WebStrToColor(Value: String): Integer

Wandelt einen Web-Farbstring (z.B. “#FF0000”) in einen Integer-Farbwert um.

Dim farbe
farbe = ellib.WebStrToColor("#FF6600")

ColorToWebStr(Value: Integer): String

Wandelt einen Integer-Farbwert in einen Web-Farbstring um.

Dim webFarbe
webFarbe = ellib.ColorToWebStr(255)
MsgBox webFarbe
' Ergebnis: "#0000FF"

TextToRtf(Text: String, FontName: String, FontSize: Integer): String

Wandelt einen einfachen Text in ein vollständiges RTF-Dokument um.

Dim rtf
rtf = ellib.TextToRtf("Hallo Welt", "Arial", 12)
ellib.SaveString rtf, "C:\Temp\ausgabe.rtf"

TextToRtfFragment(Text: String): String

Wandelt einen Text in ein RTF-Fragment um (ohne RTF-Header). Kann in bestehende RTF-Dokumente eingefügt werden.

HtmlToRtf(Html: String, FontName: String, FontSize: Integer): String

Wandelt HTML-Text in RTF um.

VbScriptToHtml(Source: String): String

Wandelt VBScript-Quellcode in HTML mit Syntaxhervorhebung um.

SqlToHtml(Source: String): String

Wandelt SQL-Quellcode in HTML mit Syntaxhervorhebung um.

ClearVbScriptRemarks(Source: String): String

Entfernt alle Kommentare aus VBScript-Quellcode.

RenderSingleInfoband(BandName: String, ID: Integer): String

Rendert ein einzelnes Kurzinfo-Band für einen bestimmten Datensatz.

RenderSingleInfobandEx(BandName: String, ID: Integer, Params: String, Options: String): String

Erweiterte Version mit zusätzlichen Parametern und Optionen.

RenderTemplate(DOC: String, TemplateName: String, ID: Integer): String

Rendert ein Template für einen bestimmten Datensatz.

Dim html
html = ellib.RenderTemplate("Eulanda.Rechnung", "Standard", 4711)

RenderTemplateExt(DOC: String, TemplateName: String, ID: Integer, Options: String): String

Erweiterte Template-Darstellung mit Optionen.

RenderSSI(Source: String): String

Verarbeitet Server-Side-Includes (SSI) in einem Text. Der Mechanismus entspricht dem der Registry-Webseiten.

Dim result
result = ellib.RenderSSI("Hallo <!--#INCLUDE VIRTUAL='/include/header.htm'-->")

Funktionen zum Abfragen des aktuell fokussierten Steuerelements in der EULANDA-Oberfläche.

ActiveControlFieldname: String

Gibt den Feldnamen des aktuell fokussierten Eingabefelds zurück.

ActiveControlDataobject: String

Gibt den Namen des Datenobjekts des fokussierten Steuerelements zurück.

ActiveControlLeft: Integer
ActiveControlTop: Integer
ActiveControlWidth: Integer
ActiveControlHeight: Integer

Geben Position und Größe des fokussierten Steuerelements in Pixeln zurück.

MsgBox "Feld: " & ellib.ActiveControlFieldname & vbCrLf & _
       "Position: " & ellib.ActiveControlLeft & "," & ellib.ActiveControlTop