diff --git a/SanPinPLM/相关操作/4.0-other/200.Delphi脚本.md b/SanPinPLM/相关操作/4.0-other/200.Delphi脚本.md
index 34aa0941..98c2c776 100644
--- a/SanPinPLM/相关操作/4.0-other/200.Delphi脚本.md
+++ b/SanPinPLM/相关操作/4.0-other/200.Delphi脚本.md
@@ -95,7 +95,7 @@ chiGetFieldValueBySql('select top 1 usr_sqlmj from pdmitem where usr_sqlmj like
 
 获取的结果赋值给变量
 
-```
+```delphi
 str := chiGetFieldValueBySql('select usr_333 from pdmitem where itemcode = ''' + fedtItemCode.Text + '''');
 ```