Como aplicar efeitos de rich text em relatórios do FoxPro

IMPORTANTE: Este artigo foi traduzido por um sistema de tradução automática (também designado por Machine Translation ou MT), não tendo sido portanto traduzido ou revisto por pessoas. A Microsoft possui artigos traduzidos por aplicações (MT) e artigos traduzidos por tradutores profissionais, com o objetivo de oferecer em português a totalidade dos artigos existentes na base de dados de suporte. No entanto, a tradução automática não é sempre perfeita, podendo conter erros de vocabulário, sintaxe ou gramática. A Microsoft não é responsável por incoerências, erros ou prejuízos ocorridos em decorrência da utilização dos artigos MT por parte dos nossos clientes. A Microsoft realiza atualizações freqüentes ao software de tradução automática (MT). Obrigado.

Clique aqui para ver a versão em Inglês deste artigo: 246088
Sumário
De tempos em tempos seria bom ter a capacidade de adicionar efeitos de formatação a palavras individuais nos relatórios do Microsoft Visual FoxPro. Isso pode ser feito com o controle Rich Text ActiveX, um campo geral e um OLE ligado controle em um relatório do FoxPro.
Mais Informações
Este exemplo mostra como sublinhado partes de um campo de uma tabela e exibir a formatação em um relatório. Você pode aplicar qualquer efeito ou combinação de efeitos possíveis em RTF para seu exemplo.
  1. Abra o Visual FoxPro e crie um novo relatório.
  2. Adicione um Controle de limite de imagem, Active-X para a faixa de detalhes do relatório. Defina sua propriedade FIELD para Dcolor.gcolor .
  3. Salve o relatório como rtfDemo .
  4. Cole o código a seguir em um novo programa. Salvar esse programa no mesmo diretório que o relatório, executar it.
    CLOSE ALLCLEAR ALLtSafety = SET("safety") &&Store SET status of Safety to a variableSET SAFETY OFF &&Check to see if the Dcolor table existsIF FILE("dcolor.dbf")	USE dcolor EXCLUSIVEELSE	CREATE TABLE dcolor (dcolor c(20),gcolor g) &&Create and add records if DColor table doesn't exist	INSERT INTO dcolor (dcolor) VALUES ("Red")	INSERT INTO dcolor (dcolor) VALUES ("Green")	INSERT INTO dcolor (dcolor) VALUES ("Blue")	INSERT INTO dcolor (dcolor) VALUES ("Purple")	INSERT INTO dcolor (dcolor) VALUES ("Orange")	INSERT INTO dcolor (dcolor) VALUES ("Yellow")ENDIF_rtfFile = SYS(3)+".rtf" &&Create a legal file name with a .RTF extension*NOTE: The file must have a .RTF extension to work properlySCAN &&Create a Richtext OLE bound control in the general field of the dColor table	SET TEXTMERGE TO &_rtfFile NOSHOW	SET TEXTMERGE ON 	*!!IMPORTANT!! The following richtext formatting line(s) need to be          *included as one line in your program.         \\{\rtf1\ansi\ansicpg1252\deff0\deflang1033{\fonttbl         {\f0\fnil\fcharset0 Times New Roman;}}\viewkind4\uc1\pard\f0\fs20          The big \ul <<ALLT(dcolor.dcolor)>>\ulnone  dog\par}	SET TEXTMERGE TO	APPEND GENERAL gcolor FROM &_rtfFile CLASS "RICHTEXT.RICHTEXTCTRL.1"ENDSCANSET SAFETY &tSafetyERASE &_rtfFileREPORT FORM rtfdemo PREVIEW NOCONSOLEUSECLOSE ALL
    quando o relatório for impresso, a cor é sublinhada no texto.

    Observação : em alguns casos a visualização de impressão de texto formatado RTF não parecer correta. No entanto, quando a seqüência de caracteres é impresso, a saída é formatada corretamente.

    TIP : para gerar uma seqüência de caracteres semelhante no código acima, criar um modelo para a expressão no Microsoft WordPad (ou outro aplicativo capaz de criar arquivos Rich Text). Cor do sublinhado e aplique a outros formatação ao texto e salvá-lo em um arquivo .RTF. Abra o arquivo .rtf no bloco de notas e copiar/colar o código de Rich Text em seu programa do Visual FoxPro.

    (Este aplicativo requer o controle RichTX32.OCX. Visual FoxPro 3.0 e 3.0b não são fornecidos com RichTX32.OCX.)

Aviso: este artigo foi traduzido automaticamente

Propriedades

ID do Artigo: 246088 - Última Revisão: 02/17/2005 22:52:27 - Revisão: 3.4

Microsoft Visual FoxPro 3.0 Standard Edition, Microsoft Visual FoxPro 3.0b Standard Edition, Microsoft Visual FoxPro 5.0 Standard Edition, Microsoft Visual FoxPro 5.0a, Microsoft Visual FoxPro 6.0 Professional Edition, Microsoft Visual FoxPro 7.0 Professional Edition, Microsoft Visual FoxPro 8.0 Professional Edition, Microsoft Visual FoxPro 9.0 Professional Edition

  • kbmt kbhowto kbreportwriter KB246088 KbMtpt
Comentários