Criando um Editor de Texto (Avançado)

[LziNN 0]

1.Layout (corpo):

 

Primeiramente com o Delphi já aberto crie um novo projeto File > VCL Forms Application – Delphi for Win32 (se você estiver utilizando Delphi 7, será apenas Application).

 

 

 

 

Vamos agora dar uma customizada no nosso formulário. Mude o Caption do **** (nome que se dá no Delphi para aquele nome que fica em cima do formulário).

 

 

 

 

Vamos criar os “controles” do nosso editor agora.

Crie um “ToolBar”. Para isso vá até a aba “Win32” e clique em “TToolBar” depois clique no seu “form” ou formulário.

 

 

 

 

Diferente do outro artigo que nos utilizamos o componente “Memo”, neste usaremos o componente “RichEdit”. Portanto coloque um “RichEdit” no seu “Form”,

ele pode ser encontrado na guia “Win32”. (Clique em “TRichEdit” e depois de um clique no Formulário).

 

 

 

 

Selecione o “RichEdit” que você acabou de criar, na Object Inspactor (F11) coloque:

 

Align = alClient

ScrollBars = ssVertical

Veja como ficou:

 

 

 

 

Procure Lines e depois clique nos três pontinhos “...” irá abrir uma janela, não deixe nenhum caractere dentro dessa janela e clique em OK.

 

 

 

Vamos criar os botões de navegação do nosso editor.

Para isso clique com o botão direito na “ToolBar” e clique em “New Button”.

 

 

 

 

Crie 13 botões dentro do “ToolBar” utilizando o procedimento mostrado acima.

Para colocar as imagens nos botões, utilizando a “ToolBar”, precisamos colocar um componente chamado “ImageList”.

 

 

 

 

Vamos “linkar” a “ToolBar” com a “ImageList” para isso seleciona a “ToolBar” que criamos anteriormente, va na Object Inspector (F11)

 

 

 

 

Depois de ter “linkado” tudo certinho, vamos adicionar as imagens para dentro do “ImageList” Para isso, clique 2 veses em cima do componente. Veja a janelinha:

 

 

 

 

Clique no botão “***” e coloque as imagens que você desejar. Depois organize direitinho seguindo a ordem dos botões.

(Se você não tem as imagens dos botões não se preocupe, no fim do artigo irei deixar um link com os icones utilizados no artigo)

 

 

 

 

Coloque um “Opendialog” e um ”Savedialog” dentro do “form”, para isso procure a aba “Dialogs”,

depois no “Opendialog” duas vezes no “Opendialog” e duas vezes no “Savedialog”.

 

 

 

 

Selecione o “Opendialog” e o ”Savedialog” que você acabou de criar, e modifique a propriedade da Object Inspector “Filter”, Coloque isto: “Arquivos RichText|*.rtf” (sem aspas).

Selecione os botões que você ira utilizar para Negrito, Itálico e Sublinhado. Vá na Object Inspector (F11) e mude a propriedade “Style” para “tbsCheck”.

 

 

 

 

2.Programação:

 

Vamos trabalhar com 2 funções no nosso projeto. Primeiro vamos declarar elas em private:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Agora vamos colocar as funções por inteiro no bloco de codigo, coloque isso após a “implementation”:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de novo arquivo e coloque o codigo:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Abrir e coloque o codigo:

 

if opendialog1.Execute then

begin

Richedit1.Lines.LoadFromFile(opendialog1.FileName);

Richedit1.SetFocus;

end;

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Colar e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Copiar e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Clique duas vezes no botão de Recortar e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Negrito e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Clique duas vezes no botão de Italico e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Sublinhado e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Clique duas vezes no botão de Alinhar ao centro e coloque o codigo:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Clique duas vezes no botão de Fechar o Programa e coloque o codigo:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

 

Selecione o “RichEdit1” va na aba “Events” da Object Inspector clique 2 vezes no evento “onchange”:

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Agora na mesma janela e com o “RichEdit1” selecionado, clique 2 vezes no evento “SelectionChange” e coloque:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Selecione o “Form” e clique 2 vezes no evento “OnShow” e coloque:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Créditos

Leonardo - Post

Gabriel Gabriel Marinho de Matos - Fontes

[Matfigoli1 0]

<Quote C~wd>

 

Já conversado, #DTK

[iMelo~' 15]

o topico está muito bom mesmo fico muito bom com as prints e tals ^^ , obrigado por compartilhar com a wc.

[4444leozinho4444 0]

Ótimo tutorial bem organizado bem explicativo e com imagens muito bom.

[C£rberus 1]

Tópico ficou muito bom e sobre tudo explicativo, ainda mais com os prints inseridos o que torna a explicação mais clara.

[-FarofinhA- 0]

Cara nen sei vioo !

 

 

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[gaabscps 7]

Cara nen sei vioo !

 

O que exatamente você não entendeu??

E será bem melhor você por a imagem na sua assinatura.

[iMelo~' 15]

@-FarofinhA-

 

o que voce nao entendeu? tem prints complexas só nao entende quem nao presta atenção de verdade

[Lf' 6]

Caro -FarofinhA- ,

 

Evite comentar em tópicos cujo último post tem mais de 15 dias.

 

Isso traz tópicos velhos de volta a primeira página,desorganizando a área.

 

Qualquer dúvida sobre as regras gerais do fórum, leia:

 

• Regras WebCheats
  

 

 

Tópico Trancado