下面这段是什么意思

maldinichen47 2004-03-06 10:32:19
var
Tmp_str,GroupId : String;
p : integer;
begin
Tmp_str := Trim(AStr);
p := Pos(Filter,tmp_Str);
GroupId := Copy(tmp_Str,1,p-1);
GroupId := Trim(GroupId);
Result := GroupId;
end;
希望能把每一行的意思,解释的清楚一点,
...全文
28 回复 打赏 收藏 转发到动态 举报
写回复
用AI写文章
回复
切换为时间正序
请发表友善的回复…
发表回复

2,495

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 数据库相关
社区管理员
  • 数据库相关社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧