Referenz - PUBLIC (Klausel)
Syntax: PUBLIC { SUB | FUNCTION } Name (Parameterliste)
Typ: Klausel
Kategorie: Klassen
Siehe SUB/FUNCTION zu weiteren Details zur Syntax.
Ein Programm kann aus mehreren Modulen, d. h. aus mehreren BAS-Dateien bestehen.
Welche Dateien zum Projekt gehören sollen, wird dem Compiler in der Kommandozeile mitgeteilt:
fbc Optionen Dateiname1 Dateiname2 ...
Siehe dazu Der Compiler.
Aus einem bestimmten Modul können dabei immer alle Prozeduren aufgerufen werden, die sich in diesem befinden. Prozeduren aus anderen Modulen können nur dann aufgerufen werden, wenn diese Prozeduren PUBLIC sind. PRIVATE Prozeduren hingegen können nur aus dem Modul heraus aufgerufen werden, in dem sie sich befinden.
Es dürfen in mehreren Modulen mehrere Prozeduren mit demselben Bezeichner vorhanden sein, sofern diese PRIVATE sind.
Beispiel 1:
Ein Projekt besteht aus den Modulen A und B.
Das Modul A besitzt die Prozeduren Priv1 (PRIVATE), Priv2 (PRIVATE) und Pub1 (PUBLIC).
Das Modul B besitzt die Prozeduren Priv1 (PRIVATE), Priv2 (PRIVATE) und Pub2 (PUBLIC).
Wird gerade Code aus Modul A ausgeführt, so können Priv1 aus A, Priv2 aus A, Pub1 aus A und Pub2 aus B aufgerufen werden. Priv1 aus B und Priv2 aus B können nicht aufgerufen werden.
Wird gerade Code aus Modul B ausgeführt, so können Priv1 aus B, Priv2 aus B, Pub1 aus A und Pub2 aus B aufgerufen werden. Priv1 aus A und Priv2 aus A können nicht aufgerufen werden.
Standardmäßig sind alle Prozeduren PUBLIC, d.h. es muss nicht für jede SUB/FUNCTION explizit eine PUBLIC-Klausel benutzt werden. Jedoch kann mit OPTION PRIVATE festgelegt werden, dass Prozeduren standardmäßig PRIVATE sind. (Beachten Sie dazu auch die FB-Dialektformen.)
Das PUBLIC-Schlüsselwort muss nur im Prozedurheader stehen, nicht in der DECLARE-Anweisung.
Beispiel 2:
Compilieren Sie diese Dateien mit folgender Kommandozeile:
fbc PrivatePublicTest1.bas PrivatePublicTest2.bas
' PrivatePublicTest1.bas
DECLARE SUB PrivateSub ()
DECLARE SUB PublicSub ()
PublicSub
PrivateSub
SLEEP
PRIVATE SUB PrivateSub ()
PRINT "PrivateSub in PrivatePublicTest1.bas"
END SUB
'-----------------------------------------------------------'
' PrivatePublicTest2.bas
DECLARE SUB PrivateSub ()
DECLARE SUB PublicSub ()
PRIVATE SUB PrivateSub ()
PRINT "PrivateSub in PrivatePublicTest2.bas"
END SUB
PUBLIC SUB PublicSub ()
PRINT "PublicSub in PivatePublicTest2.bas
PrivateSub
END SUB
Ausgabe:
PublicSub in PrivatePublicTest2.bas
PrivateSub in PrivatePublicTest2.bas
PrivateSub in PrivatePublicTest1.bas
Wie Sie sehen, dürfen zwei Prozeduren mit demselben Bezeichner existieren, wenn beide PRIVATE sind.
Unterschiede zu QB: neu in FreeBASIC
Siehe auch:
PUBLIC, PRIVATE (Klausel), OPTION, DECLARE, SUB, FUNCTION, Prozeduren
Zusätzliche Informationen und Funktionen | ||||
---|---|---|---|---|
|