Nachdem das Thema grad mal wieder
aufgetaucht ist:
Ein Cast mit "as" enthält ja eine Laufzeittypprüfung und löst bei Fehlschlag eine
Exception aus. Ich hätte jetzt gern, dass die Typprüfung nur dann zuschlägt, wenn
{$ASSERTIONS ON} sind. Momentan schreibe ich immer
Delphi-Quellcode:
Assert(Sender is TButton);
TButton(Sender).Caption := 'Blubb';
, aber das ist auf Dauer ganz schön umständlich für eine Funktionalität, die ich oft benutze. Kennt jemand eine schönere Lösung? Quasi
(Sender assert_as TButton).Caption := 'Blubb';
?
