unterschied except finally?

[Fussball-Robby]

Kleines Beispiel:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  Bmp: TBitmap;
begin
  Bmp := TBitmap.Create;
  try
    try
      Bmp.Width := StrToInt('Hier gibts ne Exception :-)');
    except
      ShowMessage('Der Fehler ist aufgetreten!');
        //das hier wird nur bei einem Fehler aufgerufen
    end;
  finally
    Bmp.Free;
      //wird immer aufgerufen, hier sollten z.B. Objekte freigegeben werden
  end;
end;