ATNEL tech-forum

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-02T17:37:39+01:00

Nie mówiłem nic o złych zamiarach, a omijanie ograniczeń czasowych stosuje się nie tylko w programach trial, często się też przydaje np w sofcie typowo księgowym(np jak księgowa się obudziła że trzeba zamknąć kwiecień w grudniu)

Statystyki: Napisane przez Harry — 2 lut 2018, o 17:37

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-02T17:30:50+01:00

powiedzcie mi dlaczego zawsze uważacie że jak ktoś o coś pyta to od razu musi mieć złe zamiary?!!!
Odpalanie innego programami i zmiana czasu to dwa różne tematy i nie połączone ze sobą a zapytałem w jednym wątku bo nie chciałem mnożyć i zaśmiecać forum. trochę mnie to zabolało

Może mi ktoś polecić jakąś książkę do Delphi? Ale taką która opisuje tak podobny sposób jak Mirek (broń Boże zabrać mu pracę chodzi mi o tematy).

Statystyki: Napisane przez Slawek — 2 lut 2018, o 17:30

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-02T17:32:48+01:00

A jak nie pracujesz na koncie admina?
Właśnie w tym leży główny problem, niby można dorobić własny moduł pracujący jako usługa(na local system), ale to już przerost formy nad treścią.

edit:
Ewentualnie skorzystać z edytora zasad (gpedit) i dać prawa zmiany czasy odpowiedniemu userowi, ale niewiem czy to działa w domowych wersjach windy(brak konsoli :/).

Statystyki: Napisane przez Harry — 2 lut 2018, o 16:28

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-02T16:22:27+01:00

Panowie co do uprawnień administratora czyli UAC, to jest to bardzo proste, nowe delfiaczki mają wbudowane rozwiązanie.
Sprawdziłem to na windowsie 10 i delfiaczku tokio i wymuszeniu przez własną aplikację ustawiania czasu systemowego.
A o to co trzeba zrobić:
- wchodzimy do zakładki Project
- wybieramy pozycję Options
- po otwarciu okna, po lewej stronie klikamy na zakładkę Application
- w oknie po prawej zaś odnajdujemy w centralnej części pozycję o nazwie Manifest File
- pod nią jest Execution Level i tu zmieniamy na Require Administrator
I to wszystko, ale trzeba pamiętać że po takim ustawieniu w ide delphi po uruchomieniu programu będzie wywalał błąd o podwyższenie uprawnień.

Statystyki: Napisane przez Cam74 — 2 lut 2018, o 16:22

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-01T14:40:51+01:00

Panowie wielkie dzięki za takie wskazówki . Ja nie zakładałem wątku ale jakimś trafem kolega Slawek wyprzedził mnie i zapytał o to co ja chciałem pytać , ponieważ też właśnie teraz zajmuję sie tym tematem . Wielkie dzięki i pozdrawiam .

Statystyki: Napisane przez ELEKTRON105 — 1 lut 2018, o 14:40

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-01T14:23:46+01:00

Harry napisał(a):

Główny problem to uprawnienia, bo czas można zmienić np tak

No ale o tym pisałem bo bez uprawnień admina - do zmiany czasu daty nie dojdzie

Statystyki: Napisane przez mirekk36 — 1 lut 2018, o 14:23

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-01T13:40:24+01:00

mirekk36 napisał(a):

Ustawianie czasu i daty w kompie w obecnych łindołsach to już nieco bardziej skomplikowane zagadnienie bo do tego trzeba uprawnień administratora czyli twoja apka musiałaby takie posiadać. Jest sens ? moim zdaniem nie za bardzo - no chyba, że tworzysz jakąś bardzo specyficzną aplikację.

Główny problem to uprawnienia, bo czas można zmienić np tak http://www.festra.com/eng/snip07.htm, albo z shella odpalić "date 18-02-30"
Coś mi się zdaje że kolega chce napisać odpalarkę do triali

Statystyki: Napisane przez Harry — 1 lut 2018, o 13:40

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-01T13:35:23+01:00

Dziękuje Mirku za pomoc. Wrócę do domu to przetestuje.
Rozumiem że w nawiasie w ShellExecute() ma się znaleźć ścieżka do programu exe?
A jak wykryć że ten program zewnętrzy został uruchomiony?

Statystyki: Napisane przez Slawek — 1 lut 2018, o 13:35

Re: Delphi - czas systemowy i uruchomienie programów

2018-02-01T13:03:42+01:00

Quote:

Potrzebuję funkcji która zwróci mi bieżącą datę

[syntax=pascal]var
mojczas: TDateTime;
begin
mojczas := now; // i już masz bieżącą datę i czas[/syntax]

a jeśli chcesz do stringa to np ta:

[syntax=pascal]Label1.Caption := TimeDateToStr( now );[/syntax]

albo

[syntax=pascal]Label1.Caption := DateToStr( now );
Label2.Caption := TimeToStr( now );[/syntax]

Ustawianie czasu i daty w kompie w obecnych łindołsach to już nieco bardziej skomplikowane zagadnienie bo do tego trzeba uprawnień administratora czyli twoja apka musiałaby takie posiadać. Jest sens ? moim zdaniem nie za bardzo - no chyba, że tworzysz jakąś bardzo specyficzną aplikację.

Slawek napisał(a):

Przy okazji zapytam jak wywołać inny program w Delphi i czy jest możliwe aby została zwrócona informacja że nastąpiło jego uruchomienie

[syntax=pascal]ShellExecute()[/syntax]

tylko trzeba wcześniej zainkludować sobie

[syntax=pascal]ShellApi;[/syntax]

Statystyki: Napisane przez mirekk36 — 1 lut 2018, o 13:03

Delphi - czas systemowy i uruchomienie programów

2018-02-01T12:14:29+01:00

Cześć.
piszę do Was bo nie mogę sobie poradzić. Zaczynam dopiero Delphi i nie znam do końca jego funkcji, stąd prośba.

Potrzebuję funkcji która zwróci mi bieżącą datę, pozwoli mi też ją zmienić.

Przy okazji zapytam jak wywołać inny program w Delphi i czy jest możliwe aby została zwrócona informacja że nastąpiło jego uruchomienie. i tak na prawdę z tym, mam największy problem

Z góry dzięki

Statystyki: Napisane przez Slawek — 1 lut 2018, o 12:14