Vraag : Van de het koordterugkeer van Delphi manupliate het geheel slechts deel

Goede day

I heeft een koord dat als dit zou kunnen kijken:
TT=16
or
TT=6 de test test
or
TT=1
or
TT=8888 dit is een line

I behoefte om slechts het geheeldeel terug te keren nadat theTT=

How ik this

thanx kan verwezenlijken

Antwoord : Van de het koordterugkeer van Delphi manupliate het geheel slechts deel 

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:

  functie ExtractNumber (s: koord): geheel;
  var i: geheel;
  begin
    als Pos („=“, s) > 0 toen
      s: = Exemplaar (s, Pos („=“, s) +1, Lengte);
    voor I: = 1 aan Lengte
      als niet (s [I] binnen [„0“. „9“]) toen
      begin
        System.Delete (s, I, Lengte);
        onderbreking;
      eind;
    Resultaat: = StrToIntDef (s, 0);
  eind;
Andere oplossingen  
 
programming4us programming4us