Questione : Parte di numero intero di ritorno della stringa del manupliate di Delfi soltanto

Il buon day

I ha una stringa che potrebbe assomigliare a questa: il test
or
TT=1
or
TT=8888 della prova del
TT=16
or
TT=6 questo è una necessità del line

I di restituire soltanto la parte di numero intero dopo che il theTT=

How può io compire il this

thanx class= del

Risposta : Parte di numero intero di ritorno della stringa del manupliate di Delfi soltanto 

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

  funzione ExtractNumber (s: stringa): numero intero;
  varietà i: numero intero;
  cominciare
    se posizione (“=„, s) > 0 allora
      s: = copia (s, posizione (“=„, s) +1, lunghezze);
    per la i: = 1 alle lunghezze fa
      se non (s [i] dentro [“0„. “9„]) allora
      cominciare
        System.Delete (s, i, lunghezza);
        rottura;
      estremità;
    Risultato: = StrToIntDef (s, 0);
  estremità;
Altre soluzioni  
 
programming4us programming4us