Add an Attribute using Delphi

[cvg]

Hi there,  Can you help?  I'm not progressing far in my attempts to add a new attribute to a class using Automation with Delphi.  I'm able to access my model and peruse it.  I can obtain the class I want to use but I can't figure out how to add an attribute.  Here is a snipet of my code - what am I doing wrong?

procedure TForm1.GetClassClick(Sender: TObject);
var
  IDC: IDualCollection;
  IDE: IDualElement;
begin
   IDC:= Repository1.Models;  //use an IDualCollection
   IDE:=  Repository1.GetElementByID(107);
   //create an attribute
   IDE.Attributes.AddNew('newAttribute','string');
   // save it
   if NOT IDE.Update() then Memo1.Lines.Add('error');
   IDE.Attributes.Refresh;
end;

Many thanks.

[Geert Bellekens]

Try

Code: [Select]

IDE.Attributes.AddNew('newAttribute','Attribute')
Geert

[cvg]

Thanks Geert.
At long last I think I'm getting the hang of using Delphi and the Automation Interface.