Jump to content
Fórum Script Brasil
  • 0

Retorno De Formulário


Pu££3y
 Share

Question

ai galera Tudo Bem ??

é o Seguinte Tenho Um Formulário de Cadastro de Venda, uso um DbLookupComboBox para selecionar os itens de produto e colocar num StringGrid ...beleza... Ate ai

só Que Queria que no Evento OnCloseUp do ComboBox, chamasse outro FormularioZinho com um Edit só para Informar a Quantidade de itens Que ele Quer Comprar..

Tem Como, Quando Esse FormularioZinho Fechar ele retornar o Valor que O Cara Digitou no Edit dele e usar No Formulári principal de Venda????

Valeu Galera esPeranDu....

Link to comment
Share on other sites

2 answers to this question

Recommended Posts

  • 0

opa

cara mais fácil você fazer o seguinte

uses

Dialogs;

var

szQtd: String;

begin

szQtd := InputBox('Quantidade','Informe a quantidade que deseja adicionar...','1');

em szQtd vai ficar armazenado a quantidade que o cara digitou...

Ai vai aparecer uma janela pré-feita pelo Delphi do jeito que você mencionou, onde

InputBox('Aqui nome da janela...', 'Aqui mensagem', 'Valor padrão exemplo 1');

agora se quiser ainda fazer um formulário, pra retornar o valor digitado nele faça o seguinte

declare uma variavel em public

private

{ Private declarations }

public

{ Public declarations }

szQtd: String;

end;

no OnClose desse form, você joga o valor do Edit a variavel

szQtd := Edit1.Text; //por exemplo

ai pra pegar, é tipo

formulariozinho.ShowModal;

Quantidade := formulariozinho.szQtd;

abraço

Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

 Share



  • Forum Statistics

    • Total Topics
      151k
    • Total Posts
      649.1k
×
×
  • Create New...