Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Extraer ultimo campo de tabla (https://www.clubdelphi.com/foros/showthread.php?t=49592)

Petolansa 25-10-2007 00:59:33

Extraer ultimo campo de tabla
 
Buenas gente, aca estoy de nuevo acudiendo a su ayuda.
Tengo 2 tablas que las hize como contador de nro de factura, tabla1:contadorA, ya que una es de TIPO A y otra TABLA2;CONTADORb QUE SERIA de TIPO B, ambas en paradox. Los campos de nro de factura son de tipo integer, por que por lo que lei en el foro los campos autoincrementales a la larga dan lio.
Tengo el formulario factura en el cual tengo un boton de nueva factura. Una vez hecho click aqui me lleva a un form en el que elijo entre los tipos de factura ya que el tipo b tiene 4 subdivisiones por asi decirlo, pero no deja de ser b. Lo que quiero hacer es que cuando seleccione el tipo de factura que corresponda, me lleve al formulario de factura original y me muestre el ultimo nro de campo o sea nro de factura por ejemplo en el text de un edit, segun sea tipo b o tipo a, o sea extraer de la tabla que asi correspondiere, ya sea contadorA o contadorB.
Una vez en el edit o label de la factura lo pasare a la tabla factura que es la que guarda los datos definitivos.


Me olvidaba, trabajo con tables y datasources

Agradecido de antemano

marcoszorrilla 25-10-2007 14:54:16

Puedes hacer:
Código Delphi [-]
MiTabla.Last;
Label1.Caption:=IntToStr(MiTablaNumero.Value);
O bien con Sql.

Código SQL [-]
Select Max(numero) From MiTabla
.

Un Saludo

Petolansa 25-10-2007 23:00:06

Gracias
 
Gracias marcoszorrila, ahora si quisiera sumarle uno a ese campo integer como se hace. Hay que declarar una variable para hacerlo, mis disculpas, soy novato.
poner en modo insert la tabla y ahi sumarle 1 no?

intente algo como
Código:

table1numfac.asinteger:=table1numfac.asinteger +1;
obviamente no funciona

Gracias por el tiempo

Lonidas 26-10-2007 00:49:04

Hola, lo que quieres hacer es sumar 1 al mismo registro o a uno nuevo? si quieres sumar al mismo registro tan solo pones
Código Delphi [-]
table1numfac['nombredelcampo']:=table1numfac['nombredelcampo']+1
ahora si quieres un nuevo registro con el siguiente valor guardas el ultimo valor en una variable luego insertas un nuevo registro:
Código Delphi [-]
var num:integer;
num:=table1numfac['nombredelcampo'];
 table1numfac.insert
y asignas el nuevo valor mas 1
Código Delphi [-]
table1numfac['nombredelcampo']:=num+1

Repito si es eso lo que pretendes hacer?

Petolansa 26-10-2007 02:39:53

Gracias
 
Gracias Lonidas era lo segundo, queria ingresar un nuevo registro, te agradezco por tu tiempo.


La franja horaria es GMT +2. Ahora son las 18:35:35.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi