Xin các pác viết dùm lisp ở lệnh text fit

[Xin các pác viết dùm lisp ở lệnh text fit]

Chào cả nhà

 

Tớ thường sử dụng lệnh text fit để thay đổi width factor theo chiều dài khung định trước.

 

Mà cái lệnh này mỗi lần dùng chỉ dùng được cho 1 text thôi. Hàng ngày tớ dùng rất nhiều nên nhờ pác nào có thể viết dùng lisp để ứng dụng hàng loạt text.

 

http://www.cadviet.com/upfiles/tham_khao.jpg

 

Cảm ơn các pác nhiều.

 

Tuấn tiger19812004@yahoo.co.jp