Ver Mensaje Individual
  #1  
Antiguo 11-01-2013
Avatar de BPL
BPL BPL is offline
Miembro
 
Registrado: ene 2009
Posts: 47
Reputación: 0
BPL Va por buen camino
Crea Query en Tiempo ejecucion

Hola a Todos,,
Les cuento, estoy recien entrando al mundo de las ADT, por ende estoy migrando todos mis sistemas que trabajaban con DBF (Delphi y Motor Advantage)
pero me encontre con un problema que no he podido resolver, les explico

// Esta rutina Crea una Query en tiempo de Ejecucion
Qr := TAdsQuery.Create(xOw);
Qr.DatabaseName := Datamodule.cnt_data.AliasName ;
Qr.AdsTableOptions.AdsCharType := OEM ;
Qr.AdsTableOptions.AdsRightsCheck := False ;
// Aqui termina la Creacion de la Query

// aca usare la Query recien creada para hacer una Consulta
QR.SQL.Clear ;
Qr.SQL.Add('Insert Into MyTablita (codigo,rut,cargo) ');
Qr.SQL.Add(' values (:codigo,:rut,:cargo)');
Qr.ParamByName('codigo').AsString := Codigo ;
Qr.ParamByName('rut').AsString := Rut ;
Qr.ParamByName('cargo').AsString := Cargo ;
qr.ExecSQL ;
// termino de hacer la Consulta

pues aqui es donde se cae el prg. diciendo que no encuentra la tabla Mytablita.
que podra pasar, faltara algún paramentro en el minuto de crear la Query o definitivamente no es asi...

esto con las DBF me funcionaba impecable...
por fa' si alguien pudiera darme una lucecita se lo agradecera monton....
gracias...
Responder Con Cita