Mensage Box

[mestre fyoda 1]

eu mexo com Vb e tem o comando MSGBOX , tem algum comando parecido no delphi ?

[bdexterholland 0]

não sei como é no vb, mas o delphi tem o showmessage, messagedlg e (acho) mais uma que não me lembro....

[mestre fyoda 1]

esse showmensage ele tem um campo para digitar algo ? e o outro quem souber posta ia por favor .

[Marostegan 0]

ShowMessage('Sua mensagem aqui!');ele mostra uma janela com a msg que você digitar ali...ex.se você colocar isso dentro de um button, quando alguem clicar nele, vai mostrar uma janela com o aviso que você colocou ali

[mestre fyoda 1]

um showmesage mas dentro dele um campo text que é do proprio componente , existe ?

[Marostegan 0]

um showmesage mas dentro dele um campo text que é do proprio componente , existe ?

o que você quer fazer com ele?

[mestre fyoda 1]

quero fazer uma busca .

[Marostegan 0]

fazer uma busca das informações de um BD? e qual BD?

[mestre fyoda 1]

mani é um showmessage mas dentro dele um campo Texto que vem do componente .

[Marostegan 0]

bom, nao sei se vai ajudar mas...varContadorDinamico : array of string;BeginSETLENGTH(ContadorDinamico,length(edit1.text));showmessage(inttostr(length(contadordinamico)));end;EXPLICAÇÃO:O length pega a quantidade de caracteres do edit e repassa esta informação para o vetor, armazendo pelo SetLength.Na segunda linha o length conta o que foi armazenado pelo SetLength.Atenção! Imaginemos que o texto do edit seja 'edit1'. O SetLength armazenou o vetor de 0 a 5, contudo o length conta iniciando do 1.Caso tenha ainda dúvidas, coloque abaixo da linha do show message, esta 2 (duas) linhas para entender.showmessage(inttostr(low(contadordinamico)));showmessage(inttostr(high(contadordinamico)));esse comando faz com que o delphi conta quantos dígitos tem dentro da edit e retorna a quantidade de valor em um showmessage...testa esse exemplo ai e ve se era +/- isso que você quer... dai é só modificar o código...espero que ajude....

[mestre fyoda 1]

eu ja vi como se faz :

teste := Inputbox('Título','Digite algo','valor default');