[sorockinalex]

Разобрался. Просто в дата модуле нужно вверху в объявлении сделать так: TExecuteModal = procedure (Par:string);
Естественно, в самом пакете тоже нужно процедуру с параметром объявить...