C++, MFC Version 6, ComboBox - Font

Question

C++, MFC Version 6, ComboBox - Font

Noah Aas 925

Hello! I need to modify an old application. The ComboBox should get the Courier font. How can I achieve this?

The developer at the time used it at runtime to create the combobox. Can anyone give me some tips? Is not easy, I know.

I have googled without success.

Picture.

enter image description here

The idea is to simply fill in with spaces to get a clean, readable selection, as some of the names are different lengths.

Thanks for your help. With best regards Noah

int CDDF_A1::OnCreate(LPCREATESTRUCT lpCreateStruct) 
{
	if (CDialog::OnCreate(lpCreateStruct) == -1)
		return -1;

	m_getOrderQueue.Create("", WS_TABSTOP|WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 812, NULL, FALSE, (_bstr_t)"1375759644");

	m_SelectedOrderList.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 821, NULL, FALSE, (_bstr_t)"-656125452");
	
	
int CDDF_A1::Test()
{
	
	// Creates a 12-point-Courier-font
//  m_Font.CreatePointFont(120, _T("Courier"));

  // With a member variable associated to the static control
//  m_SelectedOrder.SetFont(&m_Font);

// Font setzen

/*
	IFontDisp *pFontDisp = (IFontDisp *)m_SelectedOrder.GetFont();
	IFont *pFont = NULL; 
	pFontDisp->QueryInterface(IID_IFont, (LPVOID *) &m_Font);//&pFont);
	CY size;
	pFont->get_Size(&size);
	size.Lo = 135000;
	pFont->put_Size(size);

	m_SelectedOrder.SetFont(pFontDisp);


	pFontDisp->Release(); 
	pFont->Release(); 
*/

Viorel 121.3K Reputation points

2024-04-09T14:47:00.71+00:00

What is m_SelectedOrder? The expression m_SelectedOrder.SetFont(&m_Font) should work if it is a CComboBox from MFC.
Noah Aas 925 Reputation points

2024-04-09T14:54:31.1566667+00:00
Thanks for the quick response!

I have to check again tomorrow. Maybe that too.

m_SelectedOrderList.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 821, NULL, FALSE, (_bstr_t)"-656125452");

It's not that easy, very old code.

The controls were created at runtime without the .RC editor.

How could I easily assign this?

LPDISAPATCH ? I can't set this value. (see the screenshot)

Isn't there an easy way to just set Courier?
RLWA32 48,056 Reputation points

2024-04-10T10:02:05.3466667+00:00

The presence of LPDISPATCH in the posted code appears to indicate that ActiveX controls are being used. Is that correct?

Noah Aas 925

I don't think it's an MFC combobox. Too badly, no idea how to change the font.

indicate that ActiveX controls

Maybe you have another tip. Otherwise I can't change it. ActiveX, right.

https://forums.codeguru.com/showthread.php?321408-MFC

IFontDisp *pFontDisp = (IFontDisp *)m_SelectedOrderList.GetFont();
	IFont *pFont = NULL; 
//	pFont->put_Name("Courier");
	pFontDisp->QueryInterface(IID_IFont, (LPVOID *) &pFont);
	CY size;
	pFont->get_Size(&size);
	size.Lo = 120000;
	pFont->put_Size(size);
	m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);
	pFontDisp->Release(); 
	pFont->Release()

This works with the size on selection, not when I open the list. Difficult. Maybe you have an idea, otherwise it will not work.

int CDDF_A1::OnCreate(LPCREATESTRUCT lpCreateStruct) 
{
	if (CDialog::OnCreate(lpCreateStruct) == -1)
		return -1;	

//** Save the selected value
	m_SelectedOrder.Create("", WS_TABSTOP|WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 819, NULL, FALSE, (_bstr_t)"-656125452");
//** Label Headline
	m_SelectedOrderLabel.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 820, NULL, FALSE, (_bstr_t)"-656125452");
//** ComboBox
	m_SelectedOrderList.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 821, NULL, FALSE, (_bstr_t)"-656125452");
	
    CExEditor           m_SelectedOrderLabel;
	CExEditor	    	m_SelectedOrder;
	CExEditor	    	m_SelectedOrderList;
	
	
class CExEditor : public CWnd
{
protected:
	DECLARE_DYNCREATE(CExEditor)
public:
	CLSID const& GetClsid()
	{
		static CLSID const clsid
			= { 0xed8b26d2, 0x1855, 0x42d5, { 0xb6, 0x22, 0xfe, 0xe8, 0x53, 0x95, 0xdf, 0xb3 } };
		return clsid;
	}
	virtual BOOL Create(LPCTSTR lpszClassName,
		LPCTSTR lpszWindowName, DWORD dwStyle,
		const RECT& rect,
		CWnd* pParentWnd, UINT nID,
		CCreateContext* pContext = NULL)
	{ return CreateControl(GetClsid(), lpszWindowName, dwStyle, rect, pParentWnd, nID); }

// Attribute
public:

// Operationen
public:
	void Images(const VARIANT& Handle);
	unsigned long GetBackColor();
	void SetFont(LPDISPATCH newValue);
	LPDISPATCH GetFont();
	void SetRefFont(LPDISPATCH newValue);
	BOOL GetReadOnly();
	void SetReadOnly(BOOL bNewValue);
	long GetHWnd();

Viorel 121.3K Reputation points

2024-04-10T17:39:13.15+00:00

Maybe this will work: ((CWnd&)m_SelectedOrderList).SetFont( &m_Font ). Uncomment the code that creates the m_Font member.

Accepted answer

1 additional answer

Your answer

Viorel 121.3K Reputation points

2024-04-09T14:47:00.71+00:00

What is m_SelectedOrder? The expression m_SelectedOrder.SetFont(&m_Font) should work if it is a CComboBox from MFC.
Noah Aas 925 Reputation points

2024-04-09T14:54:31.1566667+00:00

Thanks for the quick response!

I have to check again tomorrow. Maybe that too.

m_SelectedOrderList.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 821, NULL, FALSE, (_bstr_t)"-656125452");

It's not that easy, very old code.

The controls were created at runtime without the .RC editor.

How could I easily assign this?

LPDISAPATCH ? I can't set this value. (see the screenshot)

Isn't there an easy way to just set Courier?
RLWA32 48,056 Reputation points

2024-04-10T10:02:05.3466667+00:00

The presence of LPDISPATCH in the posted code appears to indicate that ActiveX controls are being used. Is that correct?
Viorel 121.3K Reputation points

2024-04-10T17:39:13.15+00:00

Maybe this will work: ((CWnd&)m_SelectedOrderList).SetFont( &m_Font ). Uncomment the code that creates the m_Font member.

Answer 1

RLWA32 48,056

Assuming that you are trying to obtain an IFontDisp interface pointer for use with an ActiveX control you can do the following to create a 12 pt. Courier font -

FONTDESC fdesc{ sizeof(fdesc), L"Courier", 120000LL, FW_NORMAL, ANSI_CHARSET, FALSE, FALSE, FALSE };

IFontDisp* pFontDisp = NULL;
HRESULT hr = OleCreateFontIndirect(&fdesc, IID_PPV_ARGS(&pFontDisp));
if (SUCCEEDED(hr))
{
    // rest of code
}

I didn't have an old version of VC++ handy so you may need to modify the syntax to conform to whatever version you are using.

Noah Aas 925 Reputation points

2024-04-10T17:22:41.7566667+00:00
How I can assign? I will try it tomorrow. Can you make a whole sample please? Thanks in advance.

m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);

Noah Aas 925

I didn't have an old version of VC++ handy so you may need to modify the syntax to conform to whatever version you are using.

OK, is no difficult for me. Do you have another tip? I have no experience with Visual C++, version 6.0. I get the error messages, see picture. Do you still have a good tip? Otherwise we'll have to leave it at that, I'm losing too much time. My boss is not amused.

//Works not
FONTDESC fdesc{ sizeof(fdesc), L"Courier", 120000LL, FW_NORMAL, ANSI_CHARSET, FALSE, FALSE, FALSE };

IFontDisp* pFontDisp = NULL;
HRESULT hr = OleCreateFontIndirect(&fdesc, IID_PPV_ARGS(&pFontDisp));
if (SUCCEEDED(hr))
{
	// rest of code
	m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);
	pFontDisp->Release(); 
}

//Work also not
FONTDESC fd;
fd.cbSizeofstruct = sizeof(fd);
//fd.cySize=120000;
fd.sWeight=120000;
fd.lpstrName = L"Courier";

IFontDisp* pFontDisp = NULL;
//HRESULT hr = OleCreateFontIndirect(&fd, IID_IFontDisp(&pFontDisp));
HRESULT hr = OleCreateFontIndirect(&fd, IID_IFontDisp, (void **)&pFontDisp);
if (SUCCEEDED(hr))
{
	// rest of code
	m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);
	pFontDisp->Release(); 
}

enter image description here

RLWA32 48,056 Reputation points

2024-04-11T19:15:18.36+00:00

Make sure that you are including the olectl.h and ocidl.h headers. The following should work in VC++ 6.

Noah Aas 925

Looks very good. It would be perfect if the item list could also have the Courier font.

Do you have any good tips for me?

FONTDESC fd = {0};
fd.cbSizeofstruct = sizeof(fd);
fd.cySize.int64=120000;
fd.lpstrName = OLESTR("Courier");
fd.sWeight = FW_NORMAL;
fd.fStrikethrough = FALSE;
fd.sCharset = ANSI_CHARSET;
fd.fItalic = FALSE;
fd.fUnderline = FALSE;


IFontDisp* pFontDisp = NULL;
//HRESULT hr = OleCreateFontIndirect(&fd, IID_IFontDisp(&pFontDisp));
HRESULT hr = OleCreateFontIndirect(&fd, IID_IFontDisp, (void **)&pFontDisp);
if (SUCCEEDED(hr))
{
	// rest of code
	m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);
	pFontDisp->Release(); 
}

enter image description here

RLWA32 48,056 Reputation points

2024-04-12T17:51:54.49+00:00

It would be perfect if the item list could also have the Courier font.

What type of control is the item list? Does it provide methods or properties to set the font that it uses?
RLWA32 48,056 Reputation points

2024-04-14T12:09:04.3266667+00:00

Has your question about creating a Courier font for use in an ActiveX control been answered?
Noah Aas 925 Reputation points

2024-04-14T18:37:22.2466667+00:00
Has your question about creating a Courier font for use in an ActiveX control been answered?

Yes and thank you again. It would be nice if the item list could also have Courier font. I only find SetFont as a method. What could I be looking for? Give me another two or three days, maybe someone else knows something, then we can close the thread.

class CExEditor : public CWnd { protected: DECLARE_DYNCREATE(CExEditor)
RLWA32 48,056 Reputation points

2024-04-14T18:42:28.49+00:00
I only find SetFont as a method.

class CExEditor : public CWnd

Well, if the item list is also an ActiveX control that supports the SetFont(LPDISPATCH) method then you can use what has already been answered -- an IFontDisp interface pointer. Is there some other reason why you think the thread should not be closed by accepting my posted Answer?
Noah Aas 925 Reputation points

2024-04-15T06:44:01.1266667+00:00
Again works well for selected value!

m_SelectedOrderList.SetFont((LPDISPATCH)pFontDisp);

How can I get to the item list to set Courier there, which would be the question. Hope you understand my problem? But yes, give it another 2 days and then I'll close the thread. Maybe someone else knows something. Thank you.
RLWA32 48,056 Reputation points

2024-04-15T07:43:51.49+00:00

How can I get to the item list to set Courier there, which would be the question.

You refer to an item list that does not seem to appear in the few code snippets you have posted. So there is no way for me to answer the above follow-up question about code that I did not write and have not seen.

Noah Aas 925

Of course, you are right. I post now the ActiveX. Maybe you can see here anything for the item list. Thanks in advance.

class CExEditor : public CWnd
{
protected:
	DECLARE_DYNCREATE(CExEditor)
public:
	CLSID const& GetClsid()
	{
		static CLSID const clsid
			= { 0xed8b26d2, 0x1855, 0x42d5, { 0xb6, 0x22, 0xfe, 0xe8, 0x53, 0x95, 0xdf, 0xb3 } };
		return clsid;
	}
	virtual BOOL Create(LPCTSTR lpszClassName,
		LPCTSTR lpszWindowName, DWORD dwStyle,
		const RECT& rect,
		CWnd* pParentWnd, UINT nID,
		CCreateContext* pContext = NULL)
	{ return CreateControl(GetClsid(), lpszWindowName, dwStyle, rect, pParentWnd, nID); }

    BOOL Create(LPCTSTR lpszWindowName, DWORD dwStyle,
		const RECT& rect, CWnd* pParentWnd, UINT nID,
		CFile* pPersist = NULL, BOOL bStorage = FALSE,
		BSTR bstrLicKey = NULL)
	{ return CreateControl(GetClsid(), lpszWindowName, dwStyle, rect, pParentWnd, nID,
		pPersist, bStorage, bstrLicKey); }

// Attribute
public:

// Operationen
public:
	void Images(const VARIANT& Handle);
	unsigned long GetBackColor();
	void SetBackColor(unsigned long newValue);
	unsigned long GetForeColor();
	void SetForeColor(unsigned long newValue);
	BOOL GetEnabled();
	void SetEnabled(BOOL bNewValue);
	long GetAppearance();
	void SetAppearance(long nNewValue);
	void SetFont(LPDISPATCH newValue);
	LPDISPATCH GetFont();
	void SetRefFont(LPDISPATCH newValue);
	BOOL GetReadOnly();
	void SetReadOnly(BOOL bNewValue);
	long GetHWnd();
	VARIANT GetValue();
	void SetValue(const VARIANT& newValue);
	void SetRefValue(VARIANT* newValue);
	long GetEditType();
	void SetEditType(long nNewValue);
	BOOL GetHasCheckBox();
	void SetHasCheckBox(BOOL bNewValue);
	long GetCheckState();
	void SetCheckState(long nNewValue);
	BOOL GetPartialCheck();
	void SetPartialCheck(BOOL bNewValue);
	CString GetMask();
	void SetMask(LPCTSTR lpszNewValue);
	long GetMaskChar();
	void SetMaskChar(long nNewValue);
	long GetPopupAppearance();
	void SetPopupAppearance(long nNewValue);
	long GetDropDownRows();
	void SetDropDownRows(long nNewValue);
	long GetAlignment();
	void SetAlignment(long nNewValue);
	long GetButtonWidth();
	void SetButtonWidth(long nNewValue);
	void AddButton(const VARIANT& Key, const VARIANT& Image, const VARIANT& Align, const VARIANT& ToolTip, const VARIANT& ToolTipTitle);
	void RemoveButton(const VARIANT& Key);
	void ClearButtons();
	void AddItem(long Value, LPCTSTR Caption, const VARIANT& Image);
	void RemoveItem(long Value);
	void ClearItems();
	void Refresh();
	long GetDropDownAlignment();
	void SetDropDownAlignment(long nNewValue);
	BOOL GetDropDownAutoWidth();
	void SetDropDownAutoWidth(BOOL bNewValue);
	long GetDropDownMinWidth();
	void SetDropDownMinWidth(long nNewValue);
	void DropDown();
	BOOL GetDropDownVisible();
	void SetDropDownVisible(BOOL bNewValue);
	BOOL GetShowImageList();
	void SetShowImageList(BOOL bNewValue);
	CString GetVersion();
	void SetVersion(LPCTSTR lpszNewValue);
	VARIANT GetFindItem(const VARIANT& Value);
	long GetItemCount();
	void SortItems(const VARIANT& Ascending, const VARIANT& Reserved);
	VARIANT GetItemCaption(const VARIANT& Index);
	unsigned long GetSelForeColor();
	void SetSelForeColor(unsigned long newValue);
	unsigned long GetSelBackColor();
	void SetSelBackColor(unsigned long newValue);
	long ReplaceIcon(const VARIANT& Icon, const VARIANT& Index);
};

RLWA32 48,056 Reputation points

2024-04-16T07:34:01.21+00:00
I think you misunderstood my comment. For example, in one of your earlier posts you included the following code snippet -

int CDDF_A1::OnCreate(LPCREATESTRUCT lpCreateStruct) { if (CDialog::OnCreate(lpCreateStruct) == -1) return -1; //** Save the selected value m_SelectedOrder.Create("", WS_TABSTOP|WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 819, NULL, FALSE, (_bstr_t)"-656125452"); //** Label Headline m_SelectedOrderLabel.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 820, NULL, FALSE, (_bstr_t)"-656125452"); //** ComboBox m_SelectedOrderList.Create("", WS_CHILD|WS_VISIBLE, CRect(0, 0, 0, 0), this, 821, NULL, FALSE, (_bstr_t)"-656125452"); CExEditor m_SelectedOrderLabel; CExEditor m_SelectedOrder; CExEditor m_SelectedOrderList; // rest of code snippet omitted

So I can tell that you are working with 3 variables of type CExEditor -- m_SelectedOrderLabel, m_SelectedOrder, and m_SelectedOrderList. But you haven't shown where in your code the "item list" is used. So even though you have indicated that it is also a CExEditor ActiveX control all I can tell you is that you can also use its SetFont(LPDISPATCH) method. However I don't know where you actually use the "item list" in your code.

Lets say that somewhere else in your code you declare a CExEditor varible named m_ItemList. Wherever that variable is accessible you can call m_ItemList.SetFont.

Noah Aas 925

Here I fill the list. I see nothing for set the font inside the item list.

CString sInput = sRetVal;
CString sToken=_T("");
int i = 0; // substring index to extract
while (AfxExtractSubString(sToken, sInput, i,'$'))
{   
   if (i>0)
   {
	   WriteLog(sToken);
	   m_SelectedOrderList.AddItem(i + 1, sToken, vtMissing);
   }
   i++;
}
m_SelectedOrderList.SetValue(V("<Select order from list>"));

Thanks for help! ja_ nstag, 16. April 2024_14h10m19s_002_

RLWA32 48,056 Reputation points

2024-04-16T14:33:00.4166667+00:00

Apparently the m_SelectedOrderList is the item list.

The control seems to contain strings. The font used to display such string would be the font used by the control. Individual string items (CString types) do not have a font property.
Noah Aas 925 Reputation points

2024-04-16T17:43:57.7133333+00:00

I think ok, we shouldn't lose too much time.

Question answered and thanks again.

Answer 2

Guido Franzke 2,191

Hello,

try the CFontCtrl class here:

https://www.codeproject.com/Articles/467/Colored-Blinking-Controls-and-Dialogs-with-any-Fon

Regards, Guido

Noah Aas 925 Reputation points

2024-04-10T17:20:15.2066667+00:00

try the CFontCtrl class here:

But I think works not for me. Is a ActiveXcontrol

Share via

C++, MFC Version 6, ComboBox - Font

1 additional answer

Your answer