Agregar dato de un combobox a una columna de un dbgrid

[rufo]

Hola amigos buenos días quisiera ver si me pueden ayudar, resulta que tengo un combobox, dbgrid y un botón de agregar, lo que quiero hacer es que cuando tenga una dato en el combobox y le de clic al botón este me agrege el dato a una columna del dbgrid pero como le hago porque he usado este código pero me da error, espero que me ayuden por favor.

if combobox7.Text<>'' then
   begin
      dbgrid1.Columns.Add.Field.AsString[1](uppercase(combobox7.text));
   end
end;