Zitat von
DeddyH:
Versuch malif (Sender is TLabel) and (TLabel(Sender).Name = 'Lab2') then halt;
Das ist gefährlich, da es ja möglich wäre, dass die vollständige boolsche Auswertung aktiviert ist. In dem Fall würde es hier krachen. Ich gehe in solchen Fällen auf Nummer Sicher und schreibe das lieber so:
if (Sender is TLabel) then if (TLabel(Sender).Name = 'Lab2') then halt;