Delphi com Wap

24/08/2003

0

Caros amigos,

No livro Delphi 7 Internet e banco de Dados o exemplo numero 1 do
capitulo Aplicações para Celulares pag. 185.

Instalei o programa Deck-It para simular uma celular wap e estou utilizando PWS com servidor web.

Na linha de endereço do Deck-It se eu digitar http://127.0.0.1 aparece a
seguinte mensage Bem Vindo ao Microsoft Persona Web Server. Isso mostra que o Deck-It funcionou corretamente.

Mas o meu problema é que quando eu digito http://127.0.0.1/Project1.exe
aparece a seguinte mensagem no Programa Deck-It

Malformed Http Response

Segue abaixo o código no evento action

procedure TWebModule1.WebModule1padraoAction(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
begin
Response.ContentType := ´text/vnd.wap.wml´;
Response.Content := ´<?xml version=´1.0´?><!DOCTYPE wml PUBLIC
´-//WAPFORUM//DTD WML 1.1//EM´´+
´´http://www.wapforum.org/DTD/wml_1.1.xml´>´ +
´<wml><card id=´cartaum´><p>Ola Mundo
...!</p></card></wml>´;

end;

Obs.: Se eu chamar essa aplicação pelo browse roda perfeitamente.

Abraço

Mantmor


Mantmor

Mantmor

Responder

Assista grátis a nossa aula inaugural

Assitir aula

Saiba por que programar é uma questão de
sobrevivência e como aprender sem riscos

Assistir agora

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar