kindred/create
1
1
Fork 0
Code Issues 37 Pull Requests Actions Packages Projects 9 Releases 2 Wiki Activity

Sketcher: BSpline, prevent 0 mm Radius for poles on creation

Browse Source 
============================================================

https://forum.freecadweb.org/viewtopic.php?f=10&t=25701
This commit is contained in:
Abdullah Tahiri
2017-12-04 19:43:27 +01:00
committed by wmayer
parent 750661de35
commit a680961406
1 changed files with 22 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

23
src/Mod/Sketcher/Gui/CommandCreateGeo.cpp
View File

@@ -4559,13 +4559,34 @@ public:
//Gui::Command::openCommand("Add Pole circle");
//Add pole
double guess = (EditCurve[1]-EditCurve[0]).Length()/6;
auto normalize = [](double guess) {
double units=1.0;
while (guess >= 10.0) {
guess /= 10.0;
units*=10.0;
}
while (guess < 1.0) {
guess *= 10.0;
units/=10.0;
}
return round(guess)*units;
};
guess = normalize(guess);
Gui::Command::doCommand(Gui::Command::Doc,"App.ActiveDocument.%s.addGeometry(Part.Circle(App.Vector(%f,%f,0),App.Vector(0,0,1),10),True)",
sketchgui->getObject()->getNameInDocument(),
EditCurve[EditCurve.size()-1].x,EditCurve[EditCurve.size()-1].y);
if(EditCurve.size() == 2) {
Gui::Command::doCommand(Gui::Command::Doc,"App.ActiveDocument.%s.addConstraint(Sketcher.Constraint('Radius',%d,%f)) ",
sketchgui->getObject()->getNameInDocument(), FirstPoleGeoId, round( (EditCurve[1]-EditCurve[0]).Length()/6 ));
sketchgui->getObject()->getNameInDocument(), FirstPoleGeoId, guess );
}
Gui::Command::doCommand(Gui::Command::Doc,"App.ActiveDocument.%s.addConstraint(Sketcher.Constraint('Equal',%d,%d)) ",