procedure popupAktionen_OnItemClick(SenderName: string); begin; if SenderName = 'MenuDialogDrucken' then begin printActiveDialog(100); end; end;