Browse CVS Repository
Diff of /gikonavigoeson/gikonavi/NewBoard.pas
Parent Directory
| Revision Log
| Revision Graph
| Patch
| 71 |
EditIgnoreListsButton.Enabled := False; |
EditIgnoreListsButton.Enabled := False; |
| 72 |
URL := BoardURLComboBox.Text; |
URL := BoardURLComboBox.Text; |
| 73 |
GikoSys.ParseURI(URL, protocol, host, path, document, port, bookmark); |
GikoSys.ParseURI(URL, protocol, host, path, document, port, bookmark); |
|
Writeln(protocol); |
|
| 74 |
if (protocol = '') then begin |
if (protocol = '') then begin |
| 75 |
Item.FContent := BoardLoardFromFile(URL); |
Item.FContent := BoardLoardFromFile(URL); |
| 76 |
end else if (AnsiPos('http', protocol) > 0) then begin |
end else if (AnsiPos('http', protocol) > 0) then begin |
|
|
Legend:
| Removed from v.1.23 |
|
| changed lines |
| |
Added in v.1.24 |
|
|
| |