Useful Delphi code templates

Question

I've been programming in Delphi for a little over two years now, and I've only got maybe 5 custom templates, I feel as though I should have more.

If anyone has any particularly useful ones it would be great to have a nice repository of them here on stackoverflow.

I don't care whether you use the Delphi 2009 syntax or Delphi 7, but if the code you'd be generating only works on a particular version, please mention that.

score 11 · Answer 1 · answered May 20 '09 at 00:05

11

There are a handful of useful ones here, including a few based on CodeRush. These are the live templates, so they work in Delphi 2006 and up.

http://delphi.wikia.com/wiki/Delphi_Live_Templates

answered May 20 '09 at 00:05

Bruce McGee

15,076
6
55
70

Peter Turner · Answer 2 · 2009-07-13T14:10:27.460

8

Very handy output debug string plus formatting

Name:
ods
Description:
Output Debug String with Format Code:

OutputDebugString(PAnsiChar(format('|',[])));

also, if I want to leave it in the code:

Name:
dods
Description:
Output Debug String with ifdef debug
Code:

{$IFDEF DEBUG}   
   OutputDebugString(PAnsiChar(format('|',[])));   
{$ENDIF}

edited Jul 13 '09 at 14:10

answered May 19 '09 at 21:12

Peter Turner

11,199
10
68
109

3

We have a little procedure ODS(const s: string) instead. :) – Uli Gerhardt May 20 '09 at 06:46
wow i have all most the same shortcut, but with out the format, I think im going to add that now :) thanks – Christopher Chase Jun 26 '09 at 00:45
Little reminder from the unicode conversion front - change to OutputDebugStringW or OutputDebugStringA accordingly – Peter Turner Mar 16 '10 at 19:36
1

Use PChar instead of PAnsiChar. That way, it'll work fine both in Unicode and non-Unicode versions of Delphi. – Martijn Apr 27 '10 at 14:40

Peter Turner · Answer 3 · 2009-12-17T14:11:49.947

5

This one is pretty handy because it always shows up first when I hit ctrl-j (so my shortcut is ctrl-j enter)

Name:
//*
Description:
Comment Line
Code:

//******************************************************************************

I use it to start documentation around methods. It sure beats hitting '*' 78 times.

edited Dec 17 '09 at 14:11

answered May 19 '09 at 21:08

Peter Turner

11,199
10
68
109

I use a similar one to this one, but its named hr and is a line of dashes rather than asterisks. – skamradt May 19 '09 at 22:21
I can't think of where I'd put such a comment that would actually be useful. I.e. in the sense of explaining what the code does. – Disillusioned Dec 17 '09 at 12:20
That's the first part of a useful comment, (i.e. //********** //* This function does something awesome //*************) My company requires at a minimum //************** between procedures, which can get tedious when you're a guy who likes to use properties with get/set methods. – Peter Turner May 18 '10 at 13:44

score 4 · Answer 4 · answered May 20 '09 at 14:21

4

If you do a lot of work on datasets these are handy.

Name: fbn

Description: DataSet FieldByName

|DataSet|.FieldByName( '|Field|' )|end|

Name: pbn

Description: DataSet ParamByName

|DataSet|.ParamByName( 'P_|Param|' )|end|

answered May 20 '09 at 14:21

Ryan VanIderstine

481
3
6

I use a program to auto-generate those codes. Code-complete-40-times is still too many. – nurettin Mar 22 '17 at 11:46

score 3 · Answer 5 · answered Jun 25 '09 at 20:38

I did a couple that saved me lots of time. A few of those took the monotone out of property declarations. Then I did some to create type-safe enumerators, object lists and bucket lists. I probably should do one for collections too, but haven't yet.

These are all available on my blog.

Useful Delphi code templates

5 Answers5

Linked