Changeset 115

Timestamp:

May 2, 2016, 11:02:45 AM (8 years ago)

Author:

chronos

Message:

• Modified: Updated latest information.
• Fixed: Show ZdechovNET main page instead of Portal main page.

Location:

trunk

Files:

• Application/UWebSession.pas (modified) (2 diffs)
• Modules/ZdechovNET/UAboutPage.pas (modified) (2 diffs)
• Modules/ZdechovNET/UModuleZdechovNET.pas (modified) (2 diffs)
• Modules/ZdechovNET/UVoIPPage.pas (modified) (1 diff)
• Packages/CoolWeb/CoolWeb.pas (modified) (1 diff)
• ZdechovNET.lpr (modified) (1 diff)

trunk/Application/UWebSession.pas

@@ -108 +108 @@
             THTMLString(Self.HtmlDocument.Body.SubItems.AddNew(THtmlString.Create)).
               Text := Format(SError, [E.Message]);
-            if Assigned(ModuleBase) then ModuleBase.GeneratePage(Self, Page.Page)
-              else GeneratePageDefault(Self, Page.Page);
+            GeneratePage(Page.Page);
           end;
         end;
@@ -160 +159 @@
     RegisterModule(TModuleFinance.Create(nil), True);
     RegisterModule(TModuleNetwork.Create(nil), True);
-    RegisterModule(TModulePortal.Create(nil), True);
+    //RegisterModule(TModulePortal.Create(nil), True);
     RegisterModule(TModuleIS.Create(nil), True);
     RegisterModule(TModuleNews.Create(nil), True);

trunk/Modules/ZdechovNET/UAboutPage.pas

@@ -50 +50 @@
       'Počítačová síť postupně vznikla jako přirozená reakce na tehdejší situaci v informačních technologiích a jako reakce na nedostupnost vhodného internetového připojení pro domácnosti v obci. ' +
       'Členové komunity jsou mezi sebou propojeni pomocí kabelu nebo bezdrátové technologie Wi-Fi. K internetu jsou připojeni přes hlavní směrovač. ' +
-      'Připojení je negarantované, avšak prvořadým cílem je maximální spolehlivost, stabilita, rychlost a dostupnost připojení. ' +
+      'Připojení je garantované s nonstop servisem a řešením problémů obvykle do 24 hodin a prvořadým cílem je maximální spolehlivost, stabilita, rychlost a dostupnost připojení. ' +
       'Jelikož je obec odlehlá a obklopena vysokými kopci, jsou zde možnosti jiného kabelového či bezdrátového připojení značně omezené. Síť vedená místními aktivisty také přináší řadu nadstandardních komunitních služeb.<br/>' +
       '<br/>' +
       '<i>Důvody ke vzniku sítě:</i><br/>' +
       '<ul>' +
+      '<li>Dosažení rychlejšího a levnějšího nepřetržitého sdíleného internetového připojení bez omezení dat</li>' +
       '<li>Možnost komunikace mezi členy formou textu, zvuku či videa</li>' +
-      '<li>Dosažení rychlejšího a levnějšího nepřetržitého sdíleného internetového připojení bez omezení dat</li>' +
       '<li>Možnost šíření aktuálních informací z dění v obce</li>' +
       '<li>Sdílení společných dat</li>' +
       '<li>Společné hraní síťových her</li>' +
-      '<li>Zprovoznění užitečných služeb (chat, aktuality, bazar, menu v jídelně, web kamery, aj.)</li>' +
+      '<li>Zprovoznění užitečných služeb (IPTV, VoIP, chat, aktuality, bazar, menu v jídelně, web kamery, aj.)</li>' +
       '</ul><br/>';
 
@@ -68 +68 @@
 
     Text := Text + '<strong>Počty zákazníků:</strong><br/>' +
-      'Připojených domácností v obci: 103<br/>' +
+      'Připojených domácností v obci: 124<br/>' +
       'Připojených institucí: 1<br/>' +
-      'Hosting serverů: 4<br/>' +
-      'Celkem: 108<br/>' +
+      'Hosting serverů: 1<br/>' +
+      'Celkem: 126<br/>' +
       '<br/>' +
       '<strong>Technické parametry sítě</strong><br/>' +
-      'Internetové připojení: 80/80 Mbit/s, vyhrazené, symetrické, bez agregace, bez omezení přenesených dat, přes společnost <a href="http://www.inext.cz/">Internext 2000</a><br/>' +
-      'Pokrytí obce signálem: asi 80%<br/>' +
+      'Internetové připojení: 160/160 Mbit/s, vyhrazené, symetrické, bez agregace, bez omezení přenesených dat, přes společnost <a href="http://www.inext.cz/">Internext 2000</a><br/>' +
+      'Pokrytí obce signálem: asi 90%<br/>' +
       'V připojených domácnostech celkem 365 občanů ze všech 600 (61 %)<br/>' +
       '<br/>' +
-      '<i>Aktualizováno: 21.1.2011</i>';
+      '<i>Aktualizováno: 1.5.2016</i>';
     end;
     GeneratePage(Self);

trunk/Modules/ZdechovNET/UModuleZdechovNET.pas

@@ -319 +319 @@
       '<li><a href="http://wiki.zdechov.net/">Wiki</a></li>' +
       '</ul><ul class="MenuItem2">'; //<li>&nbsp;</li>';
-    if Assigned(ModuleBase.Pages.FindByName('uzivatel')) then begin
+    if False and Assigned(ModuleBase.Pages.FindByName('uzivatel')) then begin
       if ModuleUser.UserOnline.User = UnknownUser then begin
         Text := Text + '</ul>' +
@@ -343 +343 @@
   I: Integer;
   TitleTag: THtmlString;
+  TopMenuTag: THtmlString;
 begin
   with ASession do begin

trunk/Modules/ZdechovNET/UVoIPPage.pas

@@ -40 +40 @@
       ' A v rámci sítě a těch co mají v obci VoIP od stejného operátora dokonce zdarma. <br/>' +
       '<br/>' +
-      '<strong>Výhody volání přes VoIP</strong>' +
-      '<ol><li>Volání v síti zdarma</li>' +
-      '<li>Registrace, zřízení VoIP zdarma</li>' +
-      '<li>Nulový měsíční paušál</li>' +
-      '<li>Žádný závazek, dobíjíte kredit bez časového omezení</li>' +
-      '<li>Velká celorepubliková konkurence mnoha VoIP operátorů tlačí na nízké ceny hovorů na trhu</li>' +
-      '<li>Online výpis hovorů zdarma</li>' +
-      '<li>Běžné tel. číslo, možnost přenosu stávajícího čísla</li>' +
-      '<li>Lze využít i bez počátečních investic - softwarový telefon</li>' +
-      '<li>Pro telefonování nepotřebujete počítač - hardwarový VoIP telefon</li>' +
-      '</ol>' +
+      'Doporučujueme: <a href="http://www.odorik.cz/">VoIP Odorik</a>' +
+      '<ul><li>Zřízení zdarma</li>' +
+      '<li>Měsíční paušál: 0 Kč</li>' +
+      '<li>Tarifikace: 1+1 (sekundová)</li>' +
+      '<li>Volání v síti: <strong>0 Kč/minutu</strong></li>' +
+      '<li>Volání do pevných sítí: <strong>0,25 Kč/minutu mimo špičku, 0,49 Kč/minutu ve špičce</strong></li>' +
+      '<li>Volání do mobilních sítí: <strong>0,59 Kč/minutu</strong></li>' +
+      '<li>Přenesení vašeho čísla: 1300 Kč</li>' +
+      '<li>Volání z mobilního čísla na mobil: 1,5 Kč/minutu</strong></li>' +
+      '</ul>' +
       '<br/>' +
-      '<a href="http://voip.mikrotech.cz/">Mikrotech</a>' +
-    '<ul><li>Zřízení zdarma</li>' +
-    '<li>Měsíční paušál: 0 Kč (1 Kč/měsíčně za číslo)</li>' +
-    '<li>Tarifikace: 1+1 (sekundová)</li>' +
-    '<li>V sítí Mikrotech: <strong>0 Kč/minutu</strong></li>' +
-    '<li>Volání do pevných sítí: <strong>0,24 - 0,5 Kč/minutu</strong></li>' +
-    '<li>Volání do mobilních sítí: <strong>1 Kč/minutu</strong></li>' +
-    '<li>Příchozí volání: <strong>plus 0,1 Kč/minutu</strong></li>' +
-    '<li>Přenesení vašeho čísla: 1500 Kč</li>' +
-    '</ul>' +
-    '<br/>' +
-    '<a href="http://voip.mikrotech.cz/doc/cenik_mikrotech.pdf">Ceník</a><br/>' +
-    '<br/>' +
-    '<a href="http://www.odorik.cz/">Odorik</a>' +
-    '<ul><li>Zřízení zdarma</li>' +
-    '<li>Měsíční paušál: 0 Kč</li>' +
-    '<li>Tarifikace: 1+1 (sekundová)</li>' +
-    '<li>Volání v sítí: <strong>0 Kč/minutu</strong></li>' +
-    '<li>Volání do pevných sítí: <strong>0,4 - 0,6 Kč/minutu</strong></li>' +
-    '<li>Volání do mobilních sítí: <strong>1,6 Kč/minutu</strong></li>' +
-    '<li>Přenesení vašeho čísla: 1300 Kč</li>' +
-    '</ul>' +
-    '<br/>' +
-    '<a href="https://www.odorik.cz/ceny.html">Ceník</a><br/>' +
-    '<br/>';
+      '<a href="http://www.odorik.cz/ceny.html">Ceník</a><br/>' +
+      '<br/>';
     end;
     GeneratePage(Self);

trunk/Packages/CoolWeb/CoolWeb.pas

@@ -5 +5 @@
 unit CoolWeb;
 
-{$warn 5023 off : no warning about unused units}
 interface
 

trunk/ZdechovNET.lpr

@@ -29 +29 @@
     Core.Run;
     Run;
-    Printer.RawMode := True; // Avoid printer finalization exception
+    //Printer.RawMode := True; // Avoid printer finalization exception
   end;
 end.