Wenn du die Zeilennummer kennst und weisst, das [ und ] jeweils nur ein mal vorkommen, kannst du das so machen:
Delphi-Quellcode:
var
temp, Inhalt: string;
begin
temp := Memo1.Lines[LineNum];
Inhalt := Copy(temp, Pos('[', temp)+1, pos(']', temp)-pos('[', temp)-1);
end;