Rev 2416 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
| Rev 2416 | Rev 2417 | ||
|---|---|---|---|
| Line 7... | Line 7... | ||
| 7 | 7 | ||
| Line 8... | Line 8... | ||
| 8 | UrlsHistory BrowserHistory; |
8 | UrlsHistory BrowserHistory; |
| 9 | 9 | ||
| 10 | void UrlsHistory::GoBack() |
- | |
| 11 | { |
10 | void UrlsHistory::GoBack() |
| 12 | WriteDebug(#UrlHistory); |
- | |
| 13 | //find_symbol(#UrlHistory, '|') |
- | |
| 14 | - | ||
| 15 | j = strlen(#UrlHistory); |
11 | { |
| 16 | WHILE(UrlHistory[j] <>'|') && (j > 0) j--; |
- | |
| 17 | IF (j > 0) UrlHistory[j] = 0x00; |
- | |
| 18 | WHILE(UrlHistory[j] <>'|') && (j > 0) { |
- | |
| 19 | copystr(#UrlHistory[j], #URL); |
- | |
| 20 | j--; |
12 | j = find_symbol(#UrlHistory, '|') -1; //òåêóùàÿ ñòðàíèöà |
| 21 | } |
- | |
| - | 13 | if (j<=0) return; |
|
| - | 14 | UrlHistory[j] = 0x00; |
|
| 22 | UrlHistory[j] = 0x00; |
15 | j = find_symbol(#UrlHistory, '|'); //ïðåäûäóùàÿ ñòðàíèöà -> îíà íàì è íóæíà |
| 23 | 16 | copystr(#UrlHistory + j, #URL); |
|
| 24 | copystr(#URL, #editURL); |
17 | copystr(#URL, #editURL); |
| Line 25... | Line 18... | ||
| 25 | WB1.ShowPage(#URL); |
18 | WB1.ShowPage(#URL); |