]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/html/m_links.cpp
Replaced /'s with \'s as BCC requires \'s for path names
[wxWidgets.git] / src / html / m_links.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: m_links.cpp
3// Purpose: wxHtml module for links & anchors
4// Author: Vaclav Slavik
5// RCS-ID: $Id$
6// Copyright: (c) 1999 Vaclav Slavik
7// Licence: wxWindows Licence
8/////////////////////////////////////////////////////////////////////////////
9
10#ifdef __GNUG__
11#pragma implementation
12#endif
13
14#include "wx/wxprec.h"
15
16#include "wx/defs.h"
17#if wxUSE_HTML && wxUSE_STREAMS
18
19#ifdef __BORDLANDC__
20#pragma hdrstop
21#endif
22
23#ifndef WXPRECOMP
24#endif
25
26#include "wx/html/forcelnk.h"
27#include "wx/html/m_templ.h"
28
29
30FORCE_LINK_ME(m_links)
31
32
33class wxHtmlAnchorCell : public wxHtmlCell
34{
35 private:
36 wxString m_AnchorName;
37
38 public:
39 wxHtmlAnchorCell(const wxString& name) : wxHtmlCell() {m_AnchorName = name;}
40 virtual const wxHtmlCell* Find(int condition, const void* param) const
41 {
42 if ((condition == wxHTML_COND_ISANCHOR) && (m_AnchorName == (*((const wxString*)param))))
43 return this;
44 else
45 return wxHtmlCell::Find(condition, param);
46 }
47};
48
49
50
51TAG_HANDLER_BEGIN(A, "A")
52
53 TAG_HANDLER_PROC(tag)
54 {
55 if (tag.HasParam("NAME"))
56 {
57 m_WParser->GetContainer()->InsertCell(new wxHtmlAnchorCell(tag.GetParam("NAME")));
58 }
59
60 if (tag.HasParam("HREF"))
61 {
62 wxHtmlLinkInfo oldlnk = m_WParser->GetLink();
63 wxColour oldclr = m_WParser->GetActualColor();
64 int oldund = m_WParser->GetFontUnderlined();
65 wxString name(tag.GetParam("HREF")), target;
66
67 if (tag.HasParam("TARGET")) target = tag.GetParam("TARGET");
68 m_WParser->SetActualColor(m_WParser->GetLinkColor());
69 m_WParser->GetContainer()->InsertCell(new wxHtmlColourCell(m_WParser->GetLinkColor()));
70 m_WParser->SetFontUnderlined(TRUE);
71 m_WParser->GetContainer()->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
72 m_WParser->SetLink(wxHtmlLinkInfo(name, target));
73
74 ParseInner(tag);
75
76 m_WParser->SetLink(oldlnk);
77 m_WParser->SetFontUnderlined(oldund);
78 m_WParser->GetContainer()->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
79 m_WParser->SetActualColor(oldclr);
80 m_WParser->GetContainer()->InsertCell(new wxHtmlColourCell(oldclr));
81
82 return TRUE;
83 }
84 else return FALSE;
85 }
86
87TAG_HANDLER_END(A)
88
89
90
91TAGS_MODULE_BEGIN(Links)
92
93 TAGS_MODULE_ADD(A)
94
95TAGS_MODULE_END(Links)
96
97
98#endif