CADSoftTools

Ok, thank's for all

You can test that with the DWG file that I have sent by email.

Hello again, thank's for your quick response. It works perfectly to set the color with all the dwg I have. But, now I realize that I do not get the real color for all entities that are in blocks. Sometimes I have $1F FF FF FF instead of the color. I have tried that: <b>For</b> i := 0 <b>to</b> DWG.C...

Some precisions : I do not use sgImage to display the dwg, I just load a TsgDXFImage and draw as any Tgraphic on my own Timage.
But I do not think this is linked to my problem.

I have tried your method, most of the lines become blue, but not all of them.

Do you want that I send you my dwg file by email (275 Ko), so you can try ?

Hello, I would like to change all the colors of a DWG file to make them "whiter". But lines that do not use layer color are still in original colors. Here is what I have done : //Get the colors into table "Couleurs" <b>For</b> i := 0 <b>to</b> DWG.Converter.Counts[csLayers]-1 <b>do begin</b> Couleur...