wap!delphi能做到！—— 应用于移动电话的WML(Wireless Markup Language）开发

wap!delphi能做到！—— 应用于移动电话的WML(Wireless Markup Language）开发(8)           'City="' + City + '"'#13 +
          'Zip="' + Zip + '"'#13);
       Customer.Edit;
          CustomerState.AsString := State;
          CustomerCity.AsString := City;
          CustomerZip.AsString := Zip;
          Customer.Post;
          Content := WMLHeader +
            '< card id="modifyok" title="Info ' +
            'Modified" newcontext="true" >' + CRLF +
            '  < onevent type="ontimer" >' + CRLF +
            '    < go method="post" ' +
            'href="/scripts/ma_ooqs.dll/mainmenu" >' +
           CRLF + '      < postfield name="custid" ' +
            'value="' + HTTPEncode(CustID) + '"/ >' + CRLF +
            '    < /go >' + CRLF + '  < /onevent >' + CRLF +
            '  < timer value="30"/ >' + CRLF + '  < p >' +
            CRLF + '  < b >Customer info sUCcesfully '+
            'modified.< /b >< br/ >' + CRLF + '  < /p >' + CRLF +
            '< /card >' + CRLF + CRLF + '< /wml >' + CRLF;
        end
      else
        Content := InvalidIDPageWML;