Dodaj wpis w tym temacie
Spis tematów | Strona: 1 2 ... 362 363 364 ... 554 555 Wyślij wiadomość do admina |
Przewiń wpisy ↓ | moje ... oprogramowanie |
2020-05-21 (10:32)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 412 [ CZCIONKA MONOSPACE ] fair_play Tak przy kawie ,przekodowałem na paskal, i zaimplementowałem search line to delete dla gwarancji 6, wykonuje błyskawicznie. Co do czasu kiedy to do Ciebie trafi ,to dziś wieczorem , ale jak dorobię wersję pod jeden przycisk dla 5,6,7,8 Pod buttonem powinno dojść wyszukanie dla 5,7,8 ale na dziś powielę tylko dla gwarancji 5 ,więc będzie 5 i 6 Dodam odświeżenie dla okna bestbrak co powinno pomóc , ale sam musisz przetestować. Step by step ..... z przerwami ,bo to ma być tylko odskocznia dla zabawy , a nie ......dodatkowa robota . |
2020-05-21 (11:18)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 418 [ CZCIONKA MONOSPACE ] 777ch> "wykonuje błyskawicznie." To cieszy ![]() A co z tym błędem "Invalid pointer operation" przy próbach zatrzymania programu buttonem "Stop" ? |
2020-05-21 (14:07)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 441 [ CZCIONKA MONOSPACE ] To zatrzymanie i ten błąd to bardziej skomplikowane. We wszystkich,albo w większości procedur jest odwołanie typu boolean a zmienna przechodzi w false albo true w zależności od motylka na checkboksie stop kliknięcie raz normalnie zatrzymuje większość pętli ,ale kliknięcie raz za razem może spowodować błąd, To u mnie się nie zdarza prawie wcale,jedynie gdy mam tasowanie randomizerem ze sprawdzaniem ilości powtórzeń i kliknę na stop. Być może u ciebie się odświerzanie zawiesza ,to wtedy boolean się nie wykona. Zobaczysz jak dostaniesz,najwyżej Ci wytnę tablice dla 2,3,4 bo tu już ....prawie pozamiatane 📲 |
2020-05-21 (15:08)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 447 [ CZCIONKA MONOSPACE ] fair_play Słowo korelacje jest użyte celowo . Komercyjne programy ....."pakują" lecąc po kolejnych sekwencjach kombinacji kolejnymi zbiorami lub pętlami kolejnych liczb Do jakiejś wąskiej przestrzeni to się sprawdza , w mocno już upakowanym rozpisie nie idzie wtedy nic wymienić ,stosując zasady kolejności ..... TYLKO zasada korelacji ,czyli zgodności segmentu i przejechanie tylko tych sekwencji ,w których ta korelacja występuje z zasadą losowej dostawki liczb do segmentu zgodnego powoduje tasowanie bez zwiększenia gwarancji ,do momentu prawidłowego ustawienia , czyli np wchodzę z 5-ka 1,2,3,4,5 szukając zgodności 4 i tam skaczę ,próbując wpasować 5 czyli jedną niezgodną + liczbę losową bo kolejne 1,2,3,4,5,6,7,8,9 nie zaburzą całego bloku kombinacji a skakanie +losowa to właśnie czyni.... a tylko z chaosu ......może powstać "nowy początek" z porządku nie powstanie nowy układ. Co do przerwania stop jednej pętli ......... a stosuję wyłącznie repeat until(granica); niema problemu ale jeśli masz pętle w pętli a pomiędzy odwołania typu case do wielu procedur....... albo boolean bo po wykonaniu jakiejś procedury jakaś zmienna zmienia się z false na true to już masz problem......... w momencie jak klikniesz stop ! --> zbyt wiele if-ów w liniach ...... spowalnia procesy stąd unikam ich wielokrotnego stosowania, co powoduje że czasem proces zatrzyma się ale nie od razu a klikanie .....kilka razy w stop ![]() ......tylko .....zużywa myszkę ![]() |
2020-05-21 (15:43)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 452 [ CZCIONKA MONOSPACE ] Ja klikam jednokrotnie w "Stop", a wielokrotnie dopiero na "OK" w oknie komunikatu o błędzie (nieraz 10 razy żeby je zamknąć). --- wpis edytowano 2020-05-21 15:44 --- |
2020-05-21 (15:53)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 454 [ CZCIONKA MONOSPACE ] procedure TForm1.searchdelete(Sender: TObject); var maust:byte; begin maust:=spinedit4.Value; // value=[m] case maust of 0: exit ; 1: exit ; 2: exit ; ///search2 3: exit ; //search3 4: exit ; //search4 5: search5todelete(Sender); //Find5 6: search6todelete(Sender); //Find6 7: exit ; //search7 8: exit ; //search8 end; end; zrobiłem to ....... na razie tyle ,Find5 albo Find6 jest obok starego search line link sprawdzaj w poczcie , melduj jak pobierzesz --- wpis edytowano 2020-05-21 15:54 --- |
2020-05-21 (16:04)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 455 [ CZCIONKA MONOSPACE ] 777ch> " czyli np wchodzę z 5-ka 1,2,3,4,5 szukając zgodności 4 i tam skaczę ,próbując wpasować 5 czyli jedną niezgodną + liczbę losową" Gdybyś jeszcze podpowiedział które z 21 pozostałych liczb (przy rozpisie 25 skreśleniowym) podmieniasz tymi 5-tą i losową. Ile prób podmiany w wybranej linii przeprowadzasz i na których miejscach? W poczcie niczego nie ma ![]() --- wpis edytowano 2020-05-21 16:09 --- |
2020-05-21 (16:18)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 459 [ CZCIONKA MONOSPACE ] jest link sprawdź odpowiedziałem na ostatnią pocztę |
2020-05-21 (16:21)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 460 [ CZCIONKA MONOSPACE ] Dotarło, ale Avast znów sprawdza ![]() |
2020-05-21 (16:22)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 461 [ CZCIONKA MONOSPACE ] Gdybyś jeszcze podpowiedział które z 21 pozostałych liczb (przy rozpisie 25 skreśleniowym) podmieniasz tymi 5-tą i losową próbuję wpasować po kolei zamieniając każdą kolejną w sekwencji w tablicach na startowa z własne +losowa ale to jakby taki proces z mijanką ale..... nie opiszę w szczegółach --> jak to zrobiłem ....... ![]() |
2020-05-21 (16:24)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 462 [ CZCIONKA MONOSPACE ] fair_play proponuję wstaw do folderu samo exe ana pultip tylko skrót dopliku i odpal oba z takim samym rozpisem jaksię któryś zawiesi to znaczy że masz problem z przydziałem pamięci,u mnie bez problemu chodzą dwa albo i trzy........równocześnie ! |
2020-05-21 (16:27)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 464 [ CZCIONKA MONOSPACE ] OK ![]() Z tego no napisałeś wnioskuję, że w 25 skreśleniowej linii dokonujesz 20 podmian (jeśli 1 losowa) jeżeli wcześniej nie ma sukcesu ? Avast zaakceptował ![]() |
2020-05-21 (16:31)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 465 [ CZCIONKA MONOSPACE ] Nie ciąg mnie za język testuj czy Ci się wiesza -->aha zrzuca dane dla load5 oraz load6 ![]() nie bezpośrednio do baza.txt żeby dane wpadły do tablic należy po obliczeniu kliknąć w Zapisz cl3DLight to baza.txt i kliknąć w Restart aby załadował te dane........ --- wpis edytowano 2020-05-21 16:34 --- |
2020-05-21 (16:38)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 466 [ CZCIONKA MONOSPACE ] C(40,17,5,5) https://ljcr.dmgordon.org/show_cover.php?v=40&k=17&t=5 jedna spada i jazda |
2020-05-21 (16:38)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 467 [ CZCIONKA MONOSPACE ] Ciągnę za język, bo chciałbym coś popróbować w excelu, ale ok już nie ciągnę. A to z zapisem do bazy.txt to tak było i poprzednio i tak robię ![]() |
2020-05-21 (16:44)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 469 [ CZCIONKA MONOSPACE ] ok coś zapuścimy .....czy bawisz się sam ? bo......... nie chcę Cię zmuszać do roboty --> ![]() |
2020-05-21 (16:46)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 470 [ CZCIONKA MONOSPACE ] Coś z tym find5 jest nie tak, bo w excelu znajduje 64 linię, a tutaj 1-szą |
2020-05-21 (16:47)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 471 [ CZCIONKA MONOSPACE ] Jak Ci się widzi........ te same problemy masz czy jest lepiej ? możesz zmieniać miejsce formy w trakcie działania ,oraz zmniejszać liczbę losowych płynnie czy zmniejszać lub zwiększać formę ? |
2020-05-21 (16:48)![]() Data rejestracji: 2005-11-07 Ilość postów: 22656 ![]() | wpis nr 1 294 472 [ CZCIONKA MONOSPACE ] find5 zrobiłem kopiując z find6 ....teraz sobie przypomniałem że nie pozmieniałem --> skresleń -nn ![]() |
2020-05-21 (16:52)![]() Data rejestracji: 2016-05-12 Ilość postów: 8706 ![]() | wpis nr 1 294 473 [ CZCIONKA MONOSPACE ] Co to "miejsce formy" ? -10 Wpadłem na pewien pomysł, ale muszę go sprawdzić ![]() --- wpis edytowano 2020-05-21 16:55 --- |
| Dodaj wpis w tym temacie | Spis tematów | Wyniki lotto | Strona: 1 2 ... 362 363 364 ... 554 555 Wyślij wiadomość do admina |