Zdrojové kódy pro Delphi

Zde jsou uveřejňovány soutěžní aplikace o RAD Studio 2007 (konec 15.11.2010). Dále je zde možno zveřejňovat i jiné zdrojové kódy pro Delphi. V případě zájmu mne kontaktujte.

Chov psů

Autor: Slavomír Svetlík Web:rq.sk

Licence: GNU GPL 2

Stáhnout: zdrojové kódy (1M) a program (1M).

Evidence psů (potažmo i dalších zvířat)

• zakladna evidencia psov (zoznam vsetkych psov v hlavnej obrazovke),
• moznost pridavania, opravy a vymazania psa z evidencie,
• vsetky potrebne ciselniky,
• jednoducha tlac PDF dokumentu (zoznam vsetkych psov)

Autor právě dokončuje konverzi svého RQ Money do Delphi.

komponenty: SQLite wrapper, dsPDF pro generování PDF (cardware)

Verify 0.15

Autor: pepak.net (c) 2010 Pepak, licence: nová BSD licence

Stáhnout: aplikace a zdrojové kódy VERIFY (700K), kompletní popis

Verify je nástroj pro ověřování integrity souborů na disku. Hlavním důvodem, proč jsem psal novou utilitu a nespokojil se s desítkami a stovkami už existujících (např. nejrůznější SFV, MD5SUMS apod.), bylo to, že stávající nástroje trpí určitými omezeními, se kterými se nechci smířit.

Co tedy umí VERIFY navíc proti ostatním utilitám?

• Čtyři základní operační režimy. Běžné programy tohoto druhu poskytují funkce
pro vytvoření seznamu souborů a pro ověření, že soubory odpovídají seznamu. VERIFY navíc nabízí funkce pro aktualizaci seznamu (aniž by bylo třeba přepočítávat to, co se nezměnilo) a pro porovnání dvou seznamů mezi sebou.
• VERIFY umí detekovat nejen běžné stavy "soubor se nezměnil", "soubor se
změnil" a "soubor byl smazán", ale také "soubor byl nově vytvořen" nebo "soubor byl přesunut z místa A na místo B".
• Seznamy souborů jsou čistě textové a je možné je spojovat nebo rozdělovat
podle potřeb. Můžete například udělat po jednom seznamu z každého disku, všechny soubory spojit do jednoho a porovnat je proti seznamu ze síťového úložiště.
• VERIFY se umí vypořádat s řadou případů, které nejsou zcela běžné, ale ke
kterým může docházet a ostatní programy je vesměs nijak neřeší. Například:
• VERIFY si na Windows XP poradí se soubory o velikosti nad 2TB, které nejdou
běžnými prostředky číst.
• VERIFY si poradí s velmi dlouhými cestami (až cca 32000 znaků, proti
standardním 256).
• VERIFY dokáže za jistých podmínek pracovat s case-sensitive jmény souborů
(jména dvou souborů se liší jen velikostí písmen).
• VERIFY rozpozná a volitelně přeskakuje junctions a reparse points.
• VERIFY dokáže načítat skutečný obsah disku i na 64bitových Windows se
zapnutým přesměrováním cest jako WINDOWS\SYSTEM32 nebo PROGRAM FILES.
• VERIFY dokáže přesně specifikovat soubory, které se mají zpracovávat, nejen
pomocí klasických wildcards, ale volitelně i pomocí regulárních výrazů.

Program VERIFY lze zkompilovat pomocí Delphi verze 5 a 2009 (a pravděpodobně s drobnými úpravami i v jiných verzích) a FreePascalu, ale některé funkce vyžadují Delphi 2009:

• Podpora pro dlouhé cesty (nad 256 znaků).
• Podpora pro unicode jména souborů.

Knihovny a jejich licence

Delphi Encryption Compendium, autoři: Hagen Reddmann, Arvid Winkelsdorf, torry.net, šifrovací a hashovací funkce, licence: vlastní, freeware

PerlRegEx, autor: Jan Goyvaerts, regular-expressions.info/delphi.html, Vyhodnocování regulárních výrazů, licence: Mozilla Public License 1.1 (od verze Delphi XE je součástí delphi).

Pinger

Autor: Milan Kormout

VCL Aplikace pro kontrolu dostupnosti zařízení v síti. Ke zjištění stavu používá klasický ping. Odezvy ping a změny stavu ukládá do lokální databáze pro pozdější analýzu. Do budoucna plánována podpora SNMP.

Vyvinuto v Delphi 2010.

Plná velikost

Stáhnout: Pinger (3,4M), zdrojové kódy (100K). Licence GPL. Výsledky antivirového testu.

Použité komponenty

• Indy
• NativeXML
• PngComponents
• SQlite3
• Synapse
• TBX a SpTBXLibs
• TeeChart
• Toolbar2000 + SpTBXLib
• Virtual Treeview
• ZeosDBO