Delphi 2010 UND Delphi 7 verwenden?

[omata]

Kannst du das Problem nicht andersherum lösen?

Also in Delphi7 das nachbilden, was eben in Delphi2010 jetzt anders ist...

Delphi-Quellcode:

{$IfDef VER150}
function CharInSet(Text:Char; Menge:TMenge):boolean;
begin
  Result:=(Text in Menge);
end;
{$EndIf}

procedure TForm.ButtonClick(Sender: TObject);
var p:integer;
    MsgStr:string;
begin
  p:=0;
  while     (p <= length(MsgStr))
        and CharInSet(MsgStr[p],['0'..'9']) do
  begin
    inc(p);
  end;
end;

Die Routinen, die Delphi7 erweitern würde ich dann in eine eigene Unit auslagern, so dass du das dann nur noch einbinden mußt.