 http 
 

MIDletPascal       HTTP.  HTTP    , 'http'.  HTTP   : 

      web-  
     http  
   -  ()  
       (  ,     POST)  
          
    -    
      
     
   

      HTTP: 

  var conn: http; 
      htmlBody: string; 
      contentType: string; 
  begin 
    if not openHttp(conn, 'http://www.google.com') then halt; 
    setHttpMethod(conn, GET); 
    addHttpHeader(conn, 'User-agent', 'MIDletPascal browser'); 
    if sendHttpMessage(conn) <> 200 then halt; 
    htmlBody := getHttpResponse(conn); 
    contentType := getHttpHeader(conn, 'Content-type'); 
    closeHttp(conn); 
  end. 

      HTTP.   HTTP      Wireless Toolkit  Sun. 
