Muchas gracias
ArdiIIa
Mira lo que era:
Código:
procedure TForm1.FormCreate(Sender: TObject);
begin
Msql := Tsql.create;
end;
No estaba inicializando la clase. La verdad es que desconocía esto. Llevo una semana en Delphi.
Muchas gracias, por el interés que has tomado y el trabajazo que te has dado poniendo todo el código.
Te voy a contar un poco de qué va.
Se trata de una unidad para manejar algo Sql, por lo menos lo gordo. La idea es que con asigna(campo, valor) vas llenando el array.
Despues tienes dos metodos Carga(nombretabla):string devuelve un string con la consulta SQL :
Código:
Insert into Articulo ('Codigo','Nombre','PVP','Colo') value ('002','Pelota','25.2','blanca')
Otro metodo para Update con la clausula where, etc.
El resultado que te he mostrado ya lo ha creado la clase que me daba los problemas.
Cuando tenga más soltura intentaré pasarle otros tipos que no sea solo string. Pero aun no se bien como hacerlo.
Así gracias de nuevo por la ayuda.