Alguém pode me ajudar nesse erro ? O que faço de errado ?

O erro está no ***
e diz assim imcompatible types Tpersistent And String , alguém pode me dar uma força, declarei as variaveis só não sei o que tou errando.


codigo := strtoint(DataModule1.TableProdutoCodprod.AsString);


begin
if (Edit2.Text <> ´´) and (Edit1.text <> ´´) then

*** DataModule1.TablePedidoCodprod.Assign (inttostr(codigo)) ;