guardar datos de una fila seleccionada de un dbrig en variables

[[Caral]]

Hola
Pregunto:
Donde declaras las variables??.

Código Delphi [-]
procedure Tcodigo.BitBtn1Click(Sender: TObject);
var
cod: Integer;
desc: String;
begin
if DBGrid1.SelectedRows.Count>0 then
with DBGrid1.DataSource.DataSet do
for i:=DBGrid1.SelectedRows.Count-1 downto 0 do
begin
GotoBookmark(pointer(DBGrid1.SelectedRows.Items[i]));
cod:=adotable1.fieldbyname('Código').AsInteger;
desc:=adotable1.fieldbyname('Servicio').AsString;
end;

edit1.Text:=inttostr(cod);
edit2.Text:=desc;
end;

Saludos