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 �c 使用createoleobject后释放olevariant

Delphi 自带的 base64 编解码函数

Delphi 串口控制继电器

Delphi 两个exe之间共享数据

Delphi 映像劫持编辑器

字符串截取小例子Delphi源代码

Delphi 获取 cpu 使用率的单元

Delphi 设计一个有渐变色的标签

Delphi字符串旋转任意角度

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

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