how to Destroy object/component....

  private
    FieldCount, CompCount: integer;
    EditNo, EditHarga: Array of TEdit;
    ComboBoxItem: Array of TComboBox;
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);

begin
  Inc(FieldCount);
  SetLength(EditNo, 15);
  SetLength(ComboBoxItem, 15);
  SetLength(EditHarga, 15);
  EditNo[FieldCount]:= TEdit.Create(ScrollBox1);
  with EditNo[FieldCount] do
  begin
    Height:= 22;
    Left:= 100;
    Top:= Height*FieldCount;
    Width:= 25;
    Parent:= ScrollBox1;
    Name:= 'EditNo' + IntToStr(FieldCount);
  end;
  ComboBoxItem[FieldCount]:= TComboBox.Create(ScrollBox1);
  with ComboBoxItem[FieldCount] do
  begin
    Height:= 22;
    Left:= EditNo[FieldCount].Left + EditNo[FieldCount].Width + 2;
    Top:= EditNo[FieldCount].Top;
    Width:= 150;
    Parent:= ScrollBox1;
  end;
  EditHarga[FieldCount]:= TEdit.Create(ScrollBox1);
  with EditHarga[FieldCount] do
  begin
    Height:= 22;
    Left:= ComboBoxItem[FieldCount].Left + ComboBoxItem[FieldCount].Width + 5;
    Top:= EditNo[FieldCount].Top;
    Width:= 100;
    Parent:= ScrollBox1;
  end;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
  FieldCount:= 0;
end;
end.

Object.Free;