function string Left

(

string SourceString,integer Length)

Description:

Returns a specified chunk of a string starting from the beginning.


Parameters:
SourceString	The string from where the data will be extracted
Length	The length of the data that will be extracted

procedure RemoveCharacterFromString(var string res,string character)
BEGIN
  Integer i,l;
  string 255 tstr,t2;
  
  tstr = res;
  l = len(res);
  for (i=l;i>=1;i=i-1) begin  
    if (CharacterMatch(tstr,character,i)) then begin
      res = Left(tstr,(i-1));
      t2 = Right(tstr,(len(tstr)-i));
      res = res & t2; 
      tstr = res;       
    end;
  end;
  RETURN;
END;


Related topics:

««