4D Doc Center : WR TEXT ACCESS

4D Write v14

WR TEXT ACCESS


WR TEXT ACCESS ( area ; modo )

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D Write
modo	Inteiro	0=Autorizar acesso 1=Bloquear acesso

Descrição

O comando WR TEXT ACCESS lhe permite controlar o acesso ao texto em area. Quando uma área se mostra em modo de só leitura, os menus, as regras e a caixa de zoom não se mostram. O texto pede ser visto e deslocado, mas não ser modificado.

No parâmetro modo, pode passar uma das seguintes constantes, do tema "WR Parameters":

Constante	Tipo	Valor
wr allowed access	Inteiro longo	0
wr restricted access	Inteiro longo	1

Quando o acesso a uma área restringido anteriormente se muda ao passar wr allowed access em modo, deve chamar a WR SET DOC PROPERTY (area;barramenu;wr mostrar) e WR SET DOC PROPERTY (area; wr view rulers;wr displayed) para mostrar os menus e a regra.

Sobre arrastar e soltar

Este comando controla a edição de uma área usando o teclado e copiar/colar, mas não usando arrastar e soltar. Esta operação pode ser útil em certas interfaces, no entanto, se deseja evitar que qualquer modificação na área, utilize as seguintes instruções:

 WR TEXT ACCESS(TheArea;wr restricted access)

 WR SET AREA PROPERTY(TheArea;wr allow drag;wr drag not allowed)

 WR SET AREA PROPERTY(TheArea;wr allow drop;wr drop not allowed)

Exemplo

O seguinte exemplo é o método de formulário do formulário que contém area. Põe area só em modo de leitura quando se carrega o formulário.

 If(Form event=On Load)

    WR TEXT ACCESS(area;wr restricted access)

 End if