4D Doc Center : WR INSERT STYLED TEXT

4D Write v14

WR INSERT STYLED TEXT


WR INSERT STYLED TEXT ( area ; BLOB )

Parâmetro	Tipo	Descrição
area	Inteiro longo	Área 4D Write
BLOB	BLOB	Variável ou campo

Descrição

O comando WR INSERT STYLED TEXT insere na área 4D Write referenciada por area os conteúdos de blob. A inserção será executada na localização do cursor ou irá substituir a seleção atual. blob pode ser um campo ou uma variável de tipo BLOB. No entanto é obrigatório que blob seja criado utilizando o comando WR Get styled text.

O formato interno utilizado para representar o texto com estilo em blob é independente da plataforma. Pode ser criado usando um ordenador Mac OS e se introduz mais tarde em um documento Windows, ou vice-versa.

blob contém uma seleção de texto 4D Write com todos os atributos de texto (cor, estilo...) a exceção das folhas de estilo, assim como seus atributos de parágrafo (margens, tabulações, formatos...).

Exemplo

Você quer armazenar na tabela [Letters] os modelos mais utilizados de cartas de seu negócio, economizando espaço em disco duro. Para isso, é criada na tabela de um campo BLOB chamado "Templates". No formulário de entrada para essa tabela, é introduzida uma área 4D Write chamada 'Área'. Por último, se adjunta o seguinte método ao formulário:

 Case of

    :(Form event=On Load)

       If(Record number([Letters])#-3)

          WR INSERT STYLED TEXT(Area;[Letters]Templates)

       End if

    :(Form event=On Data Change)

       WR EXECUTE COMMAND(Area;wr cmd select all)

       [Letters]Templates:=WR Get styled text(Area)

 End case