Gostei da ideia vou implementar, obrigado
Miguel Villacorta
4446-4100 ramal 4126
7312-5509
[EMAIL PROTECTED]
www.dpfautopecas.com.br
MSN [EMAIL PROTECTED]
-------Mensagem original-------
De: delphi-br@yahoogrupos.com.br
Data: 08/09/05 09:36:28
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Cadastro Multiusuario
Miguel seria bom vc criar uma tabela paralela chamada prox_ped por exemplo,
nela vc coloca o ultimo numero do pedido.
no final do seu pedido vc cria uma rotina +ou- assim:
if prox_ped.active = false then prox_ped.active := True;
prox_ped.last;
prox_ped.edit;
prox_ped.fieldByname('pedido').asinteger :=
prox_ped.fieldByname('pedido').asinteger+1;
prox_ped.post;
v_pedido := prox_ped.fieldByname('pedido').asinteger;
isso deve resolver
ronperso
[EMAIL PROTECTED]
>From: "Wilson Valdevite" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: <delphi-br@yahoogrupos.com.br>
>Subject: Re: [delphi-br] Cadastro Multiusuario
>Date: Tue, 9 Aug 2005 08:55:29 -0300
>
>qual o seu banco de dados???
> ----- Original Message -----
> From: Miguelito
> To: delphi-br
> Sent: Tuesday, February 08, 2005 5:09 PM
> Subject: [delphi-br] Cadastro Multiusuario
>
>
> Pessoal, estou com um probleminha, tenho uma tela para cadastrar
>pedidos, o
> sistema é bem facil e está funcionando com um usuario, ate ai tudo bem,
>so q
> agora é necessário que sejam dois usuarios cadastrando ao mesmo tempo, o
> problema esta na inclusão do registro.
>
> no botão incluir uso uma rotina mais o menos assim
> var proxnum : integer;
> table1.active := true;
> table1.last;
> proxnum := table1pedido.value;
> table1.append;
> table1pedido.value := proxnum + 1;
>
> isso geraria o numero do pedido pesquisando no banco o último numero de
> pedido existente, so que o numero gerado, só existira quando finalizar o
> pedido, a duvida é:
>
> se nesse meio periodo o outro usuario tentar cadastrar um outro pedido
>ele
> vai ter o mesmo numero gerado, ai da pau no pedido.
>
> como posso fazer para evitar esse problema???
>
> Miguel Villacorta
> 4446-4100 ramal 4126
> 7312-5509
> [EMAIL PROTECTED]
> www.dpfautopecas.com.br
> MSN [EMAIL PROTECTED]
>
> ----------
>
> No virus found in this outgoing message.
> Checked by AVG Anti-Virus.
> Version: 7.0.338 / Virus Database: 267.10.1/64 - Release Date: 4/8/2005
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>
>
>
>----------------------------------------------------------------------------
-
> Links do Yahoo! Grupos
>
> a.. Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>
> b.. Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>
> c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>Serviço do Yahoo!.
>
>
>
>
>----------------------------------------------------------------------------
-
>
>
> No virus found in this incoming message.
> Checked by AVG Anti-Virus.
> Version: 7.0.338 / Virus Database: 267.10.2/65 - Release Date:
>07/08/2005
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
_________________________________________________________________
MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
Yahoo!.
----------
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.338 / Virus Database: 267.10.1/64 - Release Date: 4/8/2005
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
