Boa tarde pessoal,
Hoje venho mostrar um exemplo de utilização do "Code Templates" do Delphi 2006. Esse exemplo será útil para auxiliar no tratamento de erros.
Ao pressionar CTRL + J, o Delphi exibe um menu com todos os "códigos de exemplo" ("Templates") contidos no "Code Templates" do Delphi 2006.
Esses "Templates" podem ser visualizados, incluídos, alterados ou excluídos através da aba de visualização de "Templates". Para exibir essa aba acesse: Menu > View > Templates.
Para criar um "Template", que servirá para inserir um código com try, except e ainda exibir a mensagem de erro (uma forma
simples de tratar erros), devemos clicar em "New" na aba "Templates" e em seguida colar o código abaixo:
<?xml version="1.0" encoding="utf-8" ?>
<codetemplate
xmlns="http://schemas.borland.com/Delphi/2005/codetemplates"
version="1.0.0">
<template name="
tryem" invoke="auto">
<description>
Try except message
</description>
<author>
Irapua Araujo
</author>
<code language="Delphi"><![CDATA[
try
except
on E: Exception do
begin
MessageDlg('Erro: ' + E.Message, mtError, [mbOk], 0);
Exit;
end;
end;
]]>
</code>
</template>
</codetemplate>
Em seguida basta salvar o arquivo e começar a usar através do CTRL + J (escolher a opção "
tryem"). Pode-se digitar "
tryem" e apertar CTRL + Espaço (Autocomplete do Delphi) e no menu que aparecer escolher a opção "
tryem".
No Delphi 2006 salvei o "template" no seguinte caminho:
C:\Users\
USUARIO\AppData\Local\Borland\BDS\4.0\code_templates
Caso queira obter mais informações sobre "Code Templates" acesse os links abaixo:
http://unitonedev.blogspot.com.br/2006/02/entendendo-code-templates-do-delphi.html
http://docwiki.embarcadero.com/RADStudio/XE5/en/Templates_Window
http://docwiki.embarcadero.com/RADStudio/XE5/en/Creating_Live_Templates
http://delphi.wikia.com/wiki/Delphi_Live_Templates
http://www.devmedia.com.br/dicas-atalhos-de-teclado-da-ide-do-delphi-e-dicas-uteis/3067
Espero que tenham gostado e que tenha sido muito útil!
Abraços!
