Ajuda - Busca - Membros - Calendário
Versão Completa: Retorno De Formulário
Fórum Script Brasil > Programação & Desenvolvimento > Delphi, Kylix
Pu££3y

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....

Churc
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
Pu££3y
ai Churc

Valeww Pela Dica funcionou Direitinho Usei Um Form mesmo pois Tenho que fazer algumas Restrições De inserção no Edit + Achei Legal Tambem pelo Outro metodo o "InputBox" não Sabia Dele

Waleuuuuu Amigo muito Obigadooo......
Esta é uma versão simplificada de nosso conteúdo principal. Para ver a versão completa com maiores informações, formatação e imagens, por favor clique aqui.
Invision Power Board © 2001-2012 Invision Power Services, Inc.