WR LOCK COMMAND

Version 6.5

WR LOCK COMMAND (Bereich; Befehlsnummer; Gesperrt)

Der Befehl WR LOCK COMMAND verhindert, dass ein Benutzer den Befehl mit der Nummer Befehlsnummer ausführen kann. Das kann sowohl ein Menübefehl als auch ein Befehl der Werkzeugpalette sein. Dieser Befehl gilt nur für den Benutzerzugriff auf den angegebenen Befehl im 4D Write Bereich Bereich. In anderen 4D Write Bereichen ist der Befehl weiter zugänglich.

• Bei Gesperrt gleich 1 wird der aufgerufene Befehl nicht ausgeführt. Er wird in den entsprechenden Menüs und Paletten deaktiviert, d.h. in Grauschrift gesetzt.

• Bei Gesperrt gleich 0 wird der aufgerufene Befehl ausgeführt.

• Selbst wenn ein Befehl gesperrt ist, lässt sich Ihr Code mit dem Befehl WR EXECUTE COMMAND weiter ausführen.

• WR ON COMMAND wird nicht aufgerufen, wenn der Benutzer versucht, einen inaktiven Befehl aufzurufen.

Selbst wenn sich Befehle eines gesperrten Menüs nicht auswählen lassen, sind Tastaturkürzel oder Icons der Werkzeugleisten weiter ausführbar. Diese Befehle sind nur vollständig gesperrt, wenn Sie für jeden einzelnen den Befehl WR LOCK COMMAND aufrufen.

Die Liste der Konstanten finden Sie im Kapitel WR Konstanten unter dem Thema "WR Befehle". Sie können entweder einen Konstantennamen oder einen Wert übergeben.

(1) Sie möchten den Zugriff auf den Designmodus für den Designer gestatten, für alle anderen Benutzer untersagen:

   If(Current user="Designer")
      WR LOCK COMMAND(Bereich;wr cmd insert 4D expression;0)
   Else
      WR LOCK COMMAND(Bereich;wr cmd insert 4D expression;1)
   End if

(2) Lautet der Benutzername nicht "Guru", kann er bzw. sie keine neuen Dokumente erstellen:

   If(Form event=On load)
      If (Current user#"Guru")
         WR LOCK COMMAND(Bereich;wr cmd new;1)
      End if
   End if

WR ON COMMAND.