yo en vez de tanta comilla uso #39.
osea algo asi:
sql:='SELECT * FROM TABLA WHERE NOMBRE='+#39+EDIT1.TEXT+#39;
o en tu caso:
sql:='Select * from Productos where RefInterna like '+#39+ TxtPatron.Text +'%'+#39;
y es menos compicado en caso de que se te pierda una comilla
Saludos
PD: en codigo ascii #39 = '