From d1aa8faa0632de2dafb7d081a3a93a3c2d4f8962 Mon Sep 17 00:00:00 2001
From: LAPTOP-SNT8I5JK\Boounion <Chenluhua@qq.com>
Date: 星期二, 24 六月 2025 17:36:22 +0800
Subject: [PATCH] 1.与EFEM对接调试Port Command(Type Change、Mode Change、Transfer Mode Change、Enable Mode Change、Type Auto Change、Cassette Type Change)并修改完善代码。 2.增加Recive Able信号的获取，并以此作为能否放料的逻辑判断依据。 3.配方获取完善，待测。

---
 SourceCode/Bond/Servo/BlButton.cpp |    8 ++++----
 1 files changed, 4 insertions(+), 4 deletions(-)

diff --git a/SourceCode/Bond/Servo/BlButton.cpp b/SourceCode/Bond/Servo/BlButton.cpp
index 5eb7694..2bddd2b 100644
--- a/SourceCode/Bond/Servo/BlButton.cpp
+++ b/SourceCode/Bond/Servo/BlButton.cpp
@@ -219,8 +219,7 @@
 		hFont = (HFONT)pFont->GetSafeHandle();
 	}
 
-
-	::SelectObject(hDC, hFont);
+	HFONT hOldFont = (HFONT)::SelectObject(hDC, hFont);
 	::SetBkMode(hDC, TRANSPARENT);
 	::SetTextColor(hDC, m_crText[state]);
 
@@ -237,6 +236,7 @@
 		}
 		DrawTextA(hDC, szText, (int)strlen(szText), &rcText, DT_VCENTER | DT_CENTER | DT_SINGLELINE | DT_END_ELLIPSIS);
 	}
+	::SelectObject(hDC, hOldFont);
 
 
 	// 是否有小圆点
@@ -283,8 +283,8 @@
 		::Polygon(hDC, pt, 3);
 		::SelectObject(hDC, hOldBrush);
 		::SelectObject(hDC, hOldPen);
-		::DeleteObject(hBrush);
-		::DeleteObject(hPen);
+		::DeleteObject(hbrDrop);     // 正确释放小三角使用的画刷
+		::DeleteObject(hPenDrop);    // 正确释放小三角的笔
 	}
 }
 

--
Gitblit v1.9.3