Skip to content

Instantly share code, notes, and snippets.

@jpluimers

jpluimers/gist:6610079

Created September 18, 2013 14:34
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save jpluimers/6610079 to your computer and use it in GitHub Desktop.
Save jpluimers/6610079 to your computer and use it in GitHub Desktop.
Download ZIP
Delphi <= XE2 versus ZEROBASEDSTRINGS in Delphi >= XE3
Raw
gistfile1.txt
{$ifdef GX_VER240_up}
for Index := Low(input) to High(input) do // for ZEROBASEDSTRINGS
{$else}
for Index := 1 to Length(input) do
{$endif GX_VER240_up}
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment