GARANTIR DESCONTO

Fórum DELPHI 7 - SISTEMA DE SENHAS PARA FILAS #500863

11/11/2014

0

Delphi

Queria fazer um sistema de filas simples, que desse pra eu usar no quick report, aperta o botão, gera a senha 1 e assim consecutivamente até o 999 e um botão que reseta as senhas, se precisar de db gostaria que fosse acess, E NÂO TENHO IDEIA DE COMO COMEÇAR ISSO TUDO
Herlei Rodrigues

Herlei Rodrigues

Responder

Posts

11/11/2014

Ricardo

Não entendi. Você quer desenvolver ou contratar para desenvolver?
Responder

Gostei + 0

11/11/2014

Ricardo

Não entendi. Você mesmo vai desenvolver ou contratar para desenvolver?
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

eu gostaria de fazer, tou desenvolvendo um sistema de fastfood e preciso gerar as senhas dos pedidos, me falaram pra usar senha++;
Responder

Gostei + 0

11/11/2014

Ricardo

Seguem um exemplo com dois botões e dois labels. Basta desenvolver o ticket em alguma ferramenta de relatórios e implementar o que achar necessário.
Quanto a usar um banco de dados não vejo a real necessidade, a não ser que seja algo como um agendamento etc...


var
  Form1: TForm1;
  senha : Integer = 0;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  senha := senha + 1;

  if senha > 10 then
  begin
    ShowMessage('Senha no limite(999)!');
    abort;
  end
  else  
  Label2.Caption := FormatFloat('000', senha);;
  
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
  senha := 0;
  Label2.Caption := FormatFloat('000', senha);
end;
Responder

Gostei + 0

11/11/2014

Ricardo

Somente para testar eu usei a linha:
if senha > 10 then

altere para 999
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

E se eu quisesse usar uma senha dessa no quick report teria jeito ?
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

Por exemplo eu colocar o valor da label no quick report, apareceria a senha que foi gerada ?
Responder

Gostei + 0

11/11/2014

Ricardo

Sim basta você passar o valor da variável para o QRLabel.

Exemplo:

QrRep.QrLabel.caption : = formatfloat('000', senha);
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

puts cara, muito obrigado, exatamente oque faltava, muito obrigado mesmo de coração
Responder

Gostei + 0

11/11/2014

Ricardo

Ficou de acordo? Qualquer coisa só postar que alguém ou até eu mesmo podemos ajudar.
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

Ficou perfeito, serio mesmo, agora só tou apanhando pra relacionar as tabelas e fazer ela salvar na tabela geral, mais isso dou um jeito kkk'
Responder

Gostei + 0

11/11/2014

Herlei Rodrigues

me confundo muito na parte de caixa, porque alem de salvar tem que ficar tudo sepadado pra impressão, dai me confundo na assosiação das db UEHAUSEHUSE'
Responder

Gostei + 0

12/11/2014

Ricardo

Mas qual seria a razão de armazenar essas senhas em um BD?
Responder

Gostei + 0

14/11/2014

Herlei Rodrigues

não, era noia minha, fiquei muito tempo pensando nisso e acabei fritando na batatinha.
Responder

Gostei + 0

21/06/2015

Control Ltda

Certo Ricardo, e se essa senha precisasse ser exibida num painel de chamadas, você tem algo em mente pra isso? Usaria sockets?
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar