请大家帮忙改着delphi的pascal.

(1)  public   bool Getmo(string   SMS)   
  {   
  if(SMS.Substring(40,2)!="08")   
  return   false;   
          return   true;   
  } 
*****************
(2)  public   string[]   Getevn(string   SMS)   
  {   
  char[]   str="\n".ToCharArray();   
  string[]   temp=SMS.Split(str);   
  return   temp;   
  } 
(3)  public   string   GetTrl(string   SMS)   
  {   
  string   tel=SMS.Substring(24,14);   
  string   s="";   
  for(int   i=0;i<11;i+=2)   
  {   
  s+=tel[i+1];   
  s+=tel[i];   
  }   
  s+=tel[tel.Length-1];   
  return   s;   
  }  
(4)  public   string   GetDa(string   SMS)   
  {   
  string   time=SMS.Substring(42,12);   
  string   s="";   
  for(int   i=0;i<11;i+=2)   
  {   
  s+=time[i+1];   
  s+=time[i];   
  }   
  string   t=s.Substring(0,2)+"年"+s.Substring(2,2)+"月"+s.Substring(4,2)+"日"+s.Substring(6,2)+":"+s.Substring(8,2)+":"+s.Substring(10,2);   
  return   t;   
  }   
(5)  public   string   GetContent(string   SMS)   
  {   
  string   c="";   
  string   len=SMS.Substring(56,2);   
  int   length=System.Convert.ToInt16(len,16);   
  length*=2;   
  string   content=SMS.Substring(58,length);   
  for(int   i=0;i<length;i+=4)   
  {   
  string   temp=content.Substring(i,4);   
  int   by=System.Convert.ToInt16(temp,16);   
  char   ascii=(char)by;   
  c+=ascii.ToString();   
  }   
  return   c;   
  }  
(6)  public   string   GetTextContent(string   SMS)   
  {   
  string   str="";   
  string   c="";   
  byte   by;   
  char   ascii;   
  int   i;   
  SMS=SMS.Replace("\r","");   
  SMS=SMS.Replace("\n","");   
  string   content=SMS.Substring(58);   
  for(i=content.Length-2;i>=0;i-=2)   
  {   
  by=Convert.ToByte(content.Substring(i,2),16);   
  str+=Convert.ToString(by,2).PadLeft(8,'0');   
  }   
  for(i=str.Length-7;i>=0;i-=7)   
  {   
  by=Convert.ToByte(str.Substring(i,7),2);   
  ascii=(char)by;   
  c+=ascii.ToString();   
  }   
  return   c;   
  }   
  }   
  }