O código está lá. Coloquei o breakpoint neste evento, mas não passa lá.
--- Em sex, 7/11/08, Eduardo Silva dos Santos <[EMAIL PROTECTED]> escreveu: De: Eduardo Silva dos Santos <[EMAIL PROTECTED]> Assunto: Re: [delphi-br] Executar evento do botão na IntraWeb Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 7 de Novembro de 2008, 14:05 seleciona o botão e no object inspector vai a aba events.. e veja se ta no evento onClick,, só pra confirmar.. se estiver depure o código que tem algo nele.. 2008/11/7 fabio giro <[EMAIL PROTECTED] com.br> > > Seguindo meus testes, criei uma tela de cadastro (código e nome). No botão > Consultar, dei duplo clique e coloquei uma rotina. Fez nada. Coloquei um > BreakPoint. Não passa. Fui na propriedade ScriptEvents e coloquei a mesma > rotina. Nada. No botão Voltar, o mesmo problema. Falta alguma coisa? A > rotina é essa: > > procedure TiwCadSind.btConsul tarClick( Sender: TObject); > begin > if strtointdef( trim(meCodigo. text),0) = 0 then > begin > WebApplication. showmessage( 'Código não informado'); > meCodigo.setfocus; > exit; > end; > AtualizaTela; // mostra os dados na tela > if trim(chave_ant) = '' then > WebApplication. showmessage( 'Registro não encontrado') ; > end; > > procedure TiwCadSind.btVoltar Click(Sender: TObject); > begin > Release; > end; > > -- ............ ......... ......... ......... ......... ....... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 (27) 8842-9489 MSN: eduardo.drd@ gmail.com Site: http://www.drdsiste mas.com.br/ ............ ......... ......... ......... ......... ....... [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
