Automatyczne aktualizacje dla własnej aplikacji

Automatyczne aktualizacje dla własnej aplikacji
Oleksy_Adam
Oleksy_Adam
Oleksy_Adam
Oleksy_Adam
  • Rejestracja:prawie 19 lat
  • Ostatnio:około 11 lat
0

Natrafiłem na dziwny problem. Początkowo wydawał się prosty, ale...

Piszę aplikację bazodanową. Niestety na każdej maszynie klienta muszę instalować *.exe i kilka *.dll (klient firebirda). Żeby nie musieć 3x w tygodniu latać po 6x kompach chciałem zrobić automatyczne aktualizacje. Problem wydawał się prosty:

1). Timer co X minut sprawdza na dysku sieciowym czy jest plik *.exe w określonej lokacji. Jeżeli tak to sprawdza wersję.
2). Jeżeli wersja jest wyższa niż aktualna to...
*Zamknij aplikację
*Skopiuj plik ze źródła do celu (kopiowanie z nadpisaniem bez pytania)
*Odpal aplikację

I właśnie punkt 2 mi nie działa. Oto kod:

Kopiuj
begin
  Application.Terminate();
  CopyFile('d:\buildspec.exe', 'D:\BDS2006\Projects\Spec database\BuildSpec.exe', false);
  ShellExecute(0, nil, PChar(ParamStr(0)), '', '', SW_SHOWNORMAL)
end;

Niestety taki kod ni ch** nie działa (znaczy się wykonuje się ale bez jakiegokolwiek efektu) a ja nie potrafię sensownie googli zapytać.

Pomocy, czy macie pomysł jak przeładować aplikację z podmianką pliku exce na nowszy?

<span style="color: blue">"Kolarstwo to jedna z najtrudniejszych dyscyplin sportu. Nawet najgorszy kolarz jest wciąż wybitnym sportowcem."
s.p. Marco Pantani</span>
edytowany 1x, ostatnio: olesio
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Opi
Opi
Opi
Opi
  • Rejestracja:ponad 20 lat
  • Ostatnio:około 18 godzin
  • Postów:1029
0

Możesz generować skrypt (np.: bat), który uruchamiasz i zaraz po tym zamykasz swój program, który ten skrypt wywołał.
Dalej skrypt ma za zadanie skopiować i sprawdzać, czy skopiowanie już się udało - w innym razie wyjdzie błąd bo nie można uruchomić programu który jest jeszcze nie pełny na dysku.
Na końcu uruchamiasz program, skrypt kończy działanie, a twój program kasuje skrypt.

Jeśli nie chcesz się bawić w skrypty, może zrobić mały programik w konsoli bez zbędnych okien, który będzie wykonywał całą procedurę aktualizacji.

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Szczawik
SZ
Szczawik
SZ
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 15 lat
  • Postów:3356
0

Application.Terminate nie zamyka aplikacji a inicjuje zamykanie aplikacji. No i.. oczywista wydawaloby sie sprawa - inicjujesz zamykanie aplikacji a potem w niej chcesz wykonac operacje nadpisania samej siebie? Poki aplikacja dziala to sie nie nadpisze, a jak nie dziala to nie wykona kopiowania (i tez sie nie nadpisze) :/

Proponowalbym stworzyc oddzielny programik B, ktory stawia mutex, uruchamia sie tylko w jednej instancji, zamyka wszystkie istniejace kopie programu A (i czeka az sie zamkna albo na timeout, kiedy to wyrzuca komunikat). Kazda kopia A sprawdza mutex, by nie uruchomic sie, gdy B czeka na pozamykanie. Gdy wszystkie A sa zamkniete, B nadpisuje pliki A i zwalnia mutex.

Skrypt moze byc prostym rozwiazaniem, ale jesli program pozwala na wiele instacji, to latwo zablokowac aktualizacje.

Dzięki wszystkim forumowiczom za lata wspólnych dyskusji; miłej zabawy w programowanie!
Sławomir "Szczawik" Włodkowski
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
PTwr
PTwr
0

Albo inaczej podejść:
Program który ładuje i zwalnia dll'a w której jest to co teraz masz w programie, wtedy bez wyłączania program wejdzie w stan wstrzymana czy coś takiego, zwolni dll'a, podmieni na nowy, załaduje i jedzie dalej

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Oleksy_Adam
Oleksy_Adam
Oleksy_Adam
Oleksy_Adam
  • Rejestracja:prawie 19 lat
  • Ostatnio:około 11 lat
1

Opi, Szczawik fajne opcje. Program póki co pozwala na wiele instancji ale to nie problem z dokodowaniem mutexa i odpalenie skryptu. Szczawik, Twój pomysł brzmi apetycznie zobaczę jak z kodowaniem tego. Jak polegnę to pójdzie opcja Opi. Dzięki za pomoc. Jak się uda to dokleję kod robiący to coś.

PTwr projekt zbyt zaawansowany abym się chciał pokusić na taką modyfikację struktury kodu.

Poszło:

1). Do głównej aplikacji dodałem opcje odpalania się tylko w 1 instancji. Stary dobry mutex

Kopiuj
// plik *.dpr
  CreateMutex(nil, false, PChar('{MUTEX FIRE SHEET GUID}'));
  if GetLastError() = 0 then
  begin
    Application.Initialize;
    Application.CreateForm(TDM, DM);
    (...)
    Application.CreateForm(TDownloadForm, DownloadForm);
    Application.Run;
  end;

  1. Stworzyłem aplikację czekającą na zamknięcie aplikacji głównej. Timer sprawdza co 1s czy aplikacja się zakończyła. Sprawdzanie za pomocą FindWindow()

  2. Aplikacja główna odpala programik do kopiowania pliku ze źródła do celu. Program dostaje dwa parametry. Ważne aby użyć do ich przekazania krótkich nazw plików (wersja 8.3). Jeżeli ścieżka ma spacje to delphi rozbije to na kolejne parametry

Kopiuj
// rozpoczecie aktualizacji
procedure TMainForm.btDownloadClick(Sender: TObject);
begin
  if DownloadForm.ShowModal() = mrOk then
  begin
   // aktualną wersję trzymam sobie w pliku *.ini. Rozwiązanie nie ważne - działa ;-)
    Config.Ini.WriteInteger('VERSION', 'MajorVersion', Major);
    Config.Ini.WriteInteger('VERSION', 'MinorVersion', Minor);
   
    // Tu mi sporo zeszło właśnie na te nazwy plików. Jak podałem ścieżki dostępowe to miałem
    // ParamCount = 7 zamiast 2
    // Odpala aktualizator - on czeka na zamknięcie głównej aplikacji
    ShellExecute(0, nil, 'Download.exe', PChar(Format('%s %s',
      [ExtractShortPathName(Config.cDownload.DowloadPath)+DownloadFile,
       ExtractShortPathName(ExtractFilePath(Application.ExeName))+'FireSheet.exe'])),
      '', SW_SHOWNORMAL);
    // Kończenie
    Application.Terminate();
  end;
end;
  1. Kod aktualizatora
Kopiuj
procedure TDownloadForm.TimerTimer(Sender: TObject);
var
  i :Integer;
begin
  // co 1s sprawdza istnienie okna
  h_wnd := FindWindow('TMainForm', 'MainForm');
  
  // jeżeli go nie ma to znaczy, że aplikacja zamknieta
  if h_wnd = 0 then
  begin
    Timer.Enabled := false;
    // mały wodotrysk dla usera ;-)
    for i := 0 to pbCopyFile.Max do
    begin
      pbCopyFile.Position := i;
      Sleep(20);
    end;
    try
      // podmianka plików
      CopyFile(PChar(ParamStr(1)), PChar(ParamStr(2)), false);
    except
      ShowMessage('Aktualizacja nie powodla się');
    end;
    // Ponowne odpalenie głównej aplikacji
    ShellExecute(DownloadForm.Handle, nil, 'FireSheet.exe', '', '', SW_SHOWNORMAL);
    // Zamknięcie aktualizatora
    Application.Terminate();
  end;
end;
  1. Fragment pliku *.ini
Kopiuj
[DOWNLOAD]
DownloadPath="D:\"

[VERSION]
MajorVersion=3
MinorVersion=7
  1. Jak aplikacja główna sprawdza czy są aktualizacje:
Kopiuj
procedure TMainForm.TimerTimer(Sender: TObject);
var
  sRec         :TSearchRec;
begin
  // w folderze zawsze będzie jeden plik *.exe o budowie XXYY.exe gdzie XX to major a YY to minor
  // 0307.exe
  // oraz plik info.txt aby user widział co było dodane
  if FindFirst(Config.cDownload.DowloadPath+'*.exe', faAnyFile, sRec) = 0 then
  begin
    DownloadFile := sRec.Name;
    // pobranie wersji do porównania
    Major := StrToIntDef(Copy(DownloadFile, 1, 2), 3);
    Minor := StrToIntDef(Copy(DownLoadFile, 3, 2), 0);

    // jeżeli aktualizacja jest nowsza niż obecny plik
    if Major >= Config.cVersion.Major then
    begin
      if Minor > Config.cVersion.Minor then
      begin
        btDownload.Visible := true;
      end;
    end else
  end else
  begin
    btDownload.Visible := false;
  end;
  FindClose(sRec);
end;

Dzięki chłopaki za podsunięcie rozwiązania. Właśnie dlatego uwielbiam to forum :-) . Zawsze można liczyć na ciekawe pomysły. Bardzo fajnie powstają tutaj burze mózgów.

<span style="color: blue">"Kolarstwo to jedna z najtrudniejszych dyscyplin sportu. Nawet najgorszy kolarz jest wciąż wybitnym sportowcem."
s.p. Marco Pantani</span>
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
pelsta
pelsta
pelsta
pelsta
  • Rejestracja:prawie 19 lat
  • Ostatnio:3 dni
  • Postów:819
0

Oleksy_Adam
Żeby każdy forumowicz robił tak jak Ty to byłoby super.

  1. Mam problem, pytam na forum.
  2. Dostaję różne podpowiedzi.
  3. Przedstawiam na forum moje rozwiązanie problemu.
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Szczawik
SZ
Szczawik
SZ
  • Rejestracja:ponad 21 lat
  • Ostatnio:ponad 15 lat
  • Postów:3356
0

Ad 3. Jesli chcesz sciezke ze spacjami przekazac jako parametr, zamknij ja w cydzyslow (tak czy siak mozesz uzyc cudzyslowu, nawet jak nie ma spacji):
program.exe "c:\program files\plik1" "c:\documents and settings\plik2"

Dzięki wszystkim forumowiczom za lata wspólnych dyskusji; miłej zabawy w programowanie!
Sławomir "Szczawik" Włodkowski
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Juhas
JU
Juhas
JU
  • Rejestracja:około 22 lata
  • Ostatnio:około miesiąc
  • Postów:5042
0

Ja to rozwiązałem inaczej.

Otóż, napisałem aplikację, która jest swoistym updaterem.
Wrzucam na serwer ftp plik ini, a także wszystkie inne potrzebne pliki.

Aplikacja uruchamia updatera, który łączy się z serwerem i odczytuje plik ini.
Plik ini zawiera wszystkie potrzebne informacje, tzn:
wersja

sekcja bazodanowa

  • zawiera pliki skryptów, jakie należy zapuścić w bazie

sekcja z innymi plikami

  • zawiera listę wszystkich innych potrzebnych plików

sekcja uruchomieniowa

  • zawiera nazwy plików z sekcji z innymi plikami, które muszą zostać uruchomione

sekcja "usuwająca"

  • zawiera nazwy plików, które należy usunąć po zakończonym updacie

Upater najpierw sprawdza wersje, potem, jeśli ma nowszą, kopiuje skrypty SQL, które wykonuje. Potem te skrypty usuwa. Następnie kopiuje z ftpa wszystkie pliki z sekcji z innymi plikami, następnie uruchamia pliki z sekcji uruchomieniowej(tu np. mogą być baty), a na koniec usuwa pliki, które ma wpisane w sekcji usuwającej.

Całość działa dość fajnie, a odpowiednie oprogramowanie tego wszystkiego spowoduje to, że całość możesz wykorzystać w dowolnej aplikacji :)

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
kuty
KU
kuty
KU
  • Rejestracja:ponad 17 lat
  • Ostatnio:ponad 10 lat
0

Zapraszam na moją stronę www.programistakuty.pl. Tam prezentuje mój darmowy program (bardzo łatwo konfigurowalny) do aktualizacji programu. Prezentuje tam wykorzystanie go w delphi oraz dołączam przykładowy projekt. Strona artykułu http://programistakuty.pl/kuty-updater/

olesio
Fajnie, tylko co to za "moda" na zabawę w archeologa? ;/
KU
Nie jestem archeologiem :) Po prostu sam szukałem kiedyś tematów autoaktualizacji programów i wiem że jest ciężko takie coś wykonać. Postanowiłem więc sam napisać i udostępnić innym moje rozwiązanie, a nóż komuś się przyda. Mogłem oczywiście cały artykuł który zamieściłem na swojej stronie tu wklepać ale nie ma sensu. Może ktoś powiedzieć, że to jest artykuł przed potopowy, ale nie moja wina, że wyszukuje go w googlach więc jest popularny, więc ludzie szukający rozwiązania mogą trafić tu i go znaleźć.
Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Rafał D
Rafał D
0

Witam, Ja wykonałem jeszcze ciut inaczej aktualizacje.

W momencie włączania programu porównywane są daty plików te zainstalowane aktualnie na komputerze z tymi na serwerze i jeśli plik na serwerze jest młodszy to program go pobiera. Po czym uruchamia się dopiero program główny a ten z kolei zamyka aktualizatora. Przy czym aktualizator to plik o nazwie np start.exe a program główny zmieniłem z np. kalkulator.exe na kalkulator.dll. Dzieki temu w katalogu mamy tylko jeden plik wykonywalny exe.

Udostępnij
Kopiuj link do postu Kopiuj link do postu jako Markdown
Komentuj
Treść
Podgląd
Kliknij, aby dodać treść...
Kliknij, aby dodać załącznik lub wklej ze schowka.
Instrukcja obsługi Markdown
Pomoc 1.18.8

Typografia

Edytor obsługuje składnie Markdown, w której pojedynczy akcent *kursywa* oraz _kursywa_ to pochylenie. Z kolei podwójny akcent **pogrubienie** oraz __pogrubienie__ to pogrubienie. Dodanie znaczników ~~strike~~ to przekreślenie.

Możesz dodać formatowanie komendami , , oraz .

Ponieważ dekoracja podkreślenia jest przeznaczona na linki, markdown nie zawiera specjalnej składni dla podkreślenia. Dlatego by dodać podkreślenie, użyj <u>underline</u>.

Komendy formatujące reagują na skróty klawiszowe: Ctrl+B, Ctrl+I, Ctrl+U oraz Ctrl+S.

Linki

By dodać link w edytorze użyj komendy lub użyj składni [title](link). URL umieszczony w linku lub nawet URL umieszczony bezpośrednio w tekście będzie aktywny i klikalny.

Jeżeli chcesz, możesz samodzielnie dodać link: <a href="link">title</a>.

Wewnętrzne odnośniki

Możesz umieścić odnośnik do wewnętrznej podstrony, używając następującej składni: [[Delphi/Kompendium]] lub [[Delphi/Kompendium|kliknij, aby przejść do kompendium]]. Odnośniki mogą prowadzić do Forum 4programmers.net lub np. do Kompendium.

Wspomnienia użytkowników

By wspomnieć użytkownika forum, wpisz w formularzu znak @. Zobaczysz okienko samouzupełniające nazwy użytkowników. Samouzupełnienie dobierze odpowiedni format wspomnienia, zależnie od tego czy w nazwie użytkownika znajduje się spacja.

Znaczniki HTML

Dozwolone jest używanie niektórych znaczników HTML: <a>, <b>, <i>, <kbd>, <del>, <strong>, <dfn>, <pre>, <blockquote>, <hr/>, <sub>, <sup> oraz <img/>.

Skróty klawiszowe

Dodaj kombinację klawiszy komendą notacji klawiszy lub skrótem klawiszowym Alt+K.

Reprezentuj kombinacje klawiszowe używając taga <kbd>. Oddziel od siebie klawisze znakiem plus, np <kbd>Alt+Tab</kbd>.

Indeks górny oraz dolny

Przykład: wpisując H<sub>2</sub>O i m<sup>2</sup> otrzymasz: H2O i m2.

Składnia Tex

By precyzyjnie wyrazić działanie matematyczne, użyj składni Tex.

<tex>arcctg(x) = argtan(\frac{1}{x}) = arcsin(\frac{1}{\sqrt{1+x^2}})</tex>

Kod źródłowy

Krótkie fragmenty kodu

Wszelkie jednolinijkowe instrukcje języka programowania powinny być zawarte pomiędzy obróconymi apostrofami: `kod instrukcji` lub ``console.log(`string`);``.

Kod wielolinijkowy

Dodaj fragment kodu komendą . Fragmenty kodu zajmujące całą lub więcej linijek powinny być umieszczone w wielolinijkowym fragmencie kodu. Znaczniki ``` lub ~~~ umożliwiają kolorowanie różnych języków programowania. Możemy nadać nazwę języka programowania używając auto-uzupełnienia, kod został pokolorowany używając konkretnych ustawień kolorowania składni:

```javascript
document.write('Hello World');
```

Możesz zaznaczyć również już wklejony kod w edytorze, i użyć komendy  by zamienić go w kod. Użyj kombinacji Ctrl+`, by dodać fragment kodu bez oznaczników języka.

Tabelki

Dodaj przykładową tabelkę używając komendy . Przykładowa tabelka składa się z dwóch kolumn, nagłówka i jednego wiersza.

Wygeneruj tabelkę na podstawie szablonu. Oddziel komórki separatorem ; lub |, a następnie zaznacz szablonu.

nazwisko;dziedzina;odkrycie
Pitagoras;mathematics;Pythagorean Theorem
Albert Einstein;physics;General Relativity
Marie Curie, Pierre Curie;chemistry;Radium, Polonium

Użyj komendy by zamienić zaznaczony szablon na tabelkę Markdown.

Lista uporządkowana i nieuporządkowana

Możliwe jest tworzenie listy numerowanych oraz wypunktowanych. Wystarczy, że pierwszym znakiem linii będzie * lub - dla listy nieuporządkowanej oraz 1. dla listy uporządkowanej.

Użyj komendy by dodać listę uporządkowaną.

1. Lista numerowana
2. Lista numerowana

Użyj komendy by dodać listę nieuporządkowaną.

* Lista wypunktowana
* Lista wypunktowana
** Lista wypunktowana (drugi poziom)

Składnia Markdown

Edytor obsługuje składnię Markdown, która składa się ze znaków specjalnych. Dostępne komendy, jak formatowanie , dodanie tabelki lub fragmentu kodu są w pewnym sensie świadome otaczającej jej składni, i postarają się unikać uszkodzenia jej.

Dla przykładu, używając tylko dostępnych komend, nie możemy dodać formatowania pogrubienia do kodu wielolinijkowego, albo dodać listy do tabelki - mogłoby to doprowadzić do uszkodzenia składni.

W pewnych odosobnionych przypadkach brak nowej linii przed elementami markdown również mógłby uszkodzić składnie, dlatego edytor dodaje brakujące nowe linie. Dla przykładu, dodanie formatowania pochylenia zaraz po tabelce, mogłoby zostać błędne zinterpretowane, więc edytor doda oddzielającą nową linię pomiędzy tabelką, a pochyleniem.

Skróty klawiszowe

Skróty formatujące, kiedy w edytorze znajduje się pojedynczy kursor, wstawiają sformatowany tekst przykładowy. Jeśli w edytorze znajduje się zaznaczenie (słowo, linijka, paragraf), wtedy zaznaczenie zostaje sformatowane.

  • Ctrl+B - dodaj pogrubienie lub pogrub zaznaczenie
  • Ctrl+I - dodaj pochylenie lub pochyl zaznaczenie
  • Ctrl+U - dodaj podkreślenie lub podkreśl zaznaczenie
  • Ctrl+S - dodaj przekreślenie lub przekreśl zaznaczenie

Notacja Klawiszy

  • Alt+K - dodaj notację klawiszy

Fragment kodu bez oznacznika

  • Alt+C - dodaj pusty fragment kodu

Skróty operujące na kodzie i linijkach:

  • Alt+L - zaznaczenie całej linii
  • Alt+, Alt+ - przeniesienie linijki w której znajduje się kursor w górę/dół.
  • Tab/⌘+] - dodaj wcięcie (wcięcie w prawo)
  • Shit+Tab/⌘+[ - usunięcie wcięcia (wycięcie w lewo)

Dodawanie postów:

  • Ctrl+Enter - dodaj post
  • ⌘+Enter - dodaj post (MacOS)