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_NOSERVER |
Der Browser ist mit keinen Datenserver verknüpft. |
BINFO_SERVERNOTUSED |
Der Datenserver, der mit dem Browser verknüpft ist, ist nicht geöffnet. |
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. |
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.
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.")
// 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