]> git.saurik.com Git - wxWidgets.git/blame_incremental - src/html/m_pre.cpp
more combobox appearance fixes
[wxWidgets.git] / src / html / m_pre.cpp
... / ...
CommitLineData
1/////////////////////////////////////////////////////////////////////////////
2// Name: m_pre.cpp
3// Purpose: wxHtml module for <PRE> ... </PRE> tag (code citation)
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#ifdef __BORDLANDC__
19#pragma hdrstop
20#endif
21
22#ifndef WXPRECOMP
23#endif
24
25#include "wx/html/forcelnk.h"
26#include "wx/html/m_templ.h"
27
28#include "wx/html/htmlcell.h"
29#include "wx/tokenzr.h"
30#include "wx/encconv.h"
31
32FORCE_LINK_ME(m_pre)
33
34//-----------------------------------------------------------------------------
35// The list handler:
36//-----------------------------------------------------------------------------
37
38
39TAG_HANDLER_BEGIN(PRE, "PRE")
40
41 TAG_HANDLER_PROC(tag)
42 {
43 wxHtmlContainerCell *c;
44
45 int fixed = m_WParser->GetFontFixed(),
46 italic = m_WParser->GetFontItalic(),
47 underlined = m_WParser->GetFontUnderlined(),
48 bold = m_WParser->GetFontBold(),
49 fsize = m_WParser->GetFontSize();
50
51 c = m_WParser->GetContainer();
52 m_WParser->SetFontUnderlined(FALSE);
53 m_WParser->SetFontBold(FALSE);
54 m_WParser->SetFontItalic(FALSE);
55 m_WParser->SetFontFixed(TRUE);
56 m_WParser->SetFontSize(3);
57 c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
58
59 m_WParser->CloseContainer();
60 c = m_WParser->OpenContainer();
61 c->SetAlignHor(wxHTML_ALIGN_LEFT);
62
63 wxString src, srcMid;
64
65 src = *m_WParser->GetSource();
66 srcMid = src.Mid(tag.GetBeginPos(),
67 tag.GetEndPos1() - tag.GetBeginPos());
68 srcMid.Replace(wxT("\t"), wxT(" "));
69 srcMid.Replace(wxT(" "), wxT("&nbsp;"));
70 srcMid.Replace(wxT("\n"), wxT("<br>"));
71
72 // It is safe to temporarily change the source being parsed,
73 // provided we restore the state back after parsing
74 m_Parser->SetSource(srcMid);
75 m_Parser->DoParsing();
76 m_Parser->SetSource(src);
77
78 m_WParser->CloseContainer();
79 c = m_WParser->OpenContainer();
80
81 m_WParser->SetFontUnderlined(underlined);
82 m_WParser->SetFontBold(bold);
83 m_WParser->SetFontItalic(italic);
84 m_WParser->SetFontFixed(fixed);
85 m_WParser->SetFontSize(fsize);
86 c->InsertCell(new wxHtmlFontCell(m_WParser->CreateCurrentFont()));
87
88 return TRUE;
89 }
90
91TAG_HANDLER_END(PRE)
92
93
94
95
96
97TAGS_MODULE_BEGIN(Pre)
98
99 TAGS_MODULE_ADD(PRE)
100
101TAGS_MODULE_END(Pre)
102
103#endif