给TListBox 发送一个LB_SetHorizontalExtent消息就行了。下面是源代码: SendMessage(ListBox1.Handle,LB_SetHorizontalExtent,5000, longint(0)); 方法来自:http://topic.csdn.net/t/20001028/14/36933.html