Retorno De Formulário

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