problemas con las comillas ("")

[Critter]

puedes utilizar la funcion QuotedStr de la unidad SysUtils de la forma:

texto := QuotedStr(Edit1.Text);
Query.SQL.Add ('Select * from basededatos where clave='+texto);