Zweck
Setzt für einen bestimmten Zustand des bBrowser einen Text, ein Icon, eine Bitmap oder ein bCompoundValue als Info-Wert.
Klasse
Typ
Methode
Syntax
<oBrowser>:SetInfo(
<iInfoState>,
<uInfo>
) Æ lSuccess
Argumente
<iInfoState> | Zustand, zu dem der Info-Wert gesetzt werden soll. Die folgende Tabelle listet die unterstützten Zustände auf: |
Zustand |
Beschreibung |
BINFO_INREADPROCESS |
Der bBrowser liest über eine langsame Verbindung Daten ein. |
BINFO_NORECORDS |
Der Datenserver, der mit dem Browser verknüpft ist, enthält keine Datensätze. Dieser Zustand tritt auch auf, wenn beispielsweise ein Filter oder eine selektive Relation keine Ergebnismenge hat. |
BINFO_NOSERVER |
Der Browser ist mit keinen Datenserver verknüpft. |
BINFO_SERVERNOTUSED |
Der Datenserver, der mit dem Browser verknüpft ist, ist nicht geöffnet. |
Datentyp: | Int |
<uInfo> | Wert, der zu dem Zustand gesetzt werden soll. |
Datentyp: | String | Icon | Bitmap | bCompoundValue |
Rückgabewert
lSuccess | Logischer Wert der definiert, ob der Info-Wert gesetzt werden konnte. |
TRUE | Der Info-Wert konnte gesetzt werden. |
FALSE | Der Info-Wert konnte nicht gesetzt werden. |
Datentyp: | Logic |
Beschreibung
Im bBrowser gibt es mehrere Zustände, in denen dieser keine Daten anzeigen kann. Solch ein Zustand kann z.B. auftreten, wenn im verknüpften Datenserver eine Filterbedingung gesetzt ist, zu der keine Datensätze existieren. In diesem Fall kann ein Info-Wert (Text, Icon, Bitmap, bCompoundValue) im Datenbereich des bBrowser angezeigt werden.
Wenn für den Zustand BINFO_INREADPROCESS ein String übergeben wird, dann können in dem String die folgenden Variablen verwendet werden:
Variable |
Beschreibung |
%RecCount% |
Die Variable wird mit dem Wert aus dem Zugriff bInfoInReadProcess:RecCount ersetzt. |
%RecPos% |
Die Variable wird mit dem Wert aus dem Zugriff bInfoInReadProcess:RecPos ersetzt. |
Die Variablen werden beim Lesen der Daten automatisch vom bBrowser mit den entsprechenden Werten ersetzt. Hierdurch kann eine Fortschrittsanzeige beim Lesen der Daten implementiert werden. Zusätzlich zu dem Info-Wert muss in diesem Fall noch ein Objekt der Klasse bInfoInReadProcess mit der Methode bBrowser:SetInfoData() definiert werden. Das Objekt definiert unter anderem das Intervall, in dem die Fortschrittsanzeige aktualisiert wird. Wenn dieses Objekt nicht gesetzt wird, dann erfolgt auch keine Fortschrittsanzeige.
Mit dem Zugriff bBrowser:InfoView kann die Anzeige des Info-Wertes formatiert werden. Bei einem Text als Info-Wert kann z.B. die Schriftart und die Vorder- bzw. Hintergrundfarbe definiert werden.
Damit der gesetzte Info-Wert auch im bBrowser angezeigt wird, muss dieser über die Methode bBrowser:Redraw() neu gezeichnet werden.
Beispiele
In dem folgenden Beispiel werden für alle unterstützten Zustände Texte als Info-Werte gesetzt.
// Datenserver öffnen
odbsCUSTOMER := DBServer{"CUSTOMER"}
IF odbsCUSTOMER:Used
// Browser erzeugen
oBrowser := bBrowser{oOwner,;
1000,;
Point{0, 0},;
Dimension{300, 250}}
// ViewStyle für die Info-Werte setzen
oBrowser:InfoView:Grid := bGrid{BGRID_NONE, 4, 8, 4, 8}
oBrowser:InfoView:Foreground := Color{COLORWHITE}
oBrowser:InfoView:Background := Brush{Color{COLORBLUE}}
// Texte als Info-Werte setzen
oBrowser:SetInfo(BINFO_NOSERVER, "Es ist kein Server gesetzt.")
oBrowser:SetInfo(BINFO_SERVERNOTUSED, "Server ist nicht geöffnet.")
oBrowser:SetInfo(BINFO_NORECORDS, "Es sind keine Datensätze in der Auswahl.")
oBrowser:SetInfo(BINFO_INREADPROCESS, "Daten werden geladen. Bitte warten..." + CRLF + "Lade Datensatz %RecPos% von %RecCount%")
oInfoInReadProcess := bInfoInReadProcess{300, True}
oBrowser:SetInfoData(BINFO_INREADPROCESS, oInfoInReadProcess)
// Datenserver mit Browser verknüpfen und Browser anzeigen
oBrowser:Use(odbsCUSTOMER)
oBrowser:Show()
ENDIF
Siehe auch
Page url: http://www.YOURSERVER.com/index.html?bbrowser_setinfo.htm