Poner el contenido de un label en una tabla dbf

[Jucho69]

Hola.....

¿Acaso es posible copiar el contenido de un label en una tabla?
Por ejemplo tengo la tabla Indicadores.dbf vacia y mediante una consulta SQL cullo resultado se almacena en un label (o componente similar) deseo insertar ese resultado directamente en la uvicación que yo escoja.

Se que con las sentencias INSERT INTO se puede insertar datos en las tablas pero no lo he podido lograr hasta ese detalle (si es que se puede hacer).



Gracias.

[Onti]

Si utilizas un Table podrías usar un código similar a:

Código Delphi [-]
  Table1.Append;
  Table1.FieldByName('Campo').AsString :=Label1.Caption;
  Table1.Post;

Y si decides usar un query

Código Delphi [-]
  Query1.close;
  Query1.SQL.Clear;
  Query1.SQL.Add('INSERT INTO TABLA (CAMPO1) VALUES ('+QuotedStr(Label1.Caption)+')';
  Query1.ExcSql;

[Jucho69]

Hola Onti....

Aunque no puedo probar en este momento el código te agradezco mucho tu ayuda y estoy seguro de que es la solución correcta, como tantas que he recibido de otros Moustros aquí en el Foro.

Gracias una vez más.

[Onti]

aquí a la orden

[Jucho69]

Hola Onti....

Al fin hoy pude probar el codigo que me enviaste y por su puesto está de mas decir que funcionó bién con este ejemplo:

begin Table1.Append;
Table1.FieldByName('ene').AsString :=Label51.Caption;Table1.FieldByName('feb').AsString :=Label52.Caption;
Table1.FieldByName('mar').AsString :=Label53.Caption;Table1.FieldByName('abr').AsString :=Label54.Caption;
Table1.FieldByName('may').AsString :=Label55.Caption;Table1.FieldByName('jun').AsString :=Label56.Caption;
Table1.FieldByName('jul').AsString :=Label57.Caption;Table1.FieldByName('ago').AsString :=Label58.Caption;
Table1.FieldByName('sep').AsString :=Label59.Caption;Table1.FieldByName('oct').AsString :=Label60.Caption;
Table1.FieldByName('nov').AsString :=Label61.Caption;Table1.FieldByName('dic').AsString :=Label62.Caption;
Table1.Post; end;

De esta forma puedo ir llenando todas las celdas de cada registro de la tabla que utilizaré para el reporte, aunque tengo que utilizar tantos label como celdas tenga la tabla, pero no importa, tu solución fue perfecta de sobra.


Gracias mi hermano.