Vaya, el Error del principio es tipografico pero esta solo en el Foro, tanto el "=" como el Querry, voy a colocar el código tal cual lo tengo en mi Soft (Nada como Copiar y Pegar)
Código Delphi
[-]
var
filtro:string;
i:integer;
begin
filtro := EmptyStr;
if OpenArch.Execute then
begin
MArch.Lines.LoadFromFile(OpenArch.FileName);
MArch.Enabled := False;
End;
for i:=0 to MArch.Lines.count -1 do
filtro := filtro +', '+QuotedStr(MArch.lines[i]);
delete(filtro,1,1);
DMRomaneo.ADOQArticulos.SQL.Text := 'select Codigo,Descripcion from Articulo where Codigo in ('+ filtro+')';
DMRomaneo.ADOQArticulos.Open;
end;
Tiene que ir en el MEMO por una cuestion de Control, es como dice jhonny, el TXT es generado por otro porg y debe ser comparado con la DB.
Esto es solo a modo aclarativo ya que los primeros errores mensionados ya estan solucionados, faltaba el signo "+" al final, una vez solucionado mi prog corre pero larga un error de ODBC
"no coinciden los tipos de datos en la Expresion de criterio"
Creo que se refiere a que los campos de la Tabla no coinciden, pero lo he verificado y la verdad coinciden hasta con las letras mayusculas, o es por que los tipos no coinciden integer y otro tipo string??
Prometo prender belas y colgar mi proyecto en este hilo solo tiene que funcionar............
Gracias Totales x la buena Onda