abfrage ohne if und case

[Illuminator-23-5]

hi!
ich wollt nur mal kurz fragen: nachdem ich versucht habe, eine 'Abfrage' ohne if und case zu machen, hab ich mir folgendes überlegt:

Delphi-Quellcode:

var
  procs: array[0..1] of pointer;

procedure a;
begin
...
end;

procedure b;
begin
...
end;

procedure Main;
begin
procs[0] := @b;
procs[1] := @a;
... 
//Statt folgendem:
  if s=m then
    a
  else
    b;
//Das schreiben:
  procs[ord(s=m)];
end;

Aber beim aufrufen gibts ein problem:

Zitat von Delphi-Compiler:

Statement expected, but expression of typr 'Pointer' found

Warum geht das nicht?