NormalizeHeader function

function NormalizeHeader(Value: TStrings; Var index: Integer): string;

Unit
mimepart

Description
Read header from "Value" stringlist beginning at "Index" position. If header is Splitted into multiple lines, then this procedure de-split it into one line.