Há algum tempo vinha pesquisando o assunto: como duplicar uma linha de código no delphi, facilmente ou com apenas um atalho, sem precisar selecionar a linha e usar os atalhos Ctrl+C e Ctrl+V?

Finalmente encontrei e é fácil adicionar tal funcionalidade na IDE do Delphi.
Mas, na *minha* opinião, o fabricante deveria adicionar um atalho nativo na IDE, para tal funcionalidade, que ajudaria em muito na produtividade, pois diminui o movimento das mãos no teclado para fazer combinações que tem por objetivo selecionar a linha, copiar e colar.

Vamos praticar então:

Utilizaremos nesse artigo a versão 2010 do Delphi, mas o pacote é compatível para versões a partir do Delphi 6.

Acesse http://cc.embarcadero.com/item/27635 e clique em no botão "Download 5.5k".
Você será redirecionado para a página de login (caso não tenha seu login você poderá se cadastrar gratuitamente).
Após concluído o download descompacte-o utilizado seu descompactador preferido.
O Pacote é composto por 5 arquivos:
- DupLine.pas;
- KeyBind.dpk;
- KeyBind.dproj;
- KeyBind.dproj.local;
- KeyBind.res;

Coloque os 5 arquivos em uma pasta separada com o nome sugestivo de "keybinding" e mova esta pasta para seu diretório de preferencia, como por exemplo "C:\Arquivos de programas\Embarcadero\RAD Studio\7.0\".

Siga os passos para instalar o pacote e ativar a funcionalidade na IDE do Delphi:
1 - Abra o Delphi 2010;
2 - Feche tudo que esta aberto (File > Close All);
- Clique em "File > Open" e abra o arquivo "KeyBind.dpk" localizado na pasta "C:\Arquivos de programas\Embarcadero\RAD Studio\7.0\keybinding";
3 - Clique em "View > Project Manager" (Ctrl + Alt + F11) e clique com o botão direito do mouse em cima de "KeyBind.bpl" e no menu popup clique em "Compile";
4 - Novamente clique com o botão direito do mouse em cima de "KeyBind.bpl" e no menu popup clique em "Install". Irá aparecer uma janela informando que o pacote foi instalado com sucesso, então clique em "OK";
5 - Clique em "File > Save" (Ctrl + S) para salvar o pacote e sua modificações;
Prontinho!

Agora vamos utilizar nossa nova funcionalidade:
A - Clique em "File > Close All"
B - Feche também a janela do Project Manager se ela ainda estiver aberta.
C - Agora clique em  "File > New > VCL Form Application - Delphi";
D - Adicione um componente "TButton" no form e em seu evento "OnClick" adicione qualquer linha de código, sugerimos como exemplo "ShowMessage('KeyBinding');"
E - Clique com o mouse/posicione o cursor na linha que deseja duplicar e utilize o atalho do teclado "Ctrl + Shift + D".

Veja que a linha de código na qual o cursor está posicionado é duplicada abaixo.

Testamos também com o Delphi 7.

Podemos facilmente duplicar várias linhas de código, claro que aí precisamos selecionar as linhas de código que desejamos duplicar, mas para duplicar basta pressionar a mesma combinação de teclas "Ctrl + Shift + D".

Veja na imagem abaixo como selecionar várias linhas de código e observe a posição do cursor em destaque




Veja na imagem abaixo o bloco duplicado




Nosso objetivo foi apenas divulgar essa funcionalidade. Os Agradecimentos, créditos e méritos vão para Cary Jensen "http://cc.embarcadero.com/Author/873143".

Abraço e até a próxima.


Um exemplo que adiciona uma combinação de teclas Ctrl-Shift-D na IDE. Esta tecla de atalho duplica a linha atual ou bloco de código no editor.

A sample editor key binding that adds a Ctrl-Shift-D keystroke to the editor. This keybinding duplicates the current line or block in the editor.


Palavras chaves
copiar colar linhas no delphi
duplicar linhas no delphi
duplicar linhas de código do delphi
copiar/colar linhas no delphi
replicar linhas no delphi
repetir linhas
Delphi Editor Keybinding