TXT文本里有 yyyyy ‘xxxxxxxx’ yyyyyy 这一句话， 如何用POS语句把里面的xxxxxxx字符提取出来，撇开符号。用delphi7

在Delphi 7中，你可以使用内置的String函数或者正则表达式库来提取字符串`'xxxxxxxx'`。这里是一个简单的示例，使用`Pos`函数配合`Copy`函数：

var
  InputString: string = 'yyyyyy ’xxxxxxxx’ yyyyyy';
  StartIndex, EndIndex: Integer;
  
StartIndex := Pos('’', InputString); // 找到左引号的位置
if StartIndex <> 0 then
begin
  Inc(StartIndex); // 跳过单引号
  EndIndex := Pos('’', InputString, StartIndex); // 找到右引号的位置
  if EndIndex > 0 then
  begin
    ExtractSubstring:= Copy(InputString, StartIndex, EndIndex - StartIndex); // 提取中间部分
    ShowMessage(ExtractSubstring); // 显示提取的结果
  end;
end;

如果你想要更灵活地处理非标准字符或者需要使用正则表达式，可以使用`RegExReplace`函数结合`TRegEx`组件。例如：

uses
  System.RegularExpressions;

var
  Regex: TRegEx;
  Match: TMatchCollection;
  
// 创建一个正则表达式实例
Regex := TRegEx.Create('\'(\w*)\'');
try
  // 在输入字符串上搜索匹配项
  Match := Regex.Execute(InputString);
  
  if Match.Count > 0 then
  begin
    // 获取第一个匹配到的子串（去掉引号）
    ExtractSubstring := Match[0][1];
    ShowMessage(ExtractSubstring);
  end
finally
  Regex.Free; // 释放资源
end;