IDE Window: Code Templates/fr

From Free Pascal wiki
Jump to navigationJump to search

Deutsch (de) English (en) español (es) suomi (fi) français (fr)

Que sont les modèles de Code ?

Les modèles(Template) de code sont des textes faits avec une abréviation . Par exemple : Vous pouvez taper 'cl' dans l'éditeur de source et ensuite faire Ctrl+j pour invoquer les modèles de code commençant par 'cl'. Cette fonctionnalité est un grande économie de temps.

Cette boite de dialogue vous permet d'éditer ce qui existe ou d'ajouter vos propres modèles.

Les textes peuvent contenir des macros . Et vous pouvez ajouter vos propres macros en créant un paquet de conception et en utilisant le fichier macrointf.pas du paquet IDEIntf.

Example 1 - ifb

tapez

  ifb|

La barre verticale(pipe) devrait représenter le curseur . Appuyer sur Ctrl+j. Il sera développé ainsi

  if | then begin

  end;

A nouveau, la barre verticale représente le curseur. Vous pouvez voir que le curseur s'est déplacé aussi.

Ce template s'appelle 'ifb' et est défini comme suit :

if | then begin

end; 

Cette fois la barre verticale '|' est un vrai caractère. Il définit la position de curseur après l'insertion du template.

Exemple 2 - Employer des macros

Cet exemple montre comment créer un modèle de code 'w' which inserts a line with the current procedure name.

  • Click on the 'Add' button. A dialog pops up. Set Token to 'w' and Comment to 'writeln(ProcName)', then click Ok.
  • Your new item has been added to the list box.
  • In the source below fill in
 writeln(' ',|);
  • The pipe is really a pipe and defines the new cursor position. Now place the cursor after the first ' and click on the 'Insert macro' button. A dialog pops up showing all available code macros. Choose 'ProcedureName' and click 'Insert Macro'. You should now have:
 writeln('$ProcedureName() ',|);
  • Click 'Ok' to save and close the code template dialog.
  • Move the cursor into a method body, type 'w':

For instance:

 procedure TForm1.FormDestroy(Sender: TObject);
 begin
   w|
 end;

The pipe should represent here the blinking cursor, not a character.

  • Press Ctrl+j. You will get:
 procedure TForm1.FormDestroy(Sender: TObject);
 begin
   writeln('TForm1.FormDestroy ',|);
 end;