Código Delphi [-] elwhere := 'where codigo_principal = ' + QuotedStr(edit1.text) ;
elwhere := 'where codigo_principal = ' + QuotedStr(edit1.text) ;