exception in lokaler Subroutine verarbeiten

[messie]

Hallo,

ich habe hier eine Routine lokal verwendet und will darin Exceptions abfangen. Das klappt, allerdings springt der Online-Debugger zunächst in die Hauptroutine zurück, bevor er die except-Klausel abarbeitet.

Ist das nur eine Frage des Debuggers oder gibt es in dieser Struktur mit der lokalen Routine ein anderes Verhalten der Exceptionbehandlung?

Delphi-Quellcode:

procedure TForm1.TntButton1Click(Sender: TObject);
var
 s : string;

   //lokal
   function TryConvert(input : String) : real;
   begin
     try
       result := StrToFloat(input);
     except
       ShowMessage('das hier anzeigen');
     end;
   end;
begin
  try
    TryConvert('Unsinn');
  except
    ShowMessage('das hier eigentlich nicht anzeigen!');
  end;
end;

Grüße, Messie