crystal_tlb 파일의 아래 부분을 수정해 보세요
아마 그럼 될 겁니다.
procedure TCrystalReport.Set_Formulas(index: Smallint; const px: WideString);
{ Warning: The property Formulas has a setter and a getter whose
types do not match. Delphi was unable to generate a property of
this sort and so is using a Variant as a passthrough. }
var
InterfaceVariant: OleVariant;
begin
InterfaceVariant := DefaultInterface;
InterfaceVariant.Formulas[index] := px;
// InterfaceVariant.Formulas := px;
end;