Why I can't change the Ha

DuanJinHui · 发表于 2022-7-5 20:58:22

Mr.Tharwat , My code can change hatchspace & hatchscale , I can see it from property. But hatch can't update. why ?

Tharwat · 发表于 2022-7-5 21:03:08

Can you upload a sample drawing ?

Tharwat · 发表于 2022-7-5 21:05:12

Have a look at the following PROGRAM that I have written not a long time ago , and you can modify it to suit your needs .

DuanJinHui · 发表于 2022-7-5 21:08:53

Thanks ,Mr Tharwat. a good routine!

I think my CAD version is too low,

Tharwat · 发表于 2022-7-5 21:10:43

You are welcome

What does that affect with the program ?

DuanJinHui · 发表于 2022-7-5 21:15:40

Because I use CAD2013, can be used normally

Tharwat · 发表于 2022-7-5 21:19:09

Whatever the Autocad version you are using , the program should work

Did you try the program ?

DuanJinHui · 发表于 2022-7-5 21:20:25

Mr. Tharwat , your routine and this function can't use for cad2007 , can't upload . in cad2013 ,No problem.

copy

(defun ZMH_Change_Hatch_Scale() (setq i -1) (while (setq s1 (ssname ss (setq i (1+ i))))   (vla-put-PatternScale (vlax-ename->vla-object s1) (rtos bl 2 3)) );while (setvar "hpscale" hpsc) (princ (strcat "\nModify Scale[ZOOM IN(Q)/ZOOM OUT(W)/INPUT(E)]:")))

Tharwat · 发表于 2022-7-5 21:25:09

I am sorry , I don't have ACad 2007 installed on my Lap to check the program with .

Did you receive any message on running or loading ?

DuanJinHui · 发表于 2022-7-5 21:26:37

it doesn't matter , no receive any message .

[编程交流] Why I can't change the Ha

发表回复

精选推荐