一个很怪的问题！关于LeftStr 和 RightStr提取字符串问题！

Question

各位大哥！           请问一下有谁知道为什么我在D7里面用LeftStr和RightStr提取字符串中的字符时会不行呢！D7提示：
[Error] W4001A.pas(85): Undeclared identifier: 'leftstr'
[Fatal Error] TangDY.dpr(40): Could not compile used unit 'W4001A.pas'
这到底是怎么回事啊！应该怎样解决请帮帮忙！谢谢！

Answer 1

确定缺少对 StrUtils 单元的引用。

Answer 2

function LeftStr(const AText: AnsiString; const ACount: Integer): AnsiString; overload;
begin
  Result := Copy(WideString(AText), 1, ACount);
end;function LeftStr(const AText: WideString; const ACount: Integer): WideString; overload;
begin
  Result := Copy(AText, 1, ACount);
end;function RightStr(const AText: AnsiString; const ACount: Integer): AnsiString; overload;
begin
  Result := Copy(WideString(AText), Length(WideString(AText)) + 1 - ACount, ACount);
end;function RightStr(const AText: WideString; const ACount: Integer): WideString; overload;
begin
  Result := Copy(AText, Length(AText) + 1 - ACount, ACount);
end;