onlyou13

摘要： function GetLeft(sText, sepStr: string): string; var p: Integer; begin p := Pos(sepStr, sText); if p = 0 then Exit(''); Result := Copy(sText, 1, p - 1); end; function GetRight(sText, sepStr... 阅读全文