Przesunięty przez: restauro
3 Styczeń 2018, 08:54 |
Oblicznie obwodu |
| Autor |
Wiadomość |
Bartix 
Początkujący
Dołączył: 12 Gru 2007
Posty: 2
Skąd: Polska
|
  Wysłany: 12 Grudzień 2007, 16:27 Oblicznie obwodu
|
|
|
Witam serdecznie wszystkich forumowiczów!
Mam nielada kłopot. Zostałem poproszony o obliczenie obwodu poszczególnych liter w celu ustalenia długości taśmy, którą to każda z liter (przestrzennych) ma być oklejona wokół jej obwodu. Mam w związku z tym pytanie: czy istnieje jakiś sposób na wyliczenie obwodu, niekoniecznie za pomocą Corela? Wiem, że taką funkcję mają plotery, ale nie mam niestety póki co dostępu do tego urządzenia. |
|
 |
|
 |
JarekDRAW
Pomógł: 93 razy
Wiek: 45
Dołączył: 01 Sty 2007
Posty: 1176
Skąd: Poznań
|
| Wysłany: 12 Grudzień 2007, 20:32
|
|
|
Witam, słabo przeszukałeś forum było już o tym, tu znajdziesz info którego potrzebujesz...
Pozdrawiam |
|
 |
|
|
Bartix
Początkujący
Dołączył: 12 Gru 2007
Posty: 2
Skąd: Polska
|
| Wysłany: 14 Grudzień 2007, 12:32
|
|
|
Dzięki, ale niestety nic mi to nie pomogło. Potrzebne mi jest narzędzie do oblicznia obwodu figury, a nie jego powierzchni. Natomiast narzędzie Wymiary w Corelu także w tym przypadku nie pomoże.
obrazek do forum.jpg
|
 Pobierz Plik ściągnięto 958 raz(y) 63.4 KB |
|
|
|
|
|
|
derado
Początkujący
derado
Wiek: 46
Dołączył: 03 Sty 2008
Posty: 3
Skąd: bytom
|
| Wysłany: 3 Styczeń 2008, 12:53
|
|
|
ano skoro moze byc inny program to może to:
wyeksportuj krzywe do formatu dwg albo dxf
i w AutoCADzie jest funkcja ZAPYTANIE/QUERY klikasz literke i masz
pozdr |
|
|
|
|
|
vising
Początkujący
Dołączył: 17 Wrz 2010
Posty: 19
Skąd: Mińsk Mazowiecki
|
| Wysłany: 12 Listopad 2010, 08:31
|
|
|
Może odświeżę termat..
Czytałem coś na innym forum, o patch perimeter? Słyszał ktoś coś takiego?
Bo liczenie ręczne obwodu każdej literki to nie jest za ciekawe zajęcię...
Może ktoś już doszedł jak to najszybciej zrobić? |
|
|
|
|
|
wawel
Ekspert
wawel
Pomógł: 261 razy
Dołączył: 30 Mar 2008
Posty: 2143
Skąd: podgorze
|
|
|
|
|
|
dark
Bywalec
Pomógł: 7 razy
Dołączył: 04 Mar 2009
Posty: 39
Skąd: k-ce
|
|
|
|
|
|
lechnik
Doradca
Pomógł: 18 razy
Dołączył: 30 Gru 2009
Posty: 143
Skąd: gliwice
|
| Wysłany: 15 Listopad 2010, 09:47
|
|
|
| JarekDRAW napisał/a: | Witam, słabo przeszukałeś forum było już o tym, tu znajdziesz info którego potrzebujesz...
Pozdrawiam |
ten srypt oblicz i pole i obwód wic nie ma po co szukac dalej |
|
|
|
|
|
TomaszK
Bywalec
Wersja CorelDRAW: x4 x6
Wiek: 36
Dołączył: 07 Gru 2017
Posty: 46
Skąd: Brodnica
|
|
|
|
|
|
Martin Nez
Doradca
Grafik?
Wersja CorelDRAW: 2019
Pomógł: 14 razy
Dołączył: 29 Sty 2011
Posty: 114
Skąd: Czmoń
|
| Wysłany: 24 Listopad 2020, 15:41
|
|
|
Witam,
stary temat, ale może to komuś jeszcze ułatwi na przyszłość.
| Kod: | Sub Bartix()
ActiveDocument.Unit = cdrMillimeter
Dim s As Shape
Dim sr As ShapeRange
Dim obwod As Double
ActiveDocument.BeginCommandGroup
Set sr = ActiveSelectionRange
For Each s In sr
If s.Type <> cdrCurveShape Then s.ConvertToCurves
obwod = obwod + (s.Curve.Length)
Next
ActiveDocument.EndCommandGroup
ActiveDocument.Undo
MsgBox ("Obwód: " & Round(obwod, 2) & " mm")
End Sub |
Pozdr,
MN |
|
|
|
|
|
|
|
FAQ
Szukaj
Użytkownicy
Grupy
Rejestracja
Zaloguj
Download
