Zitat von
Motzi:
Zitat von
Luckie:
Delphi-Quellcode:
if MyFruit is TCitrusFruit then
(MyFruit as TCitrusFruit).Squeeze
Genau sowas hab ich gemeint sollst du vermeiden..!
Na ja, aber wenn man dem Benutzer keine
Exception präsentieren will, soll man dann einen try..except-Block nehmen
Also ich finde obiges Konstrukt besser als
Delphi-Quellcode:
try
with (MyFruit as TCitrusFruit) do
Squeeze;
except
ShowMessage('Das hier soll durch eine gescheite Fehlerbehandlung ersetzt werden');