Delphi中判断一个字符的位置在字符串开头或者末尾

本文整理自网络，侵删。

 
procedure TForm1.btn1Click(Sender: TObject);
var s: string;
begin
  s := 'abcdefghijkilkjasldnbG';
  if s[1]='a' then
    ShowMessage('a 在开始位置');
  if s[Length(s)]='G' then
    ShowMessage('G 在最后一位');
end;
 

相关阅读 >>

Delphi memo 自动滚动到最底下

Delphi 遍历所有edit控件

Delphi rest api post sample

tstringgrid 添加鼠标拖动功能

Delphi 中文大写日期转换函数

Delphi 横竖屏代码控制

Delphi 判断是否为二进制文件

Delphi 试试带参数的 exit

Delphi firedac连接oracle

Delphi xe5 for android memo控件 无法读取txt文件

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi中判断一个字符的位置在字符串开头或者末尾