like '1*'

[javiermorales]

Te lo digo de memoria, pero que recuerde debes poner la comilla simple y encerrada entre comillas simples.

sql:='Select * from Productos where RefInterna like ''' + TxtPatron.Text + '*'''

Ten en cuenta que son siempre comillas simples, aunque no recuerdo si son 3 ó 4 comillas lo que hay que poner.

sql:='Select * from Productos where RefInterna like '''' + TxtPatron.Text + '*''''

Un saludo