1 // Scintilla source code edit control
2 // PlatWX.cxx - implementation of platform facilities on wxWidgets
3 // Copyright 1998-1999 by Neil Hodgson <neilh@scintilla.org>
4 // Robin Dunn <robin@aldunn.com>
5 // The License.txt file describes the conditions under which this software may be distributed.
10 #include <wx/encconv.h>
11 #include <wx/listctrl.h>
12 #include <wx/mstream.h>
14 #include <wx/imaglist.h>
18 #include "wx/stc/stc.h"
22 Point
Point::FromLong(long lpoint
) {
23 return Point(lpoint
& 0xFFFF, lpoint
>> 16);
26 wxRect
wxRectFromPRectangle(PRectangle prc
) {
27 wxRect
r(prc
.left
, prc
.top
,
28 prc
.Width(), prc
.Height());
32 PRectangle
PRectangleFromwxRect(wxRect rc
) {
33 return PRectangle(rc
.GetLeft(), rc
.GetTop(),
34 rc
.GetRight()+1, rc
.GetBottom()+1);
37 wxColour
wxColourFromCA(const ColourAllocated
& ca
) {
38 ColourDesired
cd(ca
.AsLong());
39 return wxColour((unsigned char)cd
.GetRed(),
40 (unsigned char)cd
.GetGreen(),
41 (unsigned char)cd
.GetBlue());
44 //----------------------------------------------------------------------
48 allowRealization
= false;
55 void Palette::Release() {
59 // This method either adds a colour to the list of wanted colours (want==true)
60 // or retrieves the allocated colour back to the ColourPair.
61 // This is one method to make it easier to keep the code for wanting and retrieving in sync.
62 void Palette::WantFind(ColourPair
&cp
, bool want
) {
64 for (int i
=0; i
< used
; i
++) {
65 if (entries
[i
].desired
== cp
.desired
)
69 if (used
< numEntries
) {
70 entries
[used
].desired
= cp
.desired
;
71 entries
[used
].allocated
.Set(cp
.desired
.AsLong());
75 for (int i
=0; i
< used
; i
++) {
76 if (entries
[i
].desired
== cp
.desired
) {
77 cp
.allocated
= entries
[i
].allocated
;
81 cp
.allocated
.Set(cp
.desired
.AsLong());
85 void Palette::Allocate(Window
&) {
86 if (allowRealization
) {
91 //----------------------------------------------------------------------
101 void Font::Create(const char *faceName
, int characterSet
, int size
, bool bold
, bool italic
, bool extraFontFlag
) {
102 wxFontEncoding encoding
;
106 switch (characterSet
) {
108 case wxSTC_CHARSET_ANSI
:
109 case wxSTC_CHARSET_DEFAULT
:
110 encoding
= wxFONTENCODING_DEFAULT
;
113 case wxSTC_CHARSET_BALTIC
:
114 encoding
= wxFONTENCODING_ISO8859_13
;
117 case wxSTC_CHARSET_CHINESEBIG5
:
118 encoding
= wxFONTENCODING_CP950
;
121 case wxSTC_CHARSET_EASTEUROPE
:
122 encoding
= wxFONTENCODING_ISO8859_2
;
125 case wxSTC_CHARSET_GB2312
:
126 encoding
= wxFONTENCODING_CP936
;
129 case wxSTC_CHARSET_GREEK
:
130 encoding
= wxFONTENCODING_ISO8859_7
;
133 case wxSTC_CHARSET_HANGUL
:
134 encoding
= wxFONTENCODING_CP949
;
137 case wxSTC_CHARSET_MAC
:
138 encoding
= wxFONTENCODING_DEFAULT
;
141 case wxSTC_CHARSET_OEM
:
142 encoding
= wxFONTENCODING_DEFAULT
;
145 case wxSTC_CHARSET_RUSSIAN
:
146 encoding
= wxFONTENCODING_KOI8
;
149 case wxSTC_CHARSET_SHIFTJIS
:
150 encoding
= wxFONTENCODING_CP932
;
153 case wxSTC_CHARSET_SYMBOL
:
154 encoding
= wxFONTENCODING_DEFAULT
;
157 case wxSTC_CHARSET_TURKISH
:
158 encoding
= wxFONTENCODING_ISO8859_9
;
161 case wxSTC_CHARSET_JOHAB
:
162 encoding
= wxFONTENCODING_DEFAULT
;
165 case wxSTC_CHARSET_HEBREW
:
166 encoding
= wxFONTENCODING_ISO8859_8
;
169 case wxSTC_CHARSET_ARABIC
:
170 encoding
= wxFONTENCODING_ISO8859_6
;
173 case wxSTC_CHARSET_VIETNAMESE
:
174 encoding
= wxFONTENCODING_DEFAULT
;
177 case wxSTC_CHARSET_THAI
:
178 encoding
= wxFONTENCODING_ISO8859_11
;
182 wxFontEncodingArray ea
= wxEncodingConverter::GetPlatformEquivalents(encoding
);
186 wxFont
* font
= new wxFont(size
,
188 italic
? wxITALIC
: wxNORMAL
,
189 bold
? wxBOLD
: wxNORMAL
,
193 font
->SetNoAntiAliasing(!extraFontFlag
);
198 void Font::Release() {
204 //----------------------------------------------------------------------
206 class SurfaceImpl
: public Surface
{
219 virtual void Init(WindowID wid
);
220 virtual void Init(SurfaceID sid
, WindowID wid
);
221 virtual void InitPixMap(int width
, int height
, Surface
*surface_
, WindowID wid
);
223 virtual void Release();
224 virtual bool Initialised();
225 virtual void PenColour(ColourAllocated fore
);
226 virtual int LogPixelsY();
227 virtual int DeviceHeightFont(int points
);
228 virtual void MoveTo(int x_
, int y_
);
229 virtual void LineTo(int x_
, int y_
);
230 virtual void Polygon(Point
*pts
, int npts
, ColourAllocated fore
, ColourAllocated back
);
231 virtual void RectangleDraw(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
);
232 virtual void FillRectangle(PRectangle rc
, ColourAllocated back
);
233 virtual void FillRectangle(PRectangle rc
, Surface
&surfacePattern
);
234 virtual void RoundedRectangle(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
);
235 virtual void Ellipse(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
);
236 virtual void Copy(PRectangle rc
, Point from
, Surface
&surfaceSource
);
238 virtual void DrawTextNoClip(PRectangle rc
, Font
&font_
, int ybase
, const char *s
, int len
, ColourAllocated fore
, ColourAllocated back
);
239 virtual void DrawTextClipped(PRectangle rc
, Font
&font_
, int ybase
, const char *s
, int len
, ColourAllocated fore
, ColourAllocated back
);
240 virtual void DrawTextTransparent(PRectangle rc
, Font
&font_
, int ybase
, const char *s
, int len
, ColourAllocated fore
);
241 virtual void MeasureWidths(Font
&font_
, const char *s
, int len
, int *positions
);
242 virtual int WidthText(Font
&font_
, const char *s
, int len
);
243 virtual int WidthChar(Font
&font_
, char ch
);
244 virtual int Ascent(Font
&font_
);
245 virtual int Descent(Font
&font_
);
246 virtual int InternalLeading(Font
&font_
);
247 virtual int ExternalLeading(Font
&font_
);
248 virtual int Height(Font
&font_
);
249 virtual int AverageCharWidth(Font
&font_
);
251 virtual int SetPalette(Palette
*pal
, bool inBackGround
);
252 virtual void SetClip(PRectangle rc
);
253 virtual void FlushCachedState();
255 virtual void SetUnicodeMode(bool unicodeMode_
);
256 virtual void SetDBCSMode(int codePage
);
258 void BrushColour(ColourAllocated back
);
259 void SetFont(Font
&font_
);
264 SurfaceImpl::SurfaceImpl() :
265 hdc(0), hdcOwned(0), bitmap(0),
266 x(0), y(0), unicodeMode(0)
269 SurfaceImpl::~SurfaceImpl() {
273 void SurfaceImpl::Init(WindowID wid
) {
276 hdc
= new wxMemoryDC();
279 // On Mac and GTK the DC is not really valid until it has a bitmap
280 // selected into it. So instead of just creating the DC with no bitmap,
281 // go ahead and give it one.
282 InitPixMap(1,1,NULL
,wid
);
286 void SurfaceImpl::Init(SurfaceID hdc_
, WindowID
) {
291 void SurfaceImpl::InitPixMap(int width
, int height
, Surface
*WXUNUSED(surface_
), WindowID
) {
293 hdc
= new wxMemoryDC();
295 if (width
< 1) width
= 1;
296 if (height
< 1) height
= 1;
297 bitmap
= new wxBitmap(width
, height
);
298 ((wxMemoryDC
*)hdc
)->SelectObject(*bitmap
);
302 void SurfaceImpl::Release() {
304 ((wxMemoryDC
*)hdc
)->SelectObject(wxNullBitmap
);
316 bool SurfaceImpl::Initialised() {
321 void SurfaceImpl::PenColour(ColourAllocated fore
) {
322 hdc
->SetPen(wxPen(wxColourFromCA(fore
), 1, wxSOLID
));
325 void SurfaceImpl::BrushColour(ColourAllocated back
) {
326 hdc
->SetBrush(wxBrush(wxColourFromCA(back
), wxSOLID
));
329 void SurfaceImpl::SetFont(Font
&font_
) {
331 hdc
->SetFont(*((wxFont
*)font_
.GetID()));
335 int SurfaceImpl::LogPixelsY() {
336 return hdc
->GetPPI().y
;
339 int SurfaceImpl::DeviceHeightFont(int points
) {
343 void SurfaceImpl::MoveTo(int x_
, int y_
) {
348 void SurfaceImpl::LineTo(int x_
, int y_
) {
349 hdc
->DrawLine(x
,y
, x_
,y_
);
354 void SurfaceImpl::Polygon(Point
*pts
, int npts
, ColourAllocated fore
, ColourAllocated back
) {
357 hdc
->DrawPolygon(npts
, (wxPoint
*)pts
);
360 void SurfaceImpl::RectangleDraw(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
) {
363 hdc
->DrawRectangle(wxRectFromPRectangle(rc
));
366 void SurfaceImpl::FillRectangle(PRectangle rc
, ColourAllocated back
) {
368 hdc
->SetPen(*wxTRANSPARENT_PEN
);
369 hdc
->DrawRectangle(wxRectFromPRectangle(rc
));
372 void SurfaceImpl::FillRectangle(PRectangle rc
, Surface
&surfacePattern
) {
374 if (((SurfaceImpl
&)surfacePattern
).bitmap
)
375 br
= wxBrush(*((SurfaceImpl
&)surfacePattern
).bitmap
);
376 else // Something is wrong so display in red
377 br
= wxBrush(*wxRED
, wxSOLID
);
378 hdc
->SetPen(*wxTRANSPARENT_PEN
);
380 hdc
->DrawRectangle(wxRectFromPRectangle(rc
));
383 void SurfaceImpl::RoundedRectangle(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
) {
386 hdc
->DrawRoundedRectangle(wxRectFromPRectangle(rc
), 4);
389 void SurfaceImpl::Ellipse(PRectangle rc
, ColourAllocated fore
, ColourAllocated back
) {
392 hdc
->DrawEllipse(wxRectFromPRectangle(rc
));
395 void SurfaceImpl::Copy(PRectangle rc
, Point from
, Surface
&surfaceSource
) {
396 wxRect r
= wxRectFromPRectangle(rc
);
397 hdc
->Blit(r
.x
, r
.y
, r
.width
, r
.height
,
398 ((SurfaceImpl
&)surfaceSource
).hdc
,
399 from
.x
, from
.y
, wxCOPY
);
402 void SurfaceImpl::DrawTextNoClip(PRectangle rc
, Font
&font
, int ybase
,
403 const char *s
, int len
,
404 ColourAllocated fore
, ColourAllocated back
) {
406 hdc
->SetTextForeground(wxColourFromCA(fore
));
407 hdc
->SetTextBackground(wxColourFromCA(back
));
408 FillRectangle(rc
, back
);
410 // ybase is where the baseline should be, but wxWin uses the upper left
411 // corner, so I need to calculate the real position for the text...
412 hdc
->DrawText(stc2wx(s
, len
), rc
.left
, ybase
- font
.ascent
);
415 void SurfaceImpl::DrawTextClipped(PRectangle rc
, Font
&font
, int ybase
,
416 const char *s
, int len
,
417 ColourAllocated fore
, ColourAllocated back
) {
419 hdc
->SetTextForeground(wxColourFromCA(fore
));
420 hdc
->SetTextBackground(wxColourFromCA(back
));
421 FillRectangle(rc
, back
);
422 hdc
->SetClippingRegion(wxRectFromPRectangle(rc
));
424 // see comments above
425 hdc
->DrawText(stc2wx(s
, len
), rc
.left
, ybase
- font
.ascent
);
426 hdc
->DestroyClippingRegion();
430 void SurfaceImpl::DrawTextTransparent(PRectangle rc
, Font
&font
, int ybase
,
431 const char *s
, int len
,
432 ColourAllocated fore
) {
435 hdc
->SetTextForeground(wxColourFromCA(fore
));
436 hdc
->SetBackgroundMode(wxTRANSPARENT
);
438 // ybase is where the baseline should be, but wxWin uses the upper left
439 // corner, so I need to calculate the real position for the text...
440 hdc
->DrawText(stc2wx(s
, len
), rc
.left
, ybase
- font
.ascent
);
442 hdc
->SetBackgroundMode(wxSOLID
);
446 void SurfaceImpl::MeasureWidths(Font
&font
, const char *s
, int len
, int *positions
) {
448 wxString str
= stc2wx(s
, len
);
453 hdc
->GetPartialTextExtents(str
, tpos
);
456 // Map the widths for UCS-2 characters back to the UTF-8 input string
457 // NOTE: I don't think this is right for when sizeof(wxChar) > 2, ie wxGTK2
458 // so figure it out and fix it!
461 while ((int)i
< len
) {
462 unsigned char uch
= (unsigned char)s
[i
];
463 positions
[i
++] = tpos
[ui
];
465 if (uch
< (0x80 + 0x40 + 0x20)) {
466 positions
[i
++] = tpos
[ui
];
468 positions
[i
++] = tpos
[ui
];
469 positions
[i
++] = tpos
[ui
];
476 // If not unicode then just use the widths we have
477 memcpy(positions
, tpos
.begin(), len
* sizeof(int));
482 int SurfaceImpl::WidthText(Font
&font
, const char *s
, int len
) {
487 hdc
->GetTextExtent(stc2wx(s
, len
), &w
, &h
);
492 int SurfaceImpl::WidthChar(Font
&font
, char ch
) {
496 char s
[2] = { ch
, 0 };
498 hdc
->GetTextExtent(stc2wx(s
, 1), &w
, &h
);
502 #define EXTENT_TEST wxT(" `~!@#$%^&*()-_=+\\|[]{};:\"\'<,>.?/1234567890abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ")
504 int SurfaceImpl::Ascent(Font
&font
) {
507 hdc
->GetTextExtent(EXTENT_TEST
, &w
, &h
, &d
, &e
);
512 int SurfaceImpl::Descent(Font
&font
) {
515 hdc
->GetTextExtent(EXTENT_TEST
, &w
, &h
, &d
, &e
);
519 int SurfaceImpl::InternalLeading(Font
&WXUNUSED(font
)) {
523 int SurfaceImpl::ExternalLeading(Font
&font
) {
526 hdc
->GetTextExtent(EXTENT_TEST
, &w
, &h
, &d
, &e
);
530 int SurfaceImpl::Height(Font
&font
) {
532 return hdc
->GetCharHeight() + 1;
535 int SurfaceImpl::AverageCharWidth(Font
&font
) {
537 return hdc
->GetCharWidth();
540 int SurfaceImpl::SetPalette(Palette
*WXUNUSED(pal
), bool WXUNUSED(inBackGround
)) {
544 void SurfaceImpl::SetClip(PRectangle rc
) {
545 hdc
->SetClippingRegion(wxRectFromPRectangle(rc
));
548 void SurfaceImpl::FlushCachedState() {
551 void SurfaceImpl::SetUnicodeMode(bool unicodeMode_
) {
552 unicodeMode
=unicodeMode_
;
555 void SurfaceImpl::SetDBCSMode(int WXUNUSED(codePage
)) {
556 // dbcsMode = codePage == SC_CP_DBCS;
560 Surface
*Surface::Allocate() {
561 return new SurfaceImpl
;
565 //----------------------------------------------------------------------
568 inline wxWindow
* GETWIN(WindowID id
) { return (wxWindow
*)id
; }
573 void Window::Destroy() {
576 GETWIN(id
)->Destroy();
581 bool Window::HasFocus() {
582 return wxWindow::FindFocus() == GETWIN(id
);
585 PRectangle
Window::GetPosition() {
586 if (! id
) return PRectangle();
587 wxRect
rc(GETWIN(id
)->GetPosition(), GETWIN(id
)->GetSize());
588 return PRectangleFromwxRect(rc
);
591 void Window::SetPosition(PRectangle rc
) {
592 wxRect r
= wxRectFromPRectangle(rc
);
593 GETWIN(id
)->SetSize(r
);
596 void Window::SetPositionRelative(PRectangle rc
, Window
) {
597 SetPosition(rc
); // ????
600 PRectangle
Window::GetClientPosition() {
601 if (! id
) return PRectangle();
602 wxSize sz
= GETWIN(id
)->GetClientSize();
603 return PRectangle(0, 0, sz
.x
, sz
.y
);
606 void Window::Show(bool show
) {
607 GETWIN(id
)->Show(show
);
610 void Window::InvalidateAll() {
611 GETWIN(id
)->Refresh(false);
615 void Window::InvalidateRectangle(PRectangle rc
) {
616 wxRect r
= wxRectFromPRectangle(rc
);
617 GETWIN(id
)->Refresh(false, &r
);
621 void Window::SetFont(Font
&font
) {
622 GETWIN(id
)->SetFont(*((wxFont
*)font
.GetID()));
625 void Window::SetCursor(Cursor curs
) {
630 cursorId
= wxCURSOR_IBEAM
;
633 cursorId
= wxCURSOR_ARROW
;
636 cursorId
= wxCURSOR_ARROW
; // ** no up arrow... wxCURSOR_UPARROW;
639 cursorId
= wxCURSOR_WAIT
;
642 cursorId
= wxCURSOR_SIZEWE
;
645 cursorId
= wxCURSOR_SIZENS
;
647 case cursorReverseArrow
:
648 cursorId
= wxCURSOR_RIGHT_ARROW
;
651 cursorId
= wxCURSOR_HAND
;
654 cursorId
= wxCURSOR_ARROW
;
658 wxCursor wc
= wxStockCursor(cursorId
) ;
660 wxCursor wc
= wxCursor(cursorId
) ;
662 GETWIN(id
)->SetCursor(wc
);
666 void Window::SetTitle(const char *s
) {
667 GETWIN(id
)->SetTitle(stc2wx(s
));
671 //----------------------------------------------------------------------
672 // Helper classes for ListBox
675 // This is a simple subclass of wxListView that just resets focus to the
676 // parent when it gets it.
677 class wxSTCListBox
: public wxListView
{
679 wxSTCListBox(wxWindow
* parent
, wxWindowID id
,
680 const wxPoint
& pos
, const wxSize
& size
,
685 Hide(); // don't flicker as we move it around...
687 Create(parent
, id
, pos
, size
, style
);
691 void OnFocus(wxFocusEvent
& event
) {
692 GetParent()->SetFocus();
696 void OnKillFocus(wxFocusEvent
& WXUNUSED(event
)) {
697 // Do nothing. Prevents base class from resetting the colors...
701 // For some reason I don't understand yet the focus doesn't really leave
702 // the listbox like it should, so if we get any events feed them back to
704 void OnKeyDown(wxKeyEvent
& event
) {
705 GetGrandParent()->GetEventHandler()->ProcessEvent(event
);
707 void OnChar(wxKeyEvent
& event
) {
708 GetGrandParent()->GetEventHandler()->ProcessEvent(event
);
711 // And we need to force the focus back when being destroyed
713 GetGrandParent()->SetFocus();
718 DECLARE_EVENT_TABLE()
721 BEGIN_EVENT_TABLE(wxSTCListBox
, wxListView
)
722 EVT_SET_FOCUS( wxSTCListBox::OnFocus
)
723 EVT_KILL_FOCUS(wxSTCListBox::OnKillFocus
)
725 EVT_KEY_DOWN( wxSTCListBox::OnKeyDown
)
726 EVT_CHAR( wxSTCListBox::OnChar
)
732 #if wxUSE_POPUPWIN //-----------------------------------
733 #include <wx/popupwin.h>
737 // TODO: Refactor these two classes to have a common base (or a mix-in) to get
738 // rid of the code duplication. (Either that or convince somebody to
739 // implement wxPopupWindow for the Mac!!)
741 // In the meantime, be careful to duplicate any changes as needed...
744 // A popup window to place the wxSTCListBox upon
745 class wxSTCListBoxWin
: public wxPopupWindow
749 CallBackAction doubleClickAction
;
750 void* doubleClickActionData
;
752 wxSTCListBoxWin(wxWindow
* parent
, wxWindowID id
) :
753 wxPopupWindow(parent
, wxBORDER_NONE
)
755 SetBackgroundColour(*wxBLACK
); // for our simple border
757 lv
= new wxSTCListBox(parent
, id
, wxDefaultPosition
, wxDefaultSize
,
758 wxLC_REPORT
| wxLC_SINGLE_SEL
| wxLC_NO_HEADER
| wxBORDER_NONE
);
759 lv
->SetCursor(wxCursor(wxCURSOR_ARROW
));
760 lv
->InsertColumn(0, wxEmptyString
);
761 lv
->InsertColumn(1, wxEmptyString
);
763 // NOTE: We need to fool the wxListView into thinking that it has the
764 // focus so it will use the normal selection colour and will look
765 // "right" to the user. But since the wxPopupWindow or its children
766 // can't receive focus then we have to pull a fast one and temporarily
767 // parent the listctrl on the STC window and then call SetFocus and
768 // then reparent it back to the popup.
777 // Set position in client coords
778 virtual void DoSetSize(int x
, int y
,
779 int width
, int height
,
780 int sizeFlags
= wxSIZE_AUTO
) {
781 if (x
!= wxDefaultCoord
) {
782 GetParent()->ClientToScreen(&x
, NULL
);
784 if (y
!= wxDefaultCoord
) {
785 GetParent()->ClientToScreen(NULL
, &y
);
787 wxPopupWindow::DoSetSize(x
, y
, width
, height
, sizeFlags
);
790 // return position as if it were in client coords
791 virtual void DoGetPosition( int *x
, int *y
) const {
793 wxPopupWindow::DoGetPosition(&sx
, &sy
);
794 GetParent()->ScreenToClient(&sx
, &sy
);
801 if ( !wxPendingDelete
.Member(this) )
802 wxPendingDelete
.Append(this);
808 wxImageList
* il
= lv
->GetImageList(wxIMAGE_LIST_SMALL
);
811 il
->GetSize(0, w
, h
);
818 void SetDoubleClickAction(CallBackAction action
, void *data
) {
819 doubleClickAction
= action
;
820 doubleClickActionData
= data
;
824 void OnFocus(wxFocusEvent
& event
) {
825 GetParent()->SetFocus();
829 void OnSize(wxSizeEvent
& event
) {
831 wxSize sz
= GetSize();
834 lv
->SetSize(1, 1, sz
.x
, sz
.y
);
835 // reset the column widths
836 lv
->SetColumnWidth(0, IconWidth()+4);
837 lv
->SetColumnWidth(1, sz
.x
- 2 - lv
->GetColumnWidth(0) -
838 wxSystemSettings::GetMetric(wxSYS_VSCROLL_X
));
842 void OnActivate(wxListEvent
& WXUNUSED(event
)) {
843 doubleClickAction(doubleClickActionData
);
846 wxListView
* GetLB() { return lv
; }
849 DECLARE_EVENT_TABLE()
853 BEGIN_EVENT_TABLE(wxSTCListBoxWin
, wxPopupWindow
)
854 EVT_SET_FOCUS ( wxSTCListBoxWin::OnFocus
)
855 EVT_SIZE ( wxSTCListBoxWin::OnSize
)
856 EVT_LIST_ITEM_ACTIVATED(wxID_ANY
, wxSTCListBoxWin::OnActivate
)
861 #else // wxUSE_POPUPWIN -----------------------------------
863 // A normal window to place the wxSTCListBox upon.
864 class wxSTCListBoxWin
: public wxWindow
{
867 CallBackAction doubleClickAction
;
868 void* doubleClickActionData
;
870 wxSTCListBoxWin(wxWindow
* parent
, wxWindowID id
) :
871 wxWindow(parent
, id
, wxDefaultPosition
, wxSize(0,0), wxSIMPLE_BORDER
)
874 lv
= new wxSTCListBox(this, id
, wxDefaultPosition
, wxDefaultSize
,
875 wxLC_REPORT
| wxLC_SINGLE_SEL
| wxLC_NO_HEADER
| wxNO_BORDER
);
876 lv
->SetCursor(wxCursor(wxCURSOR_ARROW
));
877 lv
->InsertColumn(0, wxEmptyString
);
878 lv
->InsertColumn(1, wxEmptyString
);
880 // Eventhough we immediately reset the focus to the parent, this helps
881 // things to look right...
888 // On OSX and (possibly others) there can still be pending
889 // messages/events for the list control when Scintilla wants to
890 // close it, so do a pending delete of it instead of destroying
894 // The bottom edge of this window is not getting properly
895 // refreshed upon deletion, so help it out...
896 wxWindow
* p
= GetParent();
897 wxRect
r(GetPosition(), GetSize());
898 r
.SetHeight(r
.GetHeight()+1);
899 p
->Refresh(false, &r
);
901 if ( !wxPendingDelete
.Member(this) )
902 wxPendingDelete
.Append(this);
908 wxImageList
* il
= lv
->GetImageList(wxIMAGE_LIST_SMALL
);
911 il
->GetSize(0, w
, h
);
918 void SetDoubleClickAction(CallBackAction action
, void *data
) {
919 doubleClickAction
= action
;
920 doubleClickActionData
= data
;
924 void OnFocus(wxFocusEvent
& event
) {
925 GetParent()->SetFocus();
929 void OnSize(wxSizeEvent
& event
) {
931 wxSize sz
= GetClientSize();
933 // reset the column widths
934 lv
->SetColumnWidth(0, IconWidth()+4);
935 lv
->SetColumnWidth(1, sz
.x
- 2 - lv
->GetColumnWidth(0) -
936 wxSystemSettings::GetMetric(wxSYS_VSCROLL_X
));
941 virtual bool Show(bool show
= true) {
942 bool rv
= wxWindow::Show(show
);
943 GetParent()->Refresh(false);
948 void OnActivate(wxListEvent
& WXUNUSED(event
)) {
949 doubleClickAction(doubleClickActionData
);
952 wxListView
* GetLB() { return lv
; }
955 DECLARE_EVENT_TABLE()
959 BEGIN_EVENT_TABLE(wxSTCListBoxWin
, wxWindow
)
960 EVT_SET_FOCUS ( wxSTCListBoxWin::OnFocus
)
961 EVT_SIZE ( wxSTCListBoxWin::OnSize
)
962 EVT_LIST_ITEM_ACTIVATED(wxID_ANY
, wxSTCListBoxWin::OnActivate
)
965 #endif // wxUSE_POPUPWIN -----------------------------------
968 inline wxSTCListBoxWin
* GETLBW(WindowID win
) {
969 return ((wxSTCListBoxWin
*)win
);
972 inline wxListView
* GETLB(WindowID win
) {
973 return GETLBW(win
)->GetLB();
976 //----------------------------------------------------------------------
978 class ListBoxImpl
: public ListBox
{
982 int desiredVisibleRows
;
985 wxImageList
* imgList
;
986 wxArrayInt
* imgTypeMap
;
992 virtual void SetFont(Font
&font
);
993 virtual void Create(Window
&parent
, int ctrlID
, int lineHeight_
, bool unicodeMode_
);
994 virtual void SetAverageCharWidth(int width
);
995 virtual void SetVisibleRows(int rows
);
996 virtual PRectangle
GetDesiredRect();
997 virtual int CaretFromEdge();
998 virtual void Clear();
999 virtual void Append(char *s
, int type
= -1);
1000 virtual int Length();
1001 virtual void Select(int n
);
1002 virtual int GetSelection();
1003 virtual int Find(const char *prefix
);
1004 virtual void GetValue(int n
, char *value
, int len
);
1005 virtual void RegisterImage(int type
, const char *xpm_data
);
1006 virtual void ClearRegisteredImages();
1007 virtual void SetDoubleClickAction(CallBackAction
, void *);
1012 ListBoxImpl::ListBoxImpl()
1013 : lineHeight(10), unicodeMode(false),
1014 desiredVisibleRows(5), aveCharWidth(8), maxStrWidth(0),
1015 imgList(NULL
), imgTypeMap(NULL
)
1019 ListBoxImpl::~ListBoxImpl() {
1031 void ListBoxImpl::SetFont(Font
&font
) {
1032 GETLB(id
)->SetFont(*((wxFont
*)font
.GetID()));
1036 void ListBoxImpl::Create(Window
&parent
, int ctrlID
, int lineHeight_
, bool unicodeMode_
) {
1037 lineHeight
= lineHeight_
;
1038 unicodeMode
= unicodeMode_
;
1040 id
= new wxSTCListBoxWin(GETWIN(parent
.GetID()), ctrlID
);
1041 if (imgList
!= NULL
)
1042 GETLB(id
)->SetImageList(imgList
, wxIMAGE_LIST_SMALL
);
1046 void ListBoxImpl::SetAverageCharWidth(int width
) {
1047 aveCharWidth
= width
;
1051 void ListBoxImpl::SetVisibleRows(int rows
) {
1052 desiredVisibleRows
= rows
;
1056 PRectangle
ListBoxImpl::GetDesiredRect() {
1057 // wxListCtrl doesn't have a DoGetBestSize, so instead we kept track of
1058 // the max size in Append and calculate it here...
1059 int maxw
= maxStrWidth
;
1062 // give it a default if there are no lines, and/or add a bit more
1063 if (maxw
== 0) maxw
= 100;
1064 maxw
+= aveCharWidth
* 3 +
1065 GETLBW(id
)->IconWidth() + wxSystemSettings::GetMetric(wxSYS_VSCROLL_X
);
1069 // estimate a desired height
1070 int count
= GETLB(id
)->GetItemCount();
1073 GETLB(id
)->GetItemRect(0, rect
);
1074 maxh
= count
* rect
.GetHeight();
1075 if (maxh
> 140) // TODO: Use desiredVisibleRows??
1078 // Try to make the size an exact multiple of some number of lines
1079 int lines
= maxh
/ rect
.GetHeight();
1080 maxh
= (lines
+ 1) * rect
.GetHeight() + 2;
1094 int ListBoxImpl::CaretFromEdge() {
1095 return 4 + GETLBW(id
)->IconWidth();
1099 void ListBoxImpl::Clear() {
1100 GETLB(id
)->DeleteAllItems();
1104 void ListBoxImpl::Append(char *s
, int type
) {
1105 wxString text
= stc2wx(s
);
1106 long count
= GETLB(id
)->GetItemCount();
1107 long itemID
= GETLB(id
)->InsertItem(count
, wxEmptyString
);
1108 GETLB(id
)->SetItem(itemID
, 1, text
);
1110 GETLB(id
)->GetTextExtent(text
, &itemWidth
, NULL
);
1111 maxStrWidth
= wxMax(maxStrWidth
, itemWidth
);
1113 wxCHECK_RET(imgTypeMap
, wxT("Unexpected NULL imgTypeMap"));
1114 long idx
= imgTypeMap
->Item(type
);
1115 GETLB(id
)->SetItemImage(itemID
, idx
, idx
);
1120 int ListBoxImpl::Length() {
1121 return GETLB(id
)->GetItemCount();
1125 void ListBoxImpl::Select(int n
) {
1131 GETLB(id
)->Focus(n
);
1132 GETLB(id
)->Select(n
, select
);
1136 int ListBoxImpl::GetSelection() {
1137 return GETLB(id
)->GetFirstSelected();
1141 int ListBoxImpl::Find(const char *WXUNUSED(prefix
)) {
1147 void ListBoxImpl::GetValue(int n
, char *value
, int len
) {
1151 item
.SetMask(wxLIST_MASK_TEXT
);
1152 GETLB(id
)->GetItem(item
);
1153 strncpy(value
, wx2stc(item
.GetText()), len
);
1154 value
[len
-1] = '\0';
1158 void ListBoxImpl::RegisterImage(int type
, const char *xpm_data
) {
1159 wxMemoryInputStream
stream(xpm_data
, strlen(xpm_data
)+1);
1160 wxImage
img(stream
, wxBITMAP_TYPE_XPM
);
1164 // assumes all images are the same size
1165 imgList
= new wxImageList(bmp
.GetWidth(), bmp
.GetHeight(), true);
1166 imgTypeMap
= new wxArrayInt
;
1169 int idx
= imgList
->Add(bmp
);
1171 // do we need to extend the mapping array?
1172 wxArrayInt
& itm
= *imgTypeMap
;
1173 if ( itm
.GetCount() < (size_t)type
+1)
1174 itm
.Add(-1, type
- itm
.GetCount() + 1);
1176 // Add an item that maps type to the image index
1180 void ListBoxImpl::ClearRegisteredImages() {
1190 GETLB(id
)->SetImageList(NULL
, wxIMAGE_LIST_SMALL
);
1194 void ListBoxImpl::SetDoubleClickAction(CallBackAction action
, void *data
) {
1195 GETLBW(id
)->SetDoubleClickAction(action
, data
);
1200 ListBox::ListBox() {
1203 ListBox::~ListBox() {
1206 ListBox
*ListBox::Allocate() {
1207 return new ListBoxImpl();
1210 //----------------------------------------------------------------------
1212 Menu::Menu() : id(0) {
1215 void Menu::CreatePopUp() {
1220 void Menu::Destroy() {
1226 void Menu::Show(Point pt
, Window
&w
) {
1227 GETWIN(w
.GetID())->PopupMenu((wxMenu
*)id
, pt
.x
- 4, pt
.y
);
1231 //----------------------------------------------------------------------
1233 DynamicLibrary
*DynamicLibrary::Load(const char *WXUNUSED(modulePath
)) {
1234 wxFAIL_MSG(wxT("Dynamic lexer loading not implemented yet"));
1238 //----------------------------------------------------------------------
1240 ColourDesired
Platform::Chrome() {
1242 c
= wxSystemSettings::GetColour(wxSYS_COLOUR_3DFACE
);
1243 return ColourDesired(c
.Red(), c
.Green(), c
.Blue());
1246 ColourDesired
Platform::ChromeHighlight() {
1248 c
= wxSystemSettings::GetColour(wxSYS_COLOUR_3DHIGHLIGHT
);
1249 return ColourDesired(c
.Red(), c
.Green(), c
.Blue());
1252 const char *Platform::DefaultFont() {
1253 static char buf
[128];
1254 strcpy(buf
, wxNORMAL_FONT
->GetFaceName().mbc_str());
1258 int Platform::DefaultFontSize() {
1259 return wxNORMAL_FONT
->GetPointSize();
1262 unsigned int Platform::DoubleClickTime() {
1263 return 500; // **** ::GetDoubleClickTime();
1266 bool Platform::MouseButtonBounce() {
1269 void Platform::DebugDisplay(const char *s
) {
1270 wxLogDebug(stc2wx(s
));
1273 bool Platform::IsKeyDown(int WXUNUSED(key
)) {
1274 return false; // I don't think we'll need this.
1277 long Platform::SendScintilla(WindowID w
,
1279 unsigned long wParam
,
1282 wxStyledTextCtrl
* stc
= (wxStyledTextCtrl
*)w
;
1283 return stc
->SendMsg(msg
, wParam
, lParam
);
1286 long Platform::SendScintillaPointer(WindowID w
,
1288 unsigned long wParam
,
1291 wxStyledTextCtrl
* stc
= (wxStyledTextCtrl
*)w
;
1292 return stc
->SendMsg(msg
, wParam
, (long)lParam
);
1296 // These are utility functions not really tied to a platform
1298 int Platform::Minimum(int a
, int b
) {
1305 int Platform::Maximum(int a
, int b
) {
1314 void Platform::DebugPrintf(const char *format
, ...) {
1318 va_start(pArguments
, format
);
1319 vsprintf(buffer
,format
,pArguments
);
1321 Platform::DebugDisplay(buffer
);
1326 static bool assertionPopUps
= true;
1328 bool Platform::ShowAssertionPopUps(bool assertionPopUps_
) {
1329 bool ret
= assertionPopUps
;
1330 assertionPopUps
= assertionPopUps_
;
1334 void Platform::Assert(const char *c
, const char *file
, int line
) {
1336 sprintf(buffer
, "Assertion [%s] failed at %s %d", c
, file
, line
);
1337 if (assertionPopUps
) {
1339 wxMessageBox(stc2wx(buffer
),
1340 wxT("Assertion failure"),
1341 wxICON_HAND
| wxOK
);
1342 // if (idButton == IDRETRY) {
1344 // } else if (idButton == IDIGNORE) {
1350 strcat(buffer
, "\r\n");
1351 Platform::DebugDisplay(buffer
);
1357 int Platform::Clamp(int val
, int minVal
, int maxVal
) {
1366 bool Platform::IsDBCSLeadByte(int WXUNUSED(codePage
), char WXUNUSED(ch
)) {
1370 int Platform::DBCSCharLength(int WXUNUSED(codePage
), const char *WXUNUSED(s
)) {
1374 int Platform::DBCSCharMaxLength() {
1379 //----------------------------------------------------------------------
1381 ElapsedTime::ElapsedTime() {
1385 double ElapsedTime::Duration(bool reset
) {
1386 double result
= wxGetElapsedTime(reset
);
1392 //----------------------------------------------------------------------
1396 #include "UniConversion.h"
1398 // Convert using Scintilla's functions instead of wx's, Scintilla's are more
1399 // forgiving and won't assert...
1401 wxString
stc2wx(const char* str
, size_t len
)
1404 return wxEmptyString
;
1406 size_t wclen
= UCS2Length(str
, len
);
1407 wxWCharBuffer
buffer(wclen
+1);
1409 size_t actualLen
= UCS2FromUTF8(str
, len
, buffer
.data(), wclen
+1);
1410 return wxString(buffer
.data(), actualLen
);
1415 wxString
stc2wx(const char* str
)
1417 return stc2wx(str
, strlen(str
));
1421 const wxWX2MBbuf
wx2stc(const wxString
& str
)
1423 const wchar_t* wcstr
= str
.c_str();
1424 size_t wclen
= str
.length();
1425 size_t len
= UTF8Length(wcstr
, wclen
);
1427 wxCharBuffer
buffer(len
+1);
1428 UTF8FromUCS2(wcstr
, wclen
, buffer
.data(), len
);
1430 // TODO check NULL termination!!