Delphi字符串转换为整及Case of语法

1、字符串转换为整数

var
  strNumber: string; // 要转换的字符串
  intValue: Integer; // 存储转换后的整数值
begin
  strNumber := '123'; // 设置要转换的字符串
  
  // 调用StrToInt进行转换
  intValue := StrToInt(strNumber); 
  // 显示转换后的整数值  
  ShowMessage('转换结果为：' + IntToStr(intValue)); 
end.

2、Case of

语法格式：
 Case(表达式)  of

    值1：语句1；

    值2：语句2；

    值n：语句n；

    Else   //这里的Else之前可以有分号
      语句n+1;
 end;
 
或者：

 Case(表达式)  of
     值1，值2：语句1；
     
 Else   //这里的Else之前可以有分号
    语句n+1;
 end;