Search found 8 matches
- 14 Sep 2006, 04:10
- Forum: CAD VCL
- Topic: no valid characters
- Replies: 3
- Views: 15143
Well I found a way to solve this: 1) First we need to declare a procedure like: procedure TFormParDibComp.elimina0(Entity: TsgDXFEntity); var S2: String; vBox: TFRect; begin if Entity is TsgDXFText then begin S2 := AnsiUpperCase(TsgDXFText(Entity).Text); while pos(#0,s2)>0 do delete(s2,pos(#0,s2),1)...
- 13 Sep 2006, 21:28
- Forum: CAD VCL
- Topic: no valid characters
- Replies: 3
- Views: 15143
Hello again, I realized there where some #0 characters in the text, I wrote the next code: procedure TfmMain.delInvalidChars; var i:integer; s:string; begin for i :=0 to tsgdxfimage(sgimage.Picture.Graphic).Converter.Counts[csEntities]-1 do begin if (tsgdxfimage(sgimage.Picture.Graphic).Converter.En...
- 13 Sep 2006, 20:53
- Forum: CAD VCL
- Topic: no valid characters
- Replies: 3
- Views: 15143
no valid characters
Hello! I bought the cadimportvcl, It's very cool tool, but I'm having 2 problems: 1: Some text entities shows a box at the end of line, looks like a non printable character, how can i delete it? 2: for a demo you post (CADImportVCL_site_beta_010906) there is a method "getrect" for the TsgDXFImageAcc...
- 07 Sep 2006, 21:08
- Forum: CAD VCL
- Topic: Zoom to selection
- Replies: 5
- Views: 20855
- 04 Sep 2006, 18:11
- Forum: CAD VCL
- Topic: Zoom to selection
- Replies: 5
- Views: 20855
Thanks for the quick answer Sergey, As you said the zoom works in both windows, but only with the mouse wheel, but the zoom box (the box that is drawn for auto zoom in the other demos) is disabled. What I want to do is to be able to select the entities and zoom to them, I mean, to see the selected e...
- 02 Sep 2006, 01:42
- Forum: CAD VCL
- Topic: Zoom to selection
- Replies: 5
- Views: 20855
Zoom to selection
Hi Sergei!
In the editor demo the zoom box feature when you drag de mouse is disabled and a selection manager is created, how can I do to have a button with the "zoom to selection" functionality.
In the editor demo the zoom box feature when you drag de mouse is disabled and a selection manager is created, how can I do to have a button with the "zoom to selection" functionality.
- 08 Aug 2006, 18:33
- Forum: CAD VCL
- Topic: Copying entities from a layout to a new DXFImage
- Replies: 3
- Views: 14387
Hi again, I've modified the Editor demo and added a combobox with the list of layouts to change from one layout to another: <b>procedure</b> TfmMain.cblayoutsChange(Sender: TObject); <b>begin</b> img.CurrentLayout:=img.Layouts[cblayouts.itemindex]; <b>end</b>; I have one dwg file with a layout calle...
- 07 Aug 2006, 22:32
- Forum: CAD VCL
- Topic: Copying entities from a layout to a new DXFImage
- Replies: 3
- Views: 14387
Copying entities from a layout to a new DXFImage
Hi!, I'm checking out your component in delphi and I need to add a feature to a program I'm developing. I need to select and copy some entities from a specific layout and save them to a emf file. I've checked the "Editor" demo and does the work fine using the selection manager and 1 layout, the prob...