Try-except Handel virker ikke

Hvad er der galt her ?

i stedet for min Messagedlg så kommer der en error \"Access violation\"

Try
    EditListe.Sort(@EditSortProc);
  except
    on E: Exception do Messagedlg(\'Fejl !!!\',mtConfirmation,[mbok],0);
    Exit;
  end;