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!!