MainForm.ImageEnViewMain.LayersClear;
MainForm.ImageEnViewMain.Blank;
MainForm.ImageEnViewMain.MouseInteract := [];
MainForm.ImageEnViewMain.Update;
//============= Load user selected File
if FileExists(fName) then
begin
    MainForm.ImageEnViewMain.IO.Params.PSD_LoadLayers := True;
    MainForm.ImageEnViewMain.IO.LoadFromFilePSD(fName);
    MainForm.ImageEnViewMain.MouseInteract := [miMoveLayers, miResizeLayers];
    MainForm.ImageEnViewMain.Layers[0].Locked := True;
    MainForm.ImageEnViewMain.Update;
end
else
begin
    ShowMessage('Cannot Open "PSD" File');
    exit;
end;

MainForm.ImageEnViewMain.IO.Params.PSD_LoadLayers := False;
MainForm.ImageEnViewMain.IO.LoadFromFilePSD(fName);
MainForm.ImageEnViewMain.IO.Params.PSD_LoadLayers := True;
MainForm.ImageEnViewMain.IO.LoadFromFilePSD(fName);

procedure TForm1.Button1Click(Sender: TObject);
begin
  { loads two layer pictures and saves as a 2-layer psd file }
  ImageEnView1.IO.LoadFromFileJpeg('back.jpg');
  ImageEnView1.LayersAdd;
  ImageEnView1.IO.LoadFromFilePNG('transp.png');
  ImageEnView1.Update;
  ImageEnView1.IO.SaveToFilePSD('saved.psd');
end;

procedure TForm1.Button2Click(Sender: TObject);
var
  psd: TImageEnView;
begin
  { creates a new variable to read and store the psd file }
  psd := TImageEnView.Create(nil);
  psd.IO.Params.PSD_LoadLayers := true;
  psd.IO.Params.PSD_ReplaceLayers := true;
  psd.IO.LoadFromFilePSD('saved.psd');  { <<<< this line gives an EAccessViolation error in imageenview line 13388 }
  { then assigns its content to the original picture }
  ImageEnView1.Assign(psd);
  ImageEnView1.Update;
  psd.Free;
end;

I'm kinda stuck here. I can't read multi-layered .psd files, nor individual layers from psd files using a third Button3:

procedure TForm1.Button3Click(Sender: TObject);
var
  psd: TImageEnView;
begin              
  { similar as above, but now only load layer 2 }
  psd := TImageEnView.Create(nil);
  psd.IO.Params.PSD_LoadLayers := true;
  psd.IO.Params.PSD_SelectLayer := 'Layer 2';
  psd.IO.LoadFromFilePSD('saved.psd');
  ImageEnView1.Assign(psd);
  ImageEnView1.Update;
  psd.Free;
end;