FATS - Fast Access Tree System Inhaltsverzeichnis Programmierschnittstellen Visual Basic für Windows 3.x

Visual Basic für Windows 3.x

---

 
VBX-Control FATS_VBW.VBX bzw. FATSXVBW.VBX

Im Lieferumfang der FATS-Version für Windows 3.x befinden sich die Dateien FATS_VBW.VBX & FATS_WIN.DLL (Basisversion) bzw. FATSXVBW.VBX & FATSXWIN.DLL (erweiterte Version), die Sie in das Systemverzeichnis von Windows kopieren müssen:

COPY FATS?WIN.DLL \WINDOWS\SYSTEM
COPY FATS?VBW.VBX \WINDOWS\SYSTEM

Die Bibliotheken FATS_VBW.VBX bzw. FATSXVBW.VBX sind speziell für Visual-Basic programmierte Custom-Controls und exportieren die folgenden Funktionen:

Declare Function FatsSetup Lib "FATS_VBW.VBX" () As Integer

Declare Function FatsTerminate Lib "FATS_VBW.VBX" () As Integer

Declare Sub FATSBASIC Lib "FATS_VBW.VBX" (ByVal szCmnd As String,nErrorcode%, dwRecno&, szFatsKey$)

Die Funktionen FatsSetup und FatsTerminate benötigen Sie nur dann, wenn Sie kein FORM-Modul in Ihrem Programm verwenden:

segFatsdata = FatsSetup()	' Initialisiert den FATS-Datenbereich
segFatsdata = FatsTerminate()	' Gibt den FATS-Datenbereich frei

Beim Einsatz dieser Funktionen in der Visual-Basic Entwicklungsumgebung ergibt sich das Problem, daß bei einem eventuellen Abbruch des Programmes vor dem Aufruf der Funktion FatsTerminate der Datenbereich von FATS nicht automatisch freigegeben wird und eventuell noch geöffnete FATS-Dateien nicht von Visual-Basic geschlossen werden. Daher ist von dieser Vorgehensweise abzuraten.

Wenn Sie wenigstens ein FORM-Modul in Ihrem Programm verwenden, dann ist die Vorgehensweise beim Einbinden von FATS sehr einfach:

1.)	Laden Sie das FATS-Custom-Control mit dem Menü-Befehl "ADD FILE"bzw. Ctrl+D. In der Toolbox-Leiste erscheint daraufhin das Symbol desFATS-Controls.
2.)	Plazieren Sie das FATS-Control in einem Form-Modul. Bei der Aus-führung Ihres Visual-Basic Programmes ist das Control unsichtbar.
3.)	Da die Entwicklungsumgebung beim vorzeitigen Programmabbruch noch geöffnete Dateien nicht schließt, schreiben Sie im Startupcode Ihres Basic-Programmes den FATS-Befehl "K", um alle noch geöffnetenDateien ordnungsgemäß zu schließen.

 
Aufruf von FATS

FATS-Befehle werden mit der Funktion FATSBASIC ausgeführt:

CALL FATSBASIC(CMND$, ERRORCODE%, RECNO&, FATSKEY$)

Bedeutung der verwendeten Parameter:

CMND$	Befehlsstring
ERRORCODE%	Fehlercode von FATS, einfache Integer
RECNO&	Satznummer von FATS, doppelte Integer
FATSKEY$	Schlüsselstring von FATS

 
Testprogramme

Auf der FATS-Diskette für Windows 3.x befinden sich im Verzeichnis WIN_16I\BASIC\VBWIN Testprogramme, anhand derer Sie die Verwendung von FATS studieren können:

tst1_ger.mak	Testprogramm für MS-Visual-Basic für Windows
tst1_ger.frm	(Form-Modul)
tst1_ger.bas	(Programm-Modul)

Bei der erweiterten Version von FATS befinden sich zusätzlich die folgenden Testprogramme im Verzeichnis:

tst2_ger.frm	Matchcode-Suche im Kundenstamm
mcsort.frm	Anwendung des Key-Flags beim Kommando 'MC'

© 2008  GCS Software, Udo Gertz