IDE Window: Code Templates/de

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

Was sind Code-Schablonen?

Code-Schablonen sind Texte mit einem Kurzzeichen. Zum Beispiel: Sie können im Quelltext-Editor 'cl' tippen und dann Strg+J tippen um die Code-Schablonen aufzurufen, die mit 'cl' beginnen. Dieses Feature ist ein großer Zeitsparer.

Dieser Dialog erlaubt ihnen, existierende Schablonen zu bearbeiten oder eigene hinzuzufügen.

Die Texte können Makros enthalten. Und sie können ihre eigenen Makros hinzufügen durch Erstellen eines Entwicklungszeit-Packages und Verwendung der macrointf.pas aus dem IDEIntf Package.

Beispiel 1 - ifb

tippen sie

  ifb|

Der senkrechte Strich stellt den Cursor dar. Drücken sie Strg+J. Es wird erweitert zu

  if | then begin

  end;

Der senkrechte Strich stellt wieder den Cursor dar. Sie können sehen, dass der Cursor auch bewegt wurde.

Diese Schablone wird 'ifb' genannt und ist wie folgt definiert:

if | then begin

end; 

Dieses Mal ist der Strich '|' ein echtes Zeichen. Es definiert die Cursorposition nach dem Einfügen der Schablone.

Beispiel 2 - Verwendung von Makros

Dieses Beispiel zeigt, wie man eine Code-Schablone 'w' erzeugt, die eine Zeile mit dem aktuellen Prozedur-Namen einfügt.

• Klicken sie auf die 'Hinzufügen' Schaltfläche. Ein Dialog erscheint. Setzen sie Token auf 'w' und Kommentar auf 'writeln(ProcName)', dann klicken sie auf Hinzufügen.
• Ihr neuer Eintrag wurde zur Listbox hinzugefügt.
• In dem Feld darunter tragen sie ein

 writeln(' ',|);

• Der Strich ist wirklich ein Strich und definiert die neue Cursorposition. Jetzt platzieren sie den Cursor nach dem ersten ' und klicken auf die 'Insert macro' Schaltfläche. Ein Dialog erscheint, der alle verfügbaren Code Makros zeigt. Wählen sie 'ProcedureName' und klicken auf 'Insert Macro'. Sie sollten jetzt haben:

 writeln('$ProcedureName() ',|);

• Klicken sie auf 'OK' zum Speichern und Beenden des Code-Schablone Dialogs.
• Bewegen sie den Cursor in einen Methodenrumpf und tippen 'w':

Zum Beispiel:

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

Der Strich stellt hier den blinkenden Cursor dar, nicht ein Zeichen.

• Drücken sie Strg+J. Sie erhalten:

 procedure TForm1.FormDestroy(Sender: TObject);
 begin
   writeln('TForm1.FormDestroy ',|);
 end;