Codeblock Onlinehilfe
Codeblock Onlinehilfe
Breadcrumbs

TCbFullTextSearch

TCbFullTextSearch

Diese Klasse dient als Rückgabe der Funktion FullTextSearchDocking.

Eigenschaften

Eigenschaft

Beschreibung

Value:C

String - Array in dem das ID-Feld der Tabelle und der Wert des ausgewählten Datensatzes enthalten ist. Read-Only

MaskID:N

Gibt die verwendete Masken-ID zurück.
Read-Only

Caption:C

Caption des Dockings.

MainTable:O

Die Tabelle, die durchsucht wird

ShowSyncMasterData:L

Checkbox, um Stammdaten zu synchronisieren auch anzeigen

ShowContactsCheckBox:L

Checkbox, um Kontakte auch zu suchen anzeigen

SearchContacts:L

Kontakte mitsuchen (Checkbox angehakt?)

VersionFilterVisible:L

Versionsfilter anzeigen

VersionFilterEnabled:L

Versionsfilter umschaltbar machen

Verfügbare Ereignisse

Ereignis

Beschreibung

BeforeSearch

Vor der Volltextsuche

OnGoToSelected

Beim Springen auf einen ausgewählten Datensatz

Beispiel 

| oForm, oDab000, oFullTextSearchDocking |

function BeforeSearch( Sender )
   meld(Sender.SqlStatement)
end,

oForm := CreateObject('TFormEx', 'TFormEx'),
oDab000 := BeOpen(waDab000),
startseq
  oFullTextSearchDocking := FullTextSearchDocking(oForm, oDab000),
  oFullTextSearchDocking.CbHelper.CbManualDock(oForm),

  AssignEvent(oFullTextSearchDocking, 'BeforeSearch', 'BeforeSearch'),
  oFullTextSearchDocking.Caption := 'Caption',

  Show(oFullTextSearchDocking),

  writeln(oFullTextSearchDocking.MaskID),
  writeln(oFullTextSearchDocking.Value),

  // Um Filter von der MainTable in der Suche zu aktualisieren
  // muss man die Tabelle neu setzen
  oFullTextSearchDocking.MainTable := oDAB000,

  ShowModal(oForm),
always
  BeClose(oDab000),
stopseq

Weitere Verknüpfungen