Ссылка на void функцию контрола

double *adr  = &(ILSegmentGauge1->Value);
*adr  = *adr+5.5;

class PASCALIMPLEMENTATION TILSegmentGauge : public TILBasicSegmentGauge 
{
    typedef TILBasicSegmentGauge inherited;
    
protected:
    Owstdtypes::TOWRealAndRangedSinkPin* FInputPin;
    void __fastcall OnSetValueEvent(Owpins::TOWPin* Sender, double AValue, double AMin, double AMax, bool RangesFilled);
    virtual void __fastcall SetListOwner(Classes::TComponent* AValue);
    
public:
    virtual void __fastcall Loaded(void);
    __fastcall virtual TILSegmentGauge(Classes::TComponent* AOwner);
    __fastcall virtual ~TILSegmentGauge(void);
    
__published:
    __property Owstdtypes::TOWRealAndRangedSinkPin* InputPin = {read=FInputPin, write=FInputPin};
    __property double Value = {read=FValue, write=SetValue};
    __property double Max = {read=FMax, write=SetMax};
    __property double Min = {read=FMin, write=SetMin};
public:
    #pragma option push -w-inl
    /* TWinControl.CreateParented */ inline __fastcall TILSegmentGauge(HWND ParentWindow) : TILBasicSegmentGauge(ParentWindow) { }
    #pragma option pop
    
};

struct IndiList{
AnsiString nameIndi; //имя индикатора
AnsiString nameVar; // имя переменой которая привязывается к индикатору 
double *valueIndil;   //указатель на поле Value индикатора
void *fRefresh()       // указатель на функцию Refresh() индикатора 
};