package body MSHTML.IHTMLTableRow3_Object is

   procedure Put_ch
     (This : IHTMLTableRow3_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
   is
   begin
      Put
        (This,
         IHTMLTableRow3_Put_ch,
         GNATCOM.Dispinterface.Parameter_Array'
         (1 => P1),
         Free);
   end Put_ch;

   function Get_ch
     (This : IHTMLTableRow3_Type)
     return GNATCOM.Types.VARIANT
   is
   begin
      return Get (This, IHTMLTableRow3_Get_ch);
   end Get_ch;

   procedure Put_chOff
     (This : IHTMLTableRow3_Type;
      P1   : GNATCOM.Types.VARIANT;
      Free : Boolean := True)
   is
   begin
      Put
        (This,
         IHTMLTableRow3_Put_chOff,
         GNATCOM.Dispinterface.Parameter_Array'
         (1 => P1),
         Free);
   end Put_chOff;

   function Get_chOff
     (This : IHTMLTableRow3_Type)
     return GNATCOM.Types.VARIANT
   is
   begin
      return Get (This, IHTMLTableRow3_Get_chOff);
   end Get_chOff;

end MSHTML.IHTMLTableRow3_Object;

