Example code : UpperCase, LowerCase, ToLower, ToUpper 
 | 
 
procedure TForm1.W3Button15Click(Sender: TObject); 
var abc, lower, upper : string; 
  
begin 
// Convert a lower case letter to upper case 
lower := 'g'; 
upper := UpperCase(lower); 
  
// Display these letters 
WriteLn('lower = '+lower+' upper = '+upper); 
  
abc := "How are you doing today?;I'm fine, and you?"; 
WriteLn(abc.ToLower); 
WriteLn(LowerCase(abc)); 
  
WriteLn(abc.ToUpper); 
WriteLn(UpperCase(abc)); 
  
end; 
  
 | 
 
 
 
 | 
 
 
 
lower = g upper = G 
how are you doing today?;i'm fine, and you? 
how are you doing today?;i'm fine, and you? 
HOW ARE YOU DOING TODAY?;I'M FINE, AND YOU? 
HOW ARE YOU DOING TODAY?;I'M FINE, AND YOU?  
  
  
function W3Button1Click(Self, Sender$13) { 
      var str$2 = undefined; 
      var abc$4 = ""; 
      abc$4 = "    How are you doing today?;I'm fine, and you?   "; 
      abc$4 = Trim$_String_Integer_Integer_(abc$4,8,23); 
      WriteLn(DupeString(abc$4,3)); 
      WriteLn(DupeString(abc$4,2)); 
      WriteLn(StringOfString(abc$4,3)); 
   } 
 | 
 
 
 
 |