Problema con LIKE en runtime

[anghell77]

Disculpas si esto enfada...no soy demasiado bueno....
a ver.... he declarado STRSQL como dijiste.... String....

Ahora,
Query1.Close;
StrSQL := 'select * from Medicamentos where Sustancia like ' + QuetedStr(Edit1.Text + '%');
Query1.SQL.Text := StrSQL;
Query1.Open;

el problema viene con QuetedStr.. para el cual probé (tal vez pendejamente)..declararla como variable tambien, (string) y me ocurre el tipico error Mising Operator or Semicolon....

si no la declaro, no la identifica....
toy wey.....ayuda!!please!!