Hola, el problema está en la creación del objeto y en la forma de usar delimitedText. Ya que los datos vienen separados por comas mejor que DelimitedText deberías usar CommaText:
Código Delphi
[-]
procedure TformPrincipal.btnAbrirClick(Sender: TObject);
var Dir: string;
t :TStringList;
begin
if CargarPLU.Execute then
begin
t := TStrinList.Create;
t.Clear;
Memo.Clear;
Dir := CargarPLU.FileName;
Memo.Lines.LoadFromFile(Dir);
eDireccion.Text := Dir ; t.CommaText := Memo.Lines.Text;
Memo2.Lines.Assign(t); t.free;
end;
end;