Navigation:  Klassen > bBrowser >

bBrowser:SetInfo()

Diese Seite drucken    Vorherige SeiteZurück zum Anfang des KapitelsNächste Seite

Zweck

Setzt für einen bestimmten Zustand des bBrowser einen Text, ein Icon, eine Bitmap oder ein bCompoundValue als Info-Wert.

Klasse

bBrowser

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

lSuccessLogischer Wert der definiert, ob der Info-Wert gesetzt werden konnte.
TRUEDer Info-Wert konnte gesetzt werden.
FALSEDer 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.

 

INFOTEXT

 

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

bBrowser:DrawInfo()

bBrowser:GetInfo()

bBrowser:InfoView

bBrowser:IsInfoVisible()

bBrowser:SetInfoHeight()

bBrowser:SetInfoView()

 


Page url: http://www.YOURSERVER.com/index.html?bbrowser_setinfo.htm