Un array con problemas

[Dado de baja]

Muchas gracias ArdiIIa

Mira lo que era:

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 :

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.

[[ArdiIIa]]

Lo que me sorprendió es que pudieras compilar tu código teniendo en cuenda el lugar conde habías puesto el const y por otro lado, al recorrer el Array tal como lo tenías inicialmente, contabas un elemento más de los existentes.
Por lo demás, me parece una estupenda idea.