Program view HTML file

Delphi & Pascal (česká wiki)
Přejít na: navigace, hledání
Category: KMP (Club of young programmers)
htmlview.pngAuthor: Ľuboš Saloky
Program: Htmlview.pas
File exe: Htmlview.exe
need: Htmlview.zipEmul.txtHtmlview.iniKeyboard.pasMyska.pasSpracuj.pasSprdekl.pasTest.htmTest2.htmZobraz.pasZobrdekl.pas

Program view HTML file.
{ sprdekl.pas                                                        }
{ Definicia triedy Spracuj pre program htmlview.                     }
{                                                                    }
{ Author: Ľuboš Saloky                                               }
{ Datum:02.02.2008                              http://www.trsek.com }
 
type TSpracuj=object
     public
       constructor Init;
       procedure Dokument;
       destructor Koniec;
     private
       f:file;
       s:string;
       Pozicia:integer;
       PoziciaBuffra:word;
       Buffer:array[0..1023] of char;
       VelkostBuffera:word;
       function Blbost(ch:char):boolean;
       procedure VypisB;
       procedure Parameter;
       procedure Dekoduj;
       procedure PridajRiadok;
     end;