filtrar tabla paradox y copiar a otra

[[Caral]]

Hola
Traduccion de lo que haces:
1.Edite la tabla1
2.con el query1 haga esto:
3.inserte dentro de X
4.Seleccione campo de una tabla.
5.donde campo = edit1
6.ejecute.
Perdona, pero esto si te funciona , me parece casi imposible, por eso te lo puse para analizarlo un poco.
Logica:
1.Seleccione campo de una tabla.
2.donde campo = edit1
3.abra tabla.
4.inserte dentro de X o edite
5.ejecute.
Analiza un poco la logica y veremos como te va.
Creo que darte el codigo correcto, en este caso te perjudica, no aprendes.
Saludos

[ContraVeneno]

Muy simple. Estas pasando edti1.text dentro de la cadena, no como valor; mas bien deberías usar algo así:

Código Delphi [-]
  with query1 do
  begin
 SQL.Add('INSERT INTO portable (Materia)');
 SQL.Add('SELECT materia FROM califica');
 SQL.Add('WHERE Materia = '''+Edit1.text+'''');
 ExecSQL;
end;

//O cualquiera de estas:
SQL.Add('WHERE Materia = '+QuotedStr(Edit1.text));
//-
SQL.Add('WHERE Materia = :Materia');
ParamByname('Materia').AsString:=edit1.text;
/-

Y dos cosas más:
1.- Si vas a usar "With Query1 do", no es necesario que sigas poniendo "Query." en cada línea, de eso se encarga el "With". Así como lo tienes, es como si te subieras a un coche y te lo llevaras empujando.

2.- ¿Para que es el Table1.Edit? ¿Esta enlazado a la misma tabla del query? Si es así, no necesitas hacer las dos cosas.