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判断字符串是否包含限制以外的字符 否则置空

Delphi fmx用timage显示不同格式的图片

Delphi xe将图标和图像添加为资源

d10环境下调用hidcontroller1.0.35获取数据乱码问题

Delphi randstring 随机字符串

Delphi 获取当前输入法

Delphi tbitmap 位图组件

Delphi 定时鼠标模拟点击

Delphi 动态创建组件，单个创建、单个销毁

Delphi中获取memo鼠标所在位置的行和列

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

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