Question

I have a string Alpha 2 from which I need to extract the integer portion i.e. 2.

This is a quick and dirty project and I’m not currently interested in learning Pascal. All I need is a quick answer!

Answer 1

var
  sub: string;
  i: Integer;
begin
  sub := Copy('Alpha 2', 7, 1);
  i := StrToInt(sub);

–

const
  str = 'Alpha 2';
var
  i: Integer;
begin
  i := StrToInt(str[7]);

–

var
  str: string;
  sub: string;
  spc: Integer;
  i: Integer;
begin
  str := 'Alpha 257';
  spc := Pos(' ', str);
  sub := Copy(str, spc + 1, Length(str) - spc);
  i := StrToInt(sub);

There’s also StrToIntDef if you don’t want an exception to be raised when the argument is not an integer.