TEdit1.text:=TComboBox1.Text+'卫生局'

Question

TEdit1.text:=TComboBox1.Text+'卫生局'我想把TComboBox1中除了最后两个汉字的其他字加上一个字符串'卫生局'，放到TEdit中。我用的是下面的代码
TEdit1.text:=pchar(copy(TComboBox1.Text,length(TComboBox1.Text)-3,4)+'卫生局')
比如TComboBox1.Text:='昆明市直辖'   显示的是“昆明市治郎”  
如果我在卫生局前面加个空格，则显示“昆明市?卫生局”我想要得到得效果是“昆明市卫生局”谢谢大家了

Answer 1

edit1.Text:=Copy(ComboBox1.Text,1,3)+'卫生局'
//这样写不行吗?非要那样写!

Answer 2

一样的
edit1.Text:=Copy(ComboBox1.Text,1,length(ComboBox1.Text)-3)+'卫生局'
显示：昆明市治郎

Answer 3

edit1.Text:=Copy(ComboBox1.Text,1,length(ComboBox1.Text)-4)+'卫生局'