tag:blogger.com,1999:blog-36798085275389592662024-02-21T17:37:26.229+01:00TZblokUnknownnoreply@blogger.comBlogger69125tag:blogger.com,1999:blog-3679808527538959266.post-85698950922523581992020-12-03T13:11:00.014+01:002020-12-04T08:50:20.176+01:00Das Masterpiece August Gdoule – Kuk und das zlatý kupón!Ja jetl fonkuv šokoláte Und sítil něco To ne šokoláte Ne kokos Ne ožech Ne burákmáslo Ne nugát Any marsipán Ne charamel Ne griliáš Ja udělal kuk und fidím das slatý kupon!Reportér: Auguste, a jak jsi to oslavil? Další šokolátouUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-71971057939024483322020-02-21T14:29:00.000+01:002020-02-21T14:37:45.661+01:00⊃∪∩⪽ 2020Denis Villeneuve (Sicario, Příchozí, Blade Runner 2049) točí novou adaptaci Duny 😉. Konečně!
Premiéra prý v prosinci 2020.Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-60877491783362757822019-12-16T10:49:00.000+01:002019-12-16T11:10:32.187+01:00Správné pořadí filmů Star Wars
Chronologicky správné pořadí epizod Star Wars – tedy jiné pořadí, než v kterém byly filmy natočeny:
pořadí
název
rok
neoficiální název
český název
❶
Star Wars: Episode I – The Phantom Menace
1999
Skrytá hrozba
❷
Star Wars: Episode II – Attack of the Clones
2002
Klony útočí
❸
Star Wars: Episode III – Revenge of the Sith
2005
Pomsta Sithů
❹
Solo: A Star Wars Story
2018
❺
RogueUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-45543516475893802032018-12-10T13:57:00.001+01:002018-12-10T15:21:31.533+01:00Seriál CSS Grid: 2× div vedle sebe
2 div-y, které chci mít vedle sebe. 1fr 1fr znamená, že oba div-y okupují prostor stejným dílem (jednotka fr = fraction). 1fr auto by znamenalo, že 2. div bude mít šířku danou jeho obsahem a 1. div vyplní zbytek.
<style>
.grid-container {
display: grid;
grid-template-columns: 1fr 1fr; /* nebo např.: 1fr auto */
&Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-19172534279077157572016-12-09T14:40:00.000+01:002021-11-01T13:18:00.418+01:00Generic Reduce for Delphi
Simple Reduce() implementation for Delphi 2009+:
unit MapReduce;
interface
uses
System.SysUtils, System.Generics.Collections;
type
TMapReduce = record
public
class function Reduce<T, U>(const AFunc: TFunc<U, T, T>;
const AList: TEnumerable<U>; AAcc: T): T; static;
end;
implementation
class function Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-23045284805523411982014-04-22T11:14:00.002+02:002014-04-22T11:21:42.937+02:00Méně známé klávesové zkratky Delphi IDE
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ěUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-86085181159211994632014-04-22T00:08:00.002+02:002014-04-22T00:26:10.665+02:00London Grammar
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...
Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-11186912238988874962014-04-21T18:21:00.000+02:002014-04-21T18:25:10.345+02:00Plain text z HTML textu
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, Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-56136942837961120212013-12-05T13:06:00.000+01:002021-11-01T13:18:44.307+01:00Smazání souborů staršínch než N dnů Windows dávkou
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 Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-27131457564304377092013-07-24T12:41:00.000+02:002013-07-24T12:43:23.987+02:00Radiohead: OK Computer
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 (ForUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-63720988616782857592012-09-04T18:09:00.002+02:002013-07-24T11:27:27.084+02:00Delphi XE3Takž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)
Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-22288741610437978652012-04-07T10:48:00.006+02:002013-07-24T11:20:48.902+02:00How to create case insensitive TDictionary<>
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 Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-60531946746096503812011-08-26T18:55:00.007+02:002013-07-24T11:20:48.913+02:00Singleton v Delphi
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 Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-58273880782806442162011-08-20T08:29:00.004+02:002013-07-24T11:20:48.911+02:00Duck typing v DelphiNaš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;
Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-63250164665622187282009-03-19T16:40:00.014+01:002013-07-24T11:20:24.560+02:00Delphi - klávesové zkratky v IDEKlá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 textuCtrlUnknownnoreply@blogger.com3tag:blogger.com,1999:blog-3679808527538959266.post-6569448011724047122009-01-31T15:46:00.006+01:002009-01-31T15:56:19.624+01:00Google se zbláznil?Dnes se Google rozhodl označovat úplně všechny nalezené odkazy textem "Tyto stránky mohou poškodit váš počítač." - viz obrázek:Unknownnoreply@blogger.com1tag:blogger.com,1999:blog-3679808527538959266.post-69907816740499122452008-12-19T08:12:00.005+01:002008-12-19T08:18:20.880+01:00Microsoft vydal Service Pack 3 (SP3) pro SQL Server 2005http://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.Unknownnoreply@blogger.com2tag:blogger.com,1999:blog-3679808527538959266.post-27242729150178704492008-08-25T15:19:00.004+02:002013-07-24T11:20:24.552+02:00Delphi 2009 jsou hotovéFirma Embarcadero dnes oznámila, že Delphi 2009 a C++Builder jsou hotové.Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-5587510471140672242008-08-07T10:07:00.003+02:002008-08-07T10:10:49.853+02:00SQL Server 2008 jde do výrobyMicrosoft dnes oznámil, že SQL Server 2008 je hotov.Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-12955053944116762612008-07-26T14:50:00.005+02:002008-07-26T15:20:17.233+02:00SQL Server 2008 Release Candidate 0 (RC0)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 > Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-25828144925026677572008-04-04T13:09:00.015+02:002008-04-05T09:59:01.796+02:00SQL Server - odstranění české diakritikyJak 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 Unknownnoreply@blogger.com3tag:blogger.com,1999:blog-3679808527538959266.post-30068452372820710652008-02-05T14:54:00.002+01:002013-07-24T11:20:24.554+02:00Delphi 2008 dotazníkSpoleč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 ;).Unknownnoreply@blogger.com3tag:blogger.com,1999:blog-3679808527538959266.post-43802007492638988152008-01-28T13:08:00.001+01:002008-01-28T13:32:14.923+01:00Vydání finálního SQL Serveru 2008 bude opožděnoOproti 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 ClarificationUnknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-84306329067728523502007-08-03T17:39:00.000+02:002007-08-03T17:52:35.401+02:00Jak rychle zjistit, jaký Service Pack, případně hotfix mám nainstalovaný na SQL ServeruNa 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ý).Unknownnoreply@blogger.com0tag:blogger.com,1999:blog-3679808527538959266.post-48339907984660567422007-07-27T16:10:00.000+02:002007-08-03T17:39:25.083+02:00Jak si vyžádat hotfix od Microsoftu emailem?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 Unknownnoreply@blogger.com3