IDE Window: Code Templates/fr
│
Deutsch (de) │
English (en) │
español (es) │
suomi (fi) │
français (fr) │
Capture d'écran
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 modèle.
Exemple 2 - Employer des macros
Cet exemple montre comment créer un modèle de code 'w' qui insère une ligne avec le nom de la procédure en cours .
- Cliquez sur le bouton 'ajouter'. Une boite de dialogue surgit. 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;