keXa/kolibrios
1
0
Fork 0
forked from KolibriOS/kolibrios
Code Pull Requests Activity

HTMLv 0.72: fully worked Internet pages, as in older versions. Tested, some fixes.

Browse Source 
git-svn-id: svn://kolibrios.org@2399 a494cfbc-eb01-0410-851d-a64ba20cac60
This commit is contained in:
Kirill Lipatov (Leency) 2012-02-24 21:27:05 +00:00
parent e4aa2672b0
commit ce623ccaec
4 changed files with 16 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
programs/network/htmlv/browser/HTMLv.c--
View File

@ -144,7 +144,7 @@ void Draw_Window()
WB1.top=44; WB1.top=44;
WB1.width=Form.width-11; WB1.width=Form.width-11;
WB1.height=onTop(43,5); WB1.height=onTop(43,5);
WB1.Load(#URL); WB1.ShowPage(#URL);
} }
int onLeft(dword right,left) {return Form.width-right-left;} int onLeft(dword right,left) {return Form.width-right-left;}

4
programs/network/htmlv/browser/History.txt
View File

@ -1,3 +1,7 @@
24.02.12 -- v0.72 -- 11.? Кб
- просто починил эти самые интернеты.
26.09.11 -- v0.70с -- 11.4 Кб 26.09.11 -- v0.70с -- 11.4 Кб
- универсальная обработка цветов; - универсальная обработка цветов;
- улучшения в обработке title; - улучшения в обработке title;

20
programs/network/htmlv/browser/TWB.h--
View File

@ -1,4 +1,3 @@
//http://jsbeautifier.org/
//Web-component, Leency & Veliant 2007-2009 //Web-component, Leency & Veliant 2007-2009
//lev //lev
@ -16,7 +15,7 @@ dword j,
char download_path[]="/rd/1/.download"; char download_path[]="/rd/1/.download";
//char search_path[]="http://nova.rambler.ru/search?words="; //char search_path[]="http://nova.rambler.ru/search?words=";
char search_path[]="http://nigma.ru/index.php?s="; char search_path[]="http://nigma.ru/index.php?s=";
char version[]=" Text-based Browser 23.71"; char version[]=" Text-based Browser 0.71";
struct TWebBrowser { struct TWebBrowser {
@ -25,7 +24,7 @@ struct TWebBrowser {
width, width,
height; height;
void DrawScroller(); void DrawScroller();
void Load(); void ShowPage();
void ParseHTML(dword, dword); void ParseHTML(dword, dword);
void Scan(dword); void Scan(dword);
void WhatTextStyle(int left1, top1, width1); void WhatTextStyle(int left1, top1, width1);
@ -78,7 +77,7 @@ void TWebBrowser::Scan(dword id) {
if (!strcmp(get_URL_part(5),"http:"))) HttpLoad(); if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
//Lee 21.02 } //Lee 21.02 }
Load(#URL); ShowPage(#URL);
Draw_Window(); Draw_Window();
return; return;
} }
@ -97,7 +96,7 @@ void TWebBrowser::Scan(dword id) {
BrowserHistory.GoBack(); BrowserHistory.GoBack();
return; return;
case FORWARD: case FORWARD:
//RunProgram("@notify", "Forward button is not realized yet"); RunProgram("@notify", "Forward button is not realized yet");
return; return;
case 054: //F5 case 054: //F5
IF(edit1.flags == 66) break; IF(edit1.flags == 66) break;
@ -111,24 +110,25 @@ void TWebBrowser::Scan(dword id) {
MoveSize(190,80,OLD,OLD); MoveSize(190,80,OLD,OLD);
RunProgram(#program_path, #URL); RunProgram(#program_path, #URL);
return; return;
case HOME:
copystr("/sys/index.htm", #editURL);
case 052: //Íàæàòà F3 case 052: //Íàæàòà F3
IF(edit1.flags <> 66) IF(edit1.flags <> 66)
IF (strcmp(get_URL_part(5),"http:")<>0) RunProgram("tinypad", #URL); ELSE RunProgram("tinypad", #download_path); IF (strcmp(get_URL_part(5),"http:")<>0) RunProgram("tinypad", #URL); ELSE RunProgram("tinypad", #download_path);
return; return;
case HOME:
copystr("http://bash.org.ru", #editURL);
case GOTOURL: case GOTOURL:
case 0x0D: //enter case 0x0D: //enter
copystr(#editURL, #URL); copystr(#editURL, #URL);
if (!strcmp(get_URL_part(5),"http:"))) HttpLoad(); if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
Load(#URL); ShowPage(#URL);
return; return;
case 173: //ctrl+enter case 173: //ctrl+enter
case SEARCHWEB: case SEARCHWEB:
copystr(#search_path, #URL); copystr(#search_path, #URL);
copystr(#editURL, #URL + strlen(#URL)); copystr(#editURL, #URL + strlen(#URL));
Load(#URL); if (!strcmp(get_URL_part(5),"http:"))) HttpLoad();
ShowPage(#URL);
return; return;
case ID1: //ìîòàåì ââåðõ case ID1: //ìîòàåì ââåðõ
@ -213,7 +213,7 @@ void ReadHtml()
void TWebBrowser::Load(dword adress) { void TWebBrowser::ShowPage(dword adress) {
max_kolvo_stolbcov = width - 30 / 6; max_kolvo_stolbcov = width - 30 / 6;
max_kolvo_strok = height - 3 / 10 - 2; max_kolvo_strok = height - 3 / 10 - 2;
copystr(#version, #header); copystr(#version, #header);

2
programs/network/htmlv/browser/include/history.h--
View File

@ -18,7 +18,7 @@ void UrlsHistory::GoBack()
j--; j--;
} }
UrlHistory[j] = 0x00; UrlHistory[j] = 0x00;
WB1.Load(#URL); WB1.ShowPage(#URL);
} }
void UrlsHistory::AddUrl() void UrlsHistory::AddUrl()