Сам спросил сам отвечу

HR := WriteOPCGroupItemValue(GroupIf, Item6Handle, 1 - параметр который необходимо записать);
if Succeeded(HR) then
begin
\\записали
end
else begin
\\Ошибка записи
end;