Thanks for your help, I change before i put table field but send a error calculatin size of field so i change as suggest on getvalue change value and is working thanks so much..
if(ParName='Product Code') then begin
ParValue:=DM.SQLQProds.FieldByName('pnpartnumber').AsString;
end;