Subscribe: TZblok
http://tzblok.blogspot.com/feeds/posts/default
Added By: Feedage Forager Feedage Grade C rated
Language: Czech
Tags:
builder  delphi  jak  jsem  klávesové zkratky  microsoft  server  serveru  service  sql server  sql serveru  sql  tak  win  že 
Rate this Feed
Rate this feedRate this feedRate this feedRate this feedRate this feed
Rate this feed 1 starRate this feed 2 starRate this feed 3 starRate this feed 4 starRate this feed 5 star

Comments (0)

Feed Details and Statistics Feed Statistics
Preview: TZblok

TZblok



co mi bzučí v hlavě



Updated: 2017-09-08T12:15:33.725+02:00

 



Generic Reduce for Delphi

2016-12-12T16:04:28.262+01:00

Simple Reduce() implementation for Delphi 2009+: unit MapReduce; interface uses   System.SysUtils, System.Generics.Collections; type   TMapReduce = record   public     class function Reduce(const AFunc: TFunc;       const AList: TEnumerable; AAcc: T): T; static;   end; implementation class function TMapReduce.Reduce(const AFunc: TFunc;   const AList:



Méně známé klávesové zkratky Delphi IDE

2014-04-22T11:21:42.937+02:00

Méně známé klávesové zkratky Delphi IDE, které jsem se nově naučil: Je jasné, že pro efektivní práci v IDE je potřeba používat klávesové zkratky. Mnohé jsou notoricky známé - viz např. zde: Delphi - klávesové zkratky v IDE. IDE má ale zkratek ještě mnohem více. A ne všechny jsem znal a používal. Toto je seznam, které jsem nově zavedl do svého repertoáru: Ctrl+klik v Ctrl+Space dialogu mě



London Grammar

2014-04-22T00:26:10.665+02:00

Dlouho se mi to už nestalo. Dechberoucí na první poslech. Úplně náhodu jsem narazil na toto video: London Grammar - Live on KEXP Seattle A objevil London Grammar. A hlavně Hannah Reid. Takový hlas se jen tak nepotká. Ale oceňuju i oba kluky. Mají za sebou teprve první desku. Nemá smysl o tom psát, to se musí poslouchat...



Plain text z HTML textu

2014-04-21T18:25:10.345+02:00

Funkční fragment kódu, který umí vzít HTML kód a "vytáhnout" z něj očištěný text. Je jasné, že se ztratí všelijaké formátování typu barvy, bold, italic atd. atd. Je závislé na instalaci jádra Microsoft Internet Exploreru. Tedy nebude fungovat na OS X, iOS, Androidu apod. Testováno v Delphi XE3 a XE6, ale mělo by fungovat v libovolné verzi. uses   System.Variants, System.Win.ComObj,



Smazání souborů staršínch než N dnů Windows dávkou

2013-12-05T13:09:38.130+01:00

Windows dávka (.cmd nebo .bat), která maže JPG soubory starší než 30 dnů v cestě C:\Cesta\KdeChiMazat vypadá následovně: forfiles /P "C:\Cesta\KdeChiMazat" /M *.jpg /D -30 /C "cmd.exe /c del /q @path"  Pokud chci i v podadresářích C:\Cesta\KdeChiMazat, tak přidám parametr /S. Příkaz forfiles neumí fungovat nad UNC cestami. Ale dá se to obejít trikem s PUSHD / POPD, který dočasně UNC cestu



Radiohead: OK Computer

2013-07-24T12:43:23.987+02:00

Jejich OK Computer z roku 1997 můžu poslouchat pořád. Vůbec není znát, že už je to 15 let. Podařilo se jim nadčasové dílko. Ještě dnes se mi u No Surprises (nejen!) ježí chlupy. Tracklist s mým hodnocením: 1. Radiohead - Airbag (4:44) 2. Radiohead - Paranoid Android (6:23)  ★★★★★ 3. Radiohead - Subterranean Homesick Alien (4:28)  ★★★★★ 4. Radiohead - Exit Music (For A Film) (4:25)  ★★★



Delphi XE3

2013-07-24T11:27:27.084+02:00

Takže Embarcadero Delphi XE3 je venku. Pokud potřebuji při podmíněné kompilaci poznat tuto verzi, tak takto: {$IFDEF VER240} ... {$ENDIF} Seznam všech verzí: VER250 → Delphi XE4 / C++Builder XE4 (Win32/Win64/iOS) VER240 → Delphi XE3 / C++Builder XE3 (Win32/Win64) VER230 → Delphi XE2 / C++Builder XE2 (Win32/Win64) VER220 → Delphi XE / C++Builder XE (Win32) VER210 → Delphi 2010 / C++Builder 2010



How to create case insensitive TDictionary<>

2013-07-24T11:20:48.902+02:00

Very simple: uses System.Generics.Collections, System.Generics.Defaults; var   Dict: TDictionary‹string, TValue›; begin   Dict := TDictionary‹string, TValue›.Create(TIStringComparer.Ordinal); // ‹- this is the trick   try   .   .   .   finally     Dict.Free;   end; end; Indeed you can use TObjectDictionary‹›. Tested in Delphi XE2.



Singleton v Delphi

2013-07-24T11:20:48.913+02:00

Poslední dobou se dost zajímám o Design patterns a tak člověka napadne, jak by ten který implementoval Delphi. Jako první jsem si vybral singleton (i když o něm někteří říkají, že je to anti-pattern): unit Singleton; interface type TSingleton = class sealed strict private class var FInstance: TSingleton; public // Global point of access to the unique instance class



Duck typing v Delphi

2013-07-24T11:20:48.911+02:00

Našel jsem ve Wikipedii (pro mě) podivný termín: Duck typing. Tak mě zajímalo co to je a jestli by to šlo implementovat v Delphi. Zde je výsledek: /// This is example of duck typing in Delphi. /// Based on: http://en.wikipedia.org/wiki/Duck_typing program DuckTyping; {$APPTYPE CONSOLE} uses ObjComAuto; {$METHODINFO ON} // important type TDuck = class public procedure Quack;



Delphi - klávesové zkratky v IDE

2013-07-24T11:20:24.560+02:00

Klávesové zkratky dokáží ušetřit hodně času. Proto není od věci si je čas od času zopakovat:Ctrl+J - vyvolá Šablony kódu (Code Templates)Ctrl+T - smaže slovo vpravo od kurzoruCtrl+E - zahájí inkrementální vyhledávání v aktuálním dokumentu od kurzoruCtrl+Y - smaže aktuální řádekCtrl+Shift+G - vloží nově vygenerovaný GUID na místo kurzoruCtrl+Shift+I - odsadí vpravo (Indent) označený blok textuCtrl



Google se zbláznil?

2009-01-31T15:56:19.624+01:00

Dnes se Google rozhodl označovat úplně všechny nalezené odkazy textem "Tyto stránky mohou poškodit váš počítač." - viz obrázek:



Microsoft vydal Service Pack 3 (SP3) pro SQL Server 2005

2008-12-19T08:18:20.880+01:00

http://www.microsoft.com/downloads/details.aspx?FamilyId=ae7387c3-348c-4faa-8ae5-949fdfbe59c4Build je 9.00.4035.Jako všechny Service Packy produktů firmy Microsoft je i tento kumulativní, tedy není nutné instalovat nejprve Service Pack 1 nebo Service Pack 2.



Delphi 2009 jsou hotové

2013-07-24T11:20:24.552+02:00

Firma Embarcadero dnes oznámila, že Delphi 2009 a C++Builder jsou hotové.



SQL Server 2008 jde do výroby

2008-08-07T10:10:49.853+02:00

Microsoft dnes oznámil, že SQL Server 2008 je hotov.



SQL Server 2008 Release Candidate 0 (RC0)

2008-07-26T15:20:17.233+02:00

SQL Server 2008 Release Candidate 0 (RC0) je ke stažení zde:SQL Server 2008 RC0Normálně ho mohou stahnout jen předplatitelé MSDN/TechNet, ale z výše uvedeného linku to jde každému. Pokud nevíte, co přesně stahnout, tak doporučuji X86 Executable (929 MB) a nainstalovat to jako Standard Edition. Jedná se o build 10.0.1442.Nějaké povídání o novinkách v SQL2008 zde:SQL Server 2008 Books Online >



SQL Server - odstranění české diakritiky

2008-04-05T09:59:01.796+02:00

Jak na ořezání české diakritiky v CHAR-ovém nebo VARCHAR-ovém sloupci nebo proměnné?Přetypovat na VARCHAR stejné délky a využít toho, že např. ruská kódová stránka neobsahuje žádný znak s českou diakritikou:SELECT CAST(Sloupec AS VARCHAR(8000)) COLLATE Cyrillic_General_CI_ASFROM dbo.TabulkaPříklad:SELECT CAST('Příliš žluťoučký kůň úpěl ďábelské ódy' AS VARCHAR(8000)) COLLATE



Delphi 2008 dotazník

2013-07-24T11:20:24.554+02:00

Společnost CodeGear zveřejnila dotazník ohledně budoucnosti vývojového nástroje Delphi.Dotazník je celkem rozsáhlý a detailní, otázek je celkem 95 ve 14 sekcích. Dotazník je anonymní, nechtějí po vás žádné identifikační údaje. Dokonce ho lze odeslat jen částečně vyplněný, jak jsem si bohužel omylem ověřil.The 2008 Delphi SurveyPrý se tím budou v CodeGearu řídit ;).



Vydání finálního SQL Serveru 2008 bude opožděno

2008-01-28T13:32:14.923+01:00

Oproti původně anoncovanému termínu bude SQL Server 2008 (nástupce SQL Serveru 2005) vydán o půl roku později. Tedy až někdy ve 3. čtvrletí roku 2008. V tomto okamžiku je k dispozici beta verze, jak je vidět zde: Microsoft SQL Server 2008, 2005, 2000 and 7.0 BuildsZdroj:Microsoft SQL Server 2008 Roadmap Clarification



Jak rychle zjistit, jaký Service Pack, případně hotfix mám nainstalovaný na SQL Serveru

2007-08-03T17:52:35.401+02:00

Na stránce:Microsoft SQL Server 2008, 2005, 2000 and 7.0 buildsje docela výživný seznam všech možných hotfixů a Service Packů které existují pro:SQL Server 7.0SQL Server 2000SQL Server 2005a dokonce i pro připravovaný SQL Server 2008 (kódové jméno Katmai)Ve sloupci "Availability" lze zjistit, jestli je hotfix/sp veřejný (a tedy přímo stahnutelný).



Jak si vyžádat hotfix od Microsoftu emailem?

2007-08-03T17:39:25.083+02:00

Dříve to šlo jen telefonicky. Nyní Microsoft zveřejnil webovou stránku:Microsoft > Help and Support > Contact Us: Hotfix Request Web Submission Formkde je možné si hotfix vyžádat. Vyplníte: státčíslo článku ve Znalostní bázi (Microsoft Knowledge Base)platformu vašeho produktu, kterého se hotfix týká (x86/x64/IA64)váš emailDo osmi (pracovních) hodin by měl přijít email s reakcí. Vyzkoušel jsem, o



Delphi s nativní podporou Unicode - kódové jméno "Tiburón"

2013-07-24T11:20:24.571+02:00

Společnost CodeGear (dříve Borland) vyvíjející vývojový nástroj Delphi, zveřejnila roadmap (cestovní mapu) budoucích verzí svých vývojových nástrojů:Delphi and C++Builder RoadmapMimo jiné mě tam nejvíce zaujala nativní podpora Unicode. Konečně, chtělo by se zvolat! A zároveň se ptát: proč tak pozdě?Tato verze Delphi ještě nemá jméno, pod kterým se bude prodávat (že by Delphi 2008?). Zatím se



Zveřejněno datum vydání SQL Serveru 2008

2008-07-26T15:18:26.683+02:00

Firma Microsoft zveřejnila datum vydání SQL Serveru 2008 (přímý nástupce SQL Serveru 2005). Bude to ve středu 27. února 2008 datum bylo posunuto. Současně s ním vydává ještě Windows Server 2008 a Visual Studio 2008.Zdroj: Microsoft Executives Outline Next-Generation Business Opportunities for Partners With New Products, Tools and Programs



Obnova databáze na SQL Serveru na "100 %"

2007-07-10T21:02:44.530+02:00

Řešil jsem následující požadavek:"Potřebuji zazálohovat ostrou databázi a obnovit ji do cvičné s tím, že cvičná databáze může existovat a mohou v ní být přihlášeni uživatelé. V tom případě je chci odpojit a obnovu provést."Jelikož výchozí chování obnovy (SQL-příkazu RESTORE DATABASE) je, že pokud jsou v obnovované databázi přihlášení uživatelé, tak selže na chybovou hlášku:Server: Msg 3102, Level



Krátké zápisky z dovolené

2007-06-27T13:04:35.268+02:00

Takový osobní "checklist", až případně pojedu zase na dovolenou:když si objednáš taxík před dům na určitou hodinu, neznamená, že tam budeto že má dispečink taxislužby telefon, neznamená, že ho i zvedánezapomenout tašku s foťákem, mobily, nabíječkami, dalekohledem a klíčem ke kufru v autobuse z letiště do hotelunemyslet si, že když je ČR v EU, tak je možné úplně bez problémů překračovat hranice na