Можно

-- индульгенция от СМ2000
if supermag.core.getproc is null then
Core_Result := supermag.Core.StartSMApp();
end i