Source position: tsd_tag_id3v1.pas line 284
procedure AnsiStringToPAnsiChar(
const Source: string;
Dest: PByte;
const MaxLength: Integer
);