Ver Mensaje Individual
  #2  
Antiguo 14-07-2014
Avatar de olbeup
olbeup olbeup is offline
Miembro
 
Registrado: jul 2005
Ubicación: Santiago de la Ribera (España)
Posts: 685
Reputación: 19
olbeup Va camino a la fama
Cita:
Empezado por camiz Ver Mensaje
Hola amigos del foro, quiero que me ayuden con esto:
Les comento que estoy trabajando en una aplicacion que va a trabajar en red y la base de datos es SQL server.

lo que pasa es que tengo una duda con los clientes al momento de registrarlos, lo que hago es generar un codigo de cliente ejem
000001, este codigo lo genero de un campo de la tabla clientes y lo muestro en un TEdit en el form, hasta ahi bien.
supongamos que mientras yo estoy llenando el resto de informacion del cliente otro usuario tambien quiere dar de alta otro cliente el codigo que va a generar va a ser el mismo 000001.
¿ Como hago para decirle al otro usuario que el codigo 000001 es mio y por lo tanto el tiene que generar el 000002 ?

estoy utilizando este codigo para coger el numero mas alto del campo en delphi, pero que tengo que hacer con SQL Server. Estoy utilizando la version 2012 Express.

Código Delphi [-]
with frmConeccion.Codigos_Gen do
begin
  SQL.Clear;
  Close;
  SQL.Text := 'Select max(CODIGO) as CODIGO from CLIENTES';
  Open;
  txtcodigo.text := FloatToStr(FieldByName('CODIGO').AsInteger +1);
  Close;
  Active := False;
end;
Hola camiz,
Cambia el
Código Delphi [-]
textcodigo.text := FloatToStr(FieldByName('CODIGO').AsInteger +1);
por el
Código Delphi [-]
textcodigo.text := FormatFloat('000000', StrToInt(FieldByName('CODIGO').AsInteger +1));

Un saludo.
__________________
Al hacer una consulta SQL, haz que los demás te entiendan y disfruten de ella, será tú reflejo de tú saber.
Responder Con Cita