各位先進，請教個問題：ComboBox控件，其items類似為：101010    令狐沖；
101012 東方不敗
我想實現的是，在選擇之后，ComboBox.text為101010，就是截取原來的text的前6個字符，有在ComboBox1Select處理過 但是沒有生效，demo如下：
procedure TForm1.ComboBox1Select(Sender: TObject);
var tmpStr:string;
begin
tmpStr:=LeftStr(ComboBox1.Text,6);
ComboBox1.Text:=tmpStr;
Label1.Caption:= ComboBox1.Text;
end;

可是在ComboBox顯示的還是101010 令狐沖，而實際上的ComboBox1.Text為101010

------
对岸的菜鸟,但是很喜欢用delphi!

編輯記錄

您好,

我沒去研究 combobox 的原碼
所以猜想, 可能是 combobox 在 dropdown 時顯示 items 的內容
一離開才會顯示 text 內容

我試的結果是, 在 o n e x i t 事件加
combobox1.Text := copy(combobox1.Text,1,6);

那一離開 combobox (也就是 focus 到其他的元件) 他就會變成 6 碼

參考一下

------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.

果然如兄台所言，谢了

------
对岸的菜鸟,但是很喜欢用delphi!