Problema con LIKE en runtime

[anghell77]

El Dbgrid esta ligado al source y este a un TQuery....
por lo demás fijate, que algo así habia pensado....agregar en elevento on Change o bien en OnKeyDown, sobre el cual esté ejecutando la consulta a cada cambio..... mas sin embargo la instruccion StrSQL no la reconoce al igual que QuetedStr.....no se si requiera añadir algo en el uses...

[[Bicho]]

Hola perdonad que me meta pero,

StrSQL es una variable definida en el procedimiento o de forma global en la aplicación mediante

Código Delphi [-]
var StrSQL : String;

es una variable auxiliar que usa Neftali para guardar el texto de la consulta SQL y después asignarsela a la propiedad SQL.Text del Query.

Saludos

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

[[Bicho]]

Es lógico que no te encuentre QuetedSTR ya que está mal escrito, prueba con QuotedStr

Saludos

[anghell77]

Gracias, Bicho....ese era el error.....y ...Str???Ky.....no recuerdo el nombre, ya lo habia probado,,,jajaja, hice muchas pruebas de eso, y daba error.....

De nuevo, gracias a los involucrados.....una jodida letra y manda todo a la .....Gracias por esa "O" bicho......ya ha funcionado como es requerido...

Saludos

[Neftali [Germán.Estévez]]

Primero y antes que nada, el código era orientativo para darte una idea, no lo he probado (está claro, porque hay un error).

Empezado por anghell77

mas sin embargo la instruccion StrSQL

Como bien han supuesto por aquí es una variable privada al evento OnChange (por ejemplo).

Código Delphi [-]
...
var
  StrSQL:String;
begin
   ...

Empezado por anghell77

...al igual que QuetedStr

Evidentemente; Es también un error (como ya han apuntado); Me refería a QuotedStr; Tal vez tengas que añadir el uses la unit SysUtils, que es donde se encuentra.

EDITO: Veo que ya has llegado a la solución.

[anghell77]

Todo Resuleto, Nef.....Gracias..... a todos....era superurgente......

Thnx

FER