Stories
Slash Boxes
Comments
NOTE: use Perl; is on undef hiatus. You can read content, but you can't post it. More info will be forthcoming forthcomingly.

All the Perl that's Practical to Extract and Report

The Fine Print: The following comments are owned by whoever posted them. We are not responsible for them in any way.
 Full
 Abbreviated
 Hidden
More | Login | Reply
Loading... please wait.
  • I know nothing of Delphi, but it looks to me like this might be a bug. At least, if array indexes start at zero by default 'according to the little lookups on the web I did, tht is the case), and you don't insist on keeping the first character no matter what.
    while (SPos > 0) and (Str[SPos] = ' ')
    I think the ">" must be ">=". Otherwise, you'd never test, or remove, the very first character.