Como asignar un select a un Edit??

[[oscarac]]

digamos que lo que quieres es asignarle a un edit el valor de un campo de la consulta resultante, entonces lo asignarias mas o menos asi

Código Delphi [-]
 
Edit1.text := query.fieldbyname('Campo').value

aunque lo mas conveniente es usar DBEDITS, los cuales asumen el valor del campo en forma automatica, porque estan asociados a traves de un datasource

esperamos tus comentarios

[Niiña]

Bueno necesito el resultado de la consulta en un Edit y en un Label.

No con un BDEdit no lo puedo hacer xq los campos después no los puedo modificar.. Si existe como modificar los datos todavía no lo se. La bd que uso esta en Firebird. Lo que tengo, lo pruebo pero me da error.. Modifique colocandole el .value y me da este error:

Query: Field not found: "idtabla".

No se si estoy haciendo algoo malo o falta algun detalle....

[[oscarac]]

pues... tienes un campo llamado idtabla en tu tabla?
si no lo tienes, es por eso que se genera el error

[Niiña]

Si. si lo tengo.. Pero no tengo idea de xq el error.. Ah y acabo de probar con lo que acabas de colocar y tambien me da error:

Operation cannot be performed on an active dataset.

[[oscarac]]

seria bueno que colocaras mas codigo no solo la porcion donde tratas de jalar el numero maximo sino lo que continua despues de eso...

quiza lo que estes haciendo despues sea el problema.. porque la instruccion que te han pasado deberia funcionar a la perfeccion

[Niiña]

Código Delphi [-]
  ShowMessage('Ingresando datos');
  transaccion.Active:=false;
  Query.Close;
  Query.SQL.Clear;
  Query.SQL.Add('select max(Tabla1.Idtabla)+1 FROM Tabla1');
  Query.Open;
  Edit1.Text:=IntToStr(Query.Fields[0].AsInteger);
  Query.ParseSQL:=false;
  conexion.ExecuteDirect('INSERT INTO Tabla1 (Idtabla, nombretabla) values ('+Edit1.Text+','+Edit2nombre.Text+')');
  transaccion.Commit;
  ShowMessage('El registro ha sido ingresado.');
  transaccion.Active:=true;

[[oscarac]]

depura y dinos donde es que salta el error