» Poradna » Programy

Delphi project

 |   | 

dobry den , mam takovy problemek-dostal jsem zadany project v podobe praktickeho ukolu v delphi a nejak si stim nevim radytak kdyby nekdo byl tak laskavy a pomohl, jak na to prosimzadani:vytvorte v prostredi Delphi program pro evidenci pacientu v nemocnici.Databaze obsahuje u kazdeho pacienta prijmeni, jmeno , rok narozeni , datum zahajeni hospitalizace, cislo pokoje , na nemž je umístněn , seznam léku, které pacient uziva , a zpusob jejich davkovani.Program bude umoznovat:pridavani noveho pacienta do evidencevyrazeni pacienta z evidencezmenu udaju (leku,pripadne cisla pokoje)vyhledavani pacientu podle jmen a prijmeniserazeni vypis všech pacientu, kteří užívají zadaný lék (ve tvaru jméno-příjmení-zpusob dávkování)Byl bych velmi vdecny kdyby to nekdo domu zkusil nebo me aspon poradil.muj mail: forest99@centrum.cz

Mohlo by vás také zajímat

Odpovědi na otázku

 |   | 

Optimalni reseni pomoci databaze. Protoze jde jen o "prakticky ukol", postaci souborova databaze, klidne i Paradox a BDENavrhnes si tabulky (struktura tabulek vyplyva ze zadani):Adresar - adresar pacientuLeky - seznam lekuHospitalizace - (pokoj a datum) trochu nad ramec zadani, ale umozni sledovat historii hosptalizaci. Da se vypustit, pokud tento udaj preneses (podle zadani) primo do adresarePrideleneLeky - vazba 1:N mezi Adresarem a LekyPak uz jen vytovris formulare na zadavani a nejake ty sestavy...

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

teda fakt diky, sem do dneska ani netusil co vsechno v delphi jde udelat a jak elegantne

Souhlasím  |  Nesouhlasím  |  Odpovědět
 |   | 

Něco podobného mám udělaný, ale přes StringGrig. Musel by sis to ale upravit do svojí podoby. Je tam přidávání záznamů a jejich editace, musel by sis dodělat vyhledávání a seřazování.

Souhlasím  |  Nesouhlasím  |  Odpovědět

Související témata: Project, Evidence, Hospitalizace, Dávkování, Pacient


Určitě si přečtěte

Lépe bylo bez Googlu, přiznal s odstupem bývalý šéf Waze
Markéta Mikešová
WazeGoogle
Konec modrých obrazovek smrti? Microsoft vydává mimořádnou aktualizaci pro Windows 10
Karel Kilián
Windows UpdateAktualizaceWindows 10
Fedora 33 prostě funguje. Linux si zaslouží dobýt laptop, je to ale asi opět marné

Fedora 33 prostě funguje. Linux si zaslouží dobýt laptop, je to ale asi opět marné

** Desktopový Linux funguje a vypadá stále lépe ** Fedora 33 není výjimkou ** Ve stínu Windows a macOS tu vyrostly skvělé alternativy

Jakub Čížek | 170

Jakub Čížek
FedoraOperační systémyLinux
Volitelná aktualizace Windows 10 opravila několik chyb, způsobila ale další problémy
Karel Kilián
Windows UpdateAktualizaceWindows 10
Technici nestíhají. Cetin dočasně přerušil zavádění VDSL bondingu
Lukáš Václavík
CETINPřipojení k internetu
Vybíráme nejlepší monitory: Od úplně levných až po displeje na rozmazlování očí

Vybíráme nejlepší monitory: Od úplně levných až po displeje na rozmazlování očí

** Vybrali jsme nejlepší monitory na práci i pořádné hraní ** Nejlevnější monitor s kvalitním panelem nestojí ani tři tisíce ** Rozlišení 4K a větší obrazovka už není nedostupný luxus

David Polesný | 31

David Polesný
Monitory
Japonská MANA může být 80× výkonnější než sebelepší tranzistorový procesor

Japonská MANA může být 80× výkonnější než sebelepší tranzistorový procesor

** Tranzistory současných počítačů vyzařují při přepínání teplo ** Na Tokijské univerzitě proto vyvíjejí adiabatické procesory ** Využívají supravodivost a jsou 80× úspornější

Jakub Čížek | 48

Jakub Čížek
TranzistoryProcesoryTechnologie
Google není jen vyhledávač: 15 užitečných funkcí, o kterých možná ani nevíte

Google není jen vyhledávač: 15 užitečných funkcí, o kterých možná ani nevíte

** Google umí kromě vyhledávání i spoustu dalších věcí ** Vybrali jsme více než 15 užitečných funkcí a schopností ** Stačí zadat do vyhledávače ta správná klíčová slova

Karel Kilián | 22

Karel Kilián
TipyVyhledávačeGoogle