perlon

Użytkownik forum
  • Zawartość

    267
  • Rejestracja

  • Ostatnia wizyta

  • Wygrane w rankingu

    13

Ostatnia wygrana perlon w Rankingu w dniu 10 Grudzień

perlon posiadał najczęściej polubioną zawartość!

1 obserwujący

O perlon

  • Tytuł
    Nowicjusz

Ostatnie wizyty

Blok z ostatnimi odwiedzającymi dany profil jest wyłączony i nie jest wyświetlany użytkownikom.

  1. Tiaaaa.... proszę admina o wywalenie wątku w niebyt. Jeżeli nie to sam sobie odpowiem. Ślepota własna. Nie odblokowałem tablicy do zapisu. TTable symbolTable = (TTable)transaction.GetObject(GetObjectId(acDatabase, typeof(TTable)), mode: OpenMode.ForRead); // <- tylko do odczytu if (!symbolTable.Has(symbol.Name)) { symbolTable.UpgradeOpen(); // <- togo brakowało symbolTable.Add(symbol); transaction.AddNewlyCreatedDBObject(symbol, true); transaction.Commit(); }
  2. Witam. Zderzyłem się z programistycznym problemem niekoniecznie związanym ściśle z ZwCAD'em ale wyszedł akurat przy programie na tą platformę. Prawdopodobnie jest to problem bardziej ogólny. Mam klasę generyczną która ma za zadanie sprawdzić czy w tablicy symboli istnieje przekazany symbol. Jeżeli nie to powinna ten symbol w tej tablicy utworzyć. public abstract class SymbolGenerator<TTable> : ISymbolGenerator where TTable : SymbolTable { public abstract void Generate(); public void Generate<TSymbol>(TSymbol symbol) where TSymbol : SymbolTableRecord { Document acDoc = Application.DocumentManager.MdiActiveDocument; Database acDatabase = acDoc.Database; using (Transaction transaction = acDoc.TransactionManager.StartTransaction()) { TTable symbolTable = (TTable)transaction.GetObject(GetObjectId(acDatabase, typeof(TTable)), mode: OpenMode.ForRead); if (!symbolTable.Has(symbol.Name)) { symbolTable.Add(symbol); // <- tu się wywala transaction.AddNewlyCreatedDBObject(symbol, true); transaction.Commit(); } } } private ObjectId GetObjectId(Database db, Type type) { switch(type.Name) { case "LayerTable": return db.LayerTableId; case "TextStyleTable": return db.TextStyleTableId; default: throw new NotSupportedException(); } } } Jak widać klasa powinna sobie poradzić z każdą tablicą symboli. Mnie w szczególności interesują LayerTable i TextStyleTable. Po przekazaniu innej ma rzucić wyjątek. Klasa jest abstrakcyjna więc potrzebuję klasy konkretnej. Przykładowa klasa do obsługi jakiegoś stylu tekstu. Klasa dziedziczy po SymbolGenerator<TextStyleTable> jak widać oczekuje typu TextStyleTable public class ElevationMarkTextStyleGenerator : SymbolGenerator<TextStyleTable>, IElevationMarkTextStyleGenerator { public override void Generate() { TextStyleTableRecord style = new TextStyleTableRecord(); style.Name = "ck_koty"; style.FileName = "simplex.shx"; style.XScale = 0.65; style.ObliquingAngle = 0; Generate(style); } } Wywołanie proste: var generator = new ElevationMarkTextStyleGenerator(); generator.Generate(); Application does not support just-in-time (JIT) debugging. See the end of this message for details. ************** Exception Text ************** System.Runtime.InteropServices.SEHException (0x80004005): External component has thrown an exception. at ZcDbSymbolTable.add(ZcDbSymbolTable* , ZcDbObjectId* , ZcDbSymbolTableRecord* ) at ZwSoft.ZwCAD.DatabaseServices.SymbolTable.Add(SymbolTableRecord value) at CADKitCore.Contract.SymbolGenerator`1.Generate[TSymbol](TSymbol symbol) in D:\dev\CSharp\Workspace\CADKit\CADKit\Contract\SymbolGenerator.cs:line 21 at CADKitElevationMarks.Model.ElevationMarkTextStyleGenerator.Generate() in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Model\ElevationMarkTextStyleGenerator.cs:line 17 at CADKitElevationMarks.Contract.BaseElevationMark..ctor(IElevationMarkConfig _config) in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Contract\BaseElevationMark.cs:line 44 at CADKitElevationMarks.Model.ArchtecturalElevationMarkPNB01025..ctor(IElevationMarkConfig config) in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Model\ArchtecturalElevationMarkPNB01025.cs:line 16 at CADKitElevationMarks.Model.ElevationMarkFactoryPNB01025.GetElevationMark(ElevationMarkType type, IElevationMarkConfig config) in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Model\ElevationMarkFactoryPNB01025.cs:line 15 at CADKitElevationMarks.Contract.ElevationMarkFactory.GetElevationMark(ElevationMarkType type) in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Contract\ElevationMarkFactory.cs:line 15 at CADKitElevationMarks.Commands.ElevationMarkArch() in D:\dev\CSharp\Workspace\CADKit\CADKitElevationMarks\Commands.cs:line 17 at ZwSoft.ZwCAD.Runtime.CommandClass.InvokeHelper(MethodInfo mi, Object commandObject, Boolean bLispFunction) at ZwSoft.ZwCAD.Runtime.CommandClass.InvokeHelperWithExceptionFilter(MethodInfo mi, Object commandObject, Boolean bLispFunction) Prawdę mówiąc nie wiem co robię nie tak. Może znajdzie się ktoś bieglejszy, kto mi to wyjaśni?
  3. perlon

    Przybornik PARIKON

    Nawiasy kwadratowe są potrzebne tylko w kolumnach które maja minus bo baza próbuje wykonać operację G minus marg. W klamerkach przyjmuje całość jako identyfikator. Jak widać poniżej w innych przypadkach nawiasy nie są potrzebne. Jak widzisz w kontrolkach musiałeś już użyć podkreślenia bo minus jest niedopuszczalny. Nazwy kolumn w bazach z polskimi literami nie wyglądają dobrze. Nagłówki w gridzie możesz ustawić osobno już z śćźł jak tam chcesz ale w bazie lepiej trzymać kolumny bez polskich liter. Masz wersję kwerendy która robi update w jednym kroku. U mnie bez nawiasów działa. public void ZmienDaneWTabeli() { this.db_con.Open(); SQLiteCommand db_cmd = db_con.CreateCommand(); db_cmd.CommandType = CommandType.Text; db_cmd.CommandText = "update " + nazwatabeli + " set " + "Format='" + UserControl2.nazwaformatki + "'," + "Wysokość='" + UserControl2.wysokosc + "'," + "Długość='" + UserControl2.dlugosc + "'," + "[G-marg]='" + UserControl2.G_marg + "'," + "[D-marg]='" + UserControl2.D_marg + "'," + "[L-marg]='" + UserControl2.L_marg + "'," + "[P-marg]='" + UserControl2.P_marg + "' " + "where Format='" + UserControl1.formatka + "'"; db_cmd.ExecuteNonQuery(); db_con.Close(); }
  4. perlon

    Przybornik PARIKON

    W uzupełnieniu: https://pl.wikipedia.org/wiki/SQL_injection https://www.plukasiewicz.net/Artykuly/SQLInjection_dla_poczatkujacych Ale dla tego typu zastosowań może nie warto za bardzo się ścierać. Moje propozycja : public bool CzyPowtorka(string nazwa) { this.db_con.Open(); SQLiteCommand db_cmd = db_con.CreateCommand(); db_cmd.CommandType = CommandType.Text; db_cmd.CommandText = "select count() from " + nazwatabeli + " where [Format] = '" + nazwa + "'"; var result = (long)db_cmd.ExecuteScalar(); db_con.Close(); return result > 0; } a dla pobierania danych z tabeli ramki_dane db_cmd.CommandText = "select * from " + nazwa_tabeli + " order by format desc"; Ponadto jeszcze jedna uwaga. DataTable dt = baza.PobierzDaneTabeli(baza.nazwatabeli); Skoro wywołujesz metodę PobierzDaneTabeli() klasy Base to instancja baza zna pole nazwatabeli. Nie ma sensu pobieranie z instancji jakiegoś pola po to żeby przekazać je z powrotem jako argument metody tej samej instancji. powinno być : DataTable dt = baza.PobierzDaneTabeli(); public DataTable PobierzDaneTabeli1() { var dt = new DataTable(); this.db_con.Open(); SQLiteCommand db_cmd = db_con.CreateCommand(); db_cmd.CommandType = CommandType.Text; db_cmd.CommandText = "select * from " + this.nazwatabeli + " order by format desc"; db_cmd.ExecuteNonQuery(); SQLiteDataAdapter da = new SQLiteDataAdapter(db_cmd); da.Fill(dt); this.db_con.Close(); return dt; } a nazwa tabeli skoro jest zmienną publiczną powinna być ustawiana w konstruktorze klasy. Są dwa konstruktory żeby działało po staremu w reszcie kodu. public Base(string _path) : this(_path, "ramki_dane") { } public Base(string _path, string _table) { this.nazwatabeli = _table; this.path = _path + "\\Bazy"; string sciezkaBaza = this.path + "\\pi.sqlite"; this.db_con = new SQLiteConnection($"Data Source = {sciezkaBaza}; Version = 3"); }
  5. perlon

    Przybornik PARIKON

    W bazach relacyjnych zakłada się, że kolejność rekordów jest taka jak kolejność dodawania. Odpowiednie sortowanie załatwia się klauzulą ORDER BY na etapie wyciągania danych z bazy a nie w momencie wstawiania. ORDER BY załatwia że zanim baza zwróci wynik zapytania to go najpierw posortuje. SELECT * FROM ramki_dane WHERE `jakis_filtr` ORDDER BY `Format` Oczywiście WHERE nie będzie jak chcesz wyciągnąć wszystkie rekordy. Żeby było bazie lżej zakłada się na kolumny indeksy. Są one aktualizowane przy każdym INSERT, DELETE i UPDATE. Indeksów może być wiele. Baza jest inteligentna i jeżeli uzna, że przy sortowaniu warto użyć jakiegoś indeksu to go użyje. Jeżeli nie znajdzie dobrego indeksu zastosuje ogólne metody sortowania. ORDER BY może zawierać łączenia pól np. ORDER BY `jakies_pole`+`inne_pole` Uwaga. Zapytania realizują również operacje matematyczne więc wartości liczbowe zostaną dodane i należy kontrolować typy. Może być np wymagana konwersja pola w samej kwerendzie. Ogólna uwaga ExecuteNonQuery() stosuje się do INSERT, UPDATE i DELETE. Do SELECT powinno się użyć ExecuteReader() dla zestawów i ExecuteScalar() gdy kwerenda zwraca dokładnie jedną daną. Taką kwerendą jest np SELECT COUNT() ... Zapuść sobie takie zapytanie w DB Browser SQLita to zobaczysz że danych z bazy można wyciągać mniej i osiągnąć ten sam rezultat. Generalnie wiele rzeczy da się zrobić po stronie bazy a w programie już tylko durne wyświetlanie gotowych zestawów posortowanych, pofiltrowanych, pogrupowanych i co tam jeszcze.
  6. perlon

    Przybornik PARIKON

    Warunek if(wierszy > 0) i for(int = 0; i < wiersz; i++ ) są tożsame. if jest niepotrzebny, bo jeżeli wierszy == 0 to 0 < 0 = false i pętla for się nie wykona ani razu. Na razie baza jest mikro i czas wykonania będzie nie mierzalny, ale co do zasady tego tak nie wolno robić !!! Co się stanie jak rekordów będzie 1000 000? To powinno się załatwić : SELECT COUNT() FROM ramki_dane WHERE format='jakis_format_z_pola_tekstowego' Jeżeli zwróci 0 to nie ma rekordu w przeciwnym razie wiadomo. Niech się baza męczy a nie twoja aplikacja. Generalnie SELECT * FROM ... bez WHERE to bardzo zła metoda. Zgadza się, ale lepiej żeby baza broniła się sama niż ma ją bronić zewnętrzna aplikacja. Wewnętrzne mechanizmy i algorytmy bazy będą zawsze lepsze niż iterowanie rekordów w aplikacji. Polecam indeks UNIQUE albo PRIMARY KEY
  7. perlon

    Przybornik PARIKON

    Myślałem o debugowniu z poziomu VS i wykonywaniu aplikacji w trybie krokowym. Znalezienie braku przypisania dt = baza.PobierzDaneTabeli(baza.nazwatabeli); // <- tu brakowało przypisania do dt bez debuggera zabrałoby mnóóóóóóóóstwo czasu. A można np tak: Dla aplikacji WPF mam niestety taki zonk : Aplikacje z Windows Forms nie mają z tym problemu. Może ktoś coś wie na ten temat?
  8. perlon

    Przybornik PARIKON

    Pierwsze uruchomienie pi_ramki przynajmniej u mnie pokazuje pustą bazę. Można to sprawdzić usuwając fizycznie plik bazy i odpalić ponownie ramki. Można to również prosto naprawić jak poniżej. DataTable dt = baza.PobierzDaneTabeli(baza.nazwatabeli); int wierszy = dt.Rows.Count; if (wierszy == 0) { baza.GetData(); dt = baza.PobierzDaneTabeli(baza.nazwatabeli); // <- tu brakowało przypisania do dt } dataGrid.ItemsSource = dt.DefaultView; Tak na marginesie GetData() powinno się raczej nazywać InsertData(). GetData raczej sugeruje że coś pobieramy z bazy a nie że do niej coś wkładamy. Druga rzecz. W kodzie używasz kolumny Format funkcjonalnie jako klucza głównego choć formalnie kolumna takim kluczem nie jest. Po nim robisz update. Wykonaj taki eksperyment: - do istniejącej bazy dodaj nowy rekord o nazwie która już istnieje np. A0 o jakiś dziwnych wymiarach np. 200x200. Nowy rekord zostanie dopisany i będą dwa A0 o różnych wymiarach. potem jednemu z nich zmień wymiar. Zobacz co stanie się z drugim. Jeżeli kolumna format jest kluczem głównym to należałoby założyć na nią indeks typu UNIQUE. CREATE UNIQUE INDEX `ID` ON `ramki_dane` ( `Format` ASC ); nazwa ID jest zwyczajową, może być dowolna inna. Kolejność sortowania wedle uznania. Po tej operacji dodanie drugiego formatu A0 nie będzie możliwe ale operacja zakończy się błędem. Przed wywołaniem baza.DodajDaneDoTabeli(); należy sprawdzić istnienie formatu jaki chcemy dodać. Można taką kontrolę podpiąć pod właściwość Enabled przycisku tak aby przycisk OK był nieaktywny jeżeli format już występuje. Oczywiście trzeba najpierw wiedzieć czy jest to tryb dopisywania czy aktualizacji. Alternatywnie i takie rozwiązanie wydaje się najsensowniejsze z punktu widzenia odpytywania bazy danych można zamiast powyższego dodać dodatkową kolumnę z autoincrementem jako klucz główny CREATE TABLE `ramki_dane` ( `ID` INTEGER NOT NULL PRIMARY KEY AUTOINCREMENT UNIQUE, `Format` Varchar ( 50 ), `Wysokość` INT, `Długość` INT, `G-marg` INT, `D-marg` INT, `L-marg` INT, `P-marg` INT ); Każde dodanie nowego rekordu spowoduje ustawienie pola ID o 1 większego niż ostatni istniejący w bazie. Trzeba jednak w takim wypadku zmodyfikować nieco kwerendę INSERT. Zamiast db_cmd.CommandText = "INSERT INTO " + nazwatabeli + " VALUES ('A4','210','297','25','5','5','5')"; powinno się w insercie wskazać nazwy kolumn db_cmd.CommandText = "INSERT INTO " + nazwatabeli + "('Format', 'Wysokość', 'Długość', 'G-marg', 'D-marg', 'L-marg', 'P-marg') VALUES ('A4','210','297','25','5','5','5')"; Nie zawsze insert musi zawierać komplet kolumn. Taki insert jest również poprawny. Brakującym polom zostaną nadane wartości domyślne jeżeli w bazie zostaną zadeklarowane. db_cmd.CommandText = "INSERT INTO " + nazwatabeli + "('Format', 'Wysokość', 'Długość') VALUES ('A4','210','297')"; Jeżeli w przyszłości powstanie pomysł zbudowania w bazie relacji miedzy dwoma różnymi tabelami to PRIMARY KEY stanie się niezbędny. Wszak SQLite jest relacyjną bazą danych więc jest więcej niż pewne że tak się kiedyś stanie. Nie wiem dlaczego nie mogę debugować kodu z WPF'em w dll'ce ładowanej do ZwCAD'a. Poradziłem sobie zakładając nowy projekt okienkowy WPF z oknem głównym aplikacji okienkowej i do niej wrzuciłem kontrolkę UserControl1. Uzyskałem zwykłą aplikację okienkową którą mogę debugować bez konieczności ładowania do środowiska ZwCAD. Może komuś się przyda jeżeli zechce debugować kody pisane w tym wątku. Z kosmetycznych rzeczy to warto dla bibliotek ZwCAD'a ustawić Copy Local na false, żeby się niepotrzebnie nie kopiowały do kartoteki bin. I tak mając zainstalowanego ZwCAD'a są dostępne globalnie. I jeszcze jedna uwaga kosmetyczna. Kod lepiej wygląda jak się stosuje jednolitą konwencję językową. DodajDaneDoTabeli() OK UpdateDaneWTabeli() już wygląda źle. Powinno być AktualizujDaneWTabeli(). AddBaseIfNotExist() też jest OK ale stosowanie równolegle polskiego i angielskiego nazewnictwa jest takie sobie. Polski język słabo się nadaje do jednoznacznego określania co dana metoda ma faktycznie robić albo jaka jest odpowiedzialność danej klasy. Takie rzeczy nazwa powinna wskazywać raczej precyzyjnie a polski język ma niestety w tym zakresie swoje mankamenty.
  9. perlon

    Przybornik PARIKON

    Jakoś mi się udało zrobić forka library1_zw na swoim githubie. Jest tam stworzona gałąź wersji z moim kodem. https://github.com/Perlon001/library1_zw/tree/ForkPerlon/library1_zw Myślałem że projekt byłby realizowany wspólnymi siłami, na zasadzie wspólnego zdobywania tzw. skill'a i trochę dla fanu, dając możliwość zwiększania funkcjonalności przy wspólnej pracy nad kodem. Można robić osobne nie powiązane moduły do zadań konkretnych. Każdy sobie i tylko udostępniać na licencji MIT w warunkach "takie jakie jest" i jak chcesz to sobie je weź. Tylko że jak wymyślę nową super zarypistą kotę do oznaczania rzędnych na rzutach to najłatwiej byłoby ją umieścić w moule od kot. Ale żeby ją mieć to muszę sobie nową dll'kę zmajstrować. Ja tak bardzo nie jestem przywiązany do swojego kodu żebym miał się bronić przed jego poprawianiem. Tym bardziej, że git pozwala na tworzenie wielu odgałęzień wersji i ich scalaniu wedle uznania. Muszę tylko się tylko nauczyć Wracając do sedna. Korzystając z zaproszenia do współpracy postanowiłem zmodyfikować nieco podejście do tematu rysowania kot. Na forum kilkukrotnie (pozdrawiam MartinS) była dyskusja na temat stosowania norm również w oznaczeniach na rysunków. Dlatego wymyśliłem sobie, że użytkownik bezie miał możliwość wyboru systemu rysowania (wyboru dostępnej normy) i za pomocą tej samej komendy rysować różne koty. Ta filozofia zapewne może mieć zastosowanie w wielu innych aspektach. Koty to tylko przykład jak za pomocą kiedyś wymyślonych przez mądrych ludzi wzorców realizować tego typu zadania. W tym konkretnym przypadku do tworzenia koty w odpowiednim standardzie wykorzystałem wzorzec fabryka. Duża część kodu do tworzenia koty nawet nie wie jaką kotę tworzy. Klasa abstrakcyjna BaseElevationMark dostarcza implementację wspólną dla wszystkich kot wysokościowych. Klasy konkretne w kilku linijkach załatwiają tylko te rzeczy którymi koty się różnią. Na to wszystko nałożona jest fabryka która zwraca na żądanie klasę konkretną ukrytą za interfejsem. Zdaję sobie sprawę, że mój kod ani nie jest odkrywczy ani nie jest super och i ach. Dlatego wszelkie uwagi są na prawdę mile widziane. Zapewne w kodzie są błędy, których ja jako autor nie jestem w stanie dostrzec. Jest również wiele rzeczy do poprawienia i uzupełnienia których mam świadomość. Feedbek bardzo mile widziany a za zrypkę też się nie obrażę. Mam również świadomość, że ilość linijek może nie być mniejsza niż w kodzie podstawowej biblioteki library1_zw (nie sprawdzałem). Szukałem sposobu na możliwość szybkiej rozbudowy o nowe standardy, a kod żeby spełniał zasady programowania obiektowego. Kończąc ten przydługawy elaborat chciałbym dodać, że spodziewałem się współpracy na poziomie tworzenia/pisania kodu w celach edukacyjno/hobbystycznych z efektem praktycznym, ale wygląda na to że zamysł Parikona jest nieco inny.
  10. perlon

    Przybornik PARIKON

    Popełniłem trochę kodu, głównie jako refaktoryzacja i uzyskanie podobnego efektu końcowego innymi metodami. Skupiłem się na części dot. kot wysokościowych. Chciałbym to wrzucić na githuba jako boczny branch ale coś mam chyba nie tak poustawiane, czegoś nie umiem albo repo jest zamknięte na obce commity . Jeszcze nie comittowałem do obcego repozytorium. Wklejanie całego kodu tutaj mija się z celem. Jak jakoś udostępnię cały kod to pozwolę sobie na kilka zdań objaśnienia co do mojego spojrzenia na to konkretne zagadnienie. Wszystko co udostępnię w ramach tego projektu będzie oczywiście na licencji MIT. Co do "zapętlenia" to rozwiązaniem chyba wystarczającym jest zamknięcie wywołania komendy w pętli nieskończonej + Exception. Klasę z komendami zrobiłem tak: [CommandMethod("KOTA_ARCH")] public void ArchElevationMark() { // co druga linijka z ponizszych jest niepotrzebna // konfiguracja z AppSettings IElevationMarkFactory markFactory1 = new ElevationMarkFactory(AppSettings.Instance.DrawingStandard).GetFactory(); // jak kto woli moze byc z łapy bez oglądania się na aktualne ustawienia IElevationMarkFactory markFactory2 = new ElevationMarkFactory(DrawingStandards.PN_B_01025).GetFactory(); // ustawienia defaultowe IElevationMark elevationMark1 = markFactory1.CreateElevationMark(ElevationMarkTypes.archMark); // albo wstrzykujemy konfiguracje. ElevationMarkConfig config = new ElevationMarkConfig(); config.ElevationMarkColor = Color.FromColorIndex(ColorMethod.ByAci, 5); config.ElevationMarkLayer = "OddzielnaWarstwaNaKoty"; IElevationMark elevationMark2 = markFactory1.CreateElevationMark(ElevationMarkTypes.archMark, config); try { while(true) { elevationMark1.Create(); } } catch (System.Exception ex) { Application.DocumentManager.MdiActiveDocument.Editor.WriteMessage(ex.Message); } } [CommandMethod("KOTA_KONSTR")] public void ConstrElevationMark() { // tutaj wersja simply IElevationMarkFactory markFactory = new ElevationMarkFactory(AppSettings.Instance.DrawingStandard).GetFactory(); IElevationMark elevationMark = markFactory.CreateElevationMark(ElevationMarkTypes.constrMark); try { while(true) { elevationMark.Create(); } } catch (System.Exception ex) { Application.DocumentManager.MdiActiveDocument.Editor.WriteMessage(ex.Message); } } Metoda w której wskazuję punkty wygląda tak: protected virtual void GetPoints() { Document acDoc = Application.DocumentManager.MdiActiveDocument; Application.SetSystemVariable("Osmode", 512); PromptPointOptions promptOptions = new PromptPointOptions("\nWskaż punkt wysokościowy: "); promptOptions.AllowNone = true; PromptPointResult pointResult = acDoc.Editor.GetPoint(promptOptions); if (pointResult.Status == PromptStatus.Cancel || pointResult.Status == PromptStatus.None) { throw new Exception("Cancel"); } elevationPoint = pointResult.Value; Application.SetSystemVariable("Osmode", 0); promptOptions.Message = "\nWskaż stronę : "; promptOptions.UseBasePoint = true; promptOptions.BasePoint = elevationPoint; pointResult = acDoc.Editor.GetPoint(promptOptions); if (pointResult.Status == PromptStatus.Cancel || pointResult.Status == PromptStatus.None) { throw new Exception("Cancel"); } side = GetSides(pointResult.Value); elevationPoint = new Point3d(Math.Round(elevationPoint.X, 3), Math.Round(elevationPoint.Y, 3), elevationPoint.Z); } Jak widać przy każdym oczekiwaniu na punkt jeżeli wciśnie się ESC lub ENTER pointResult otrzymuje status odpowiednio Cancel lub None. Wystarczy to sprawdzić i rzucić wyjątek który wywędruje aż do komendy startowej i tam dopiero zostanie obsłużony. Mój CommandMethod wygląda nieco dziwnie ale przy najbliższej okazji spróbuję wyjaśnić co się skąd wzięło. Następny ranek... Wygląda, że repozytorium https://github.com/Parikon/library1_zw jest zamknięte dla obcych commitów 😞
  11. perlon

    Przybornik PARIKON

    Jakiś czas temu wpadła mi w ręce taka pozycja: https://helion.pl/ksiazki/refaktoryzacja-ulepszanie-struktury-istniejacego-kodu-martin-fowler-kent-beck-john-brant-william-opdy,refukv.htm#format/d Trochę już lat od wydania ale mi osobiście zmieniła spojrzenie na sporo rzeczy jeżeli chodzi o optymalizacje kodu. W przypadku kot wysokościowych są duże fragmenty powtórzonego kodu np. tego związanego z pobieraniem od użytkownika punktów, obsługą warstw czy rysowaniem tekstu. Dla każdej z kot jest on identyczny. Może warto wydzielić go do osobnej metody tym bardziej, że jak przyjdzie pomysł na inne koty to ten kod będzie potrzebny po raz kolejny. Krótszy kod łatwiej się zarządza i ewentualne poprawki robi się w jednym miejscu a nie w wielu powtórzeniach.
  12. perlon

    Przybornik PARIKON

    Może w taki deseń? public class Start : zzr.IExtensionApplication { string path = System.IO.Path.GetDirectoryName(Assembly.GetExecutingAssembly().Location); public static zza.Document doc = zza.Application.DocumentManager.MdiActiveDocument; zze.Editor ed = doc.Editor; public void Initialize() { ed.WriteMessage("\nPI 2019 MIT Edition. Niektóre moduły PI korzystają z silnika bazy danych SQLite - www.sqlite.org."); ed.WriteMessage("\nŁadowanie modułów:"); Zaladuj("skala_zw.dll"); Zaladuj("cos_innego.dll"); Zaladuj("jeszcze_jakis_inny_modul.dll"); } public void Terminate() { } public void Zaladuj(string nazwadll) { ed.WriteMessage("\nŁadowanie " + nazwadll + new String('.',20 - nazwadll.Length)); string sciezka = path + "\\" + nazwadll; try { Assembly.LoadFrom(sciezka); ed.WriteMessage(" załadowane."); } catch (System.Exception ex) { ed.WriteMessage(" Błąd : " + ex.Message); } } }
  13. perlon

    Przybornik PARIKON

    Tu chyba jest mała nieścisłość bo zamiast catch (System.Exception ex) { ed.WriteMessage(ex.Message); zlicz = zlicz = 1; } powinno być catch (System.Exception ex) { ed.WriteMessage(ex.Message); zlicz = 1; } lub ewentualnie jak niżej jeżeli zlicz jest licznikiem nieudanych ładowań dll'ek catch (System.Exception ex) { ed.WriteMessage(ex.Message); zlicz += 1; } Wydaje si
  14. perlon

    projekt_forum.dll

    Po ściągnięciu z GitHub'a kompiluje się prawidłowo ale uruchomienie zwraca takie okno: Zależność jest tylko jedna i jest w porządku <?xml version="1.0" encoding="utf-8"?> <packages> <package id="System.Data.SQLite.Core" version="1.0.109.2" targetFramework="net40" /> </packages> Wujek google podpowiada, że SQLite nie wie jaką bibliotekę załadować x86 czy x64. U mnie pomogło rzucenie w konsoli managera pakietów : Update-Package -reinstall
  15. perlon

    Zmienna systemowa ORBITAUTOTARGET

    Tak. Tylko że ja robię orbit przez Shift+SKM a nie przez _3dorbit. Przy 3dorbit jest jak trzeba ale trzeba znaleźć ikonę a Shift+SKM jest bez celowania w ikonę.