Delphi.cz

Náhodné výkřiky 25

Dnes to bude kousek kódu, pěkné demo pro FireMonkey se zdrojáky, Delphi Easter Egg (když budou ty velikonoce), nějaká komponenta a další efektové.

bizflowmac

FireMonkey demo

Moje oblíbené demo pro FireMonkey - Biz Flow 3d Fish Fact.

To je to co jsem psal myslím při mém prvním článku o FireMonkey - je to úplně jiný způsob designu aplikací.

Zapisovatelné lokální konstanty

Tohle není moc pěkný kód - spíše se jedná o side efekt kompilátoru a nejsem si jist zda to není spíše chyba.

procedure TForm1.Button1Click(Sender: TObject);
{$WRITEABLECONST ON}
const
  i: Integer = 0;
begin
  Inc(i);
  ShowMessageFmt('You clicked me %d times!', [i]);
{$WRITEABLECONST OFF}
end;

Nová verze RxLib

JaroBeneš aktualizoval RxLib (podpora je i pro XE2) - RxLib pro Delphi XE2.

RunTime designer

Když už jsem o toho Jaro Beneše, tak v jeho kolekci Delphi komponent je i TStretchHandle, což by mělo umožnit v runtime přidat komponentě body pro přesun a změnu velikosti. Chtěl jsem to použít, ale pak jsem našel Form Designer Component - WindowDesigner, která má drobné chybičky (na ně přijdete brzo ;-), ale jinak funguje moc pěkně a hlavně můžete použít libovolný WinControl pro zobrazení mřížky.

Prostě jen za běhu přiřadíte požadovaný panel s controly uvedené komponentě a ta si převezme odchycení zpráv myši a kreslení a můžete libovolně hýbat libovolnou komponentou za běhu. Moc pěkné a hlavně na rozdíl od jiných implementací nemusíte vkládat speciální panel pod přesouvané komponenty.

Easter Egg

To že v About boxu se při stisku ALT napíše TEAM je všeobecně známé (rozběhne se seznam lidí co Delphi dělají - ve starších Delphi v OpenGL ve stylu StarWars, v novějších normálně jako skrolování textu). Ale to že můžete na to v novějších Delphi double kliknout a zobrazí se fotky členů teamu jsem nevěděl. Je zajímavé porovnat počet lidí v Delphi 2007 a v Delphi XE(2)- nepočítal jsem to ale přijde mi to tak 3x více lidí.

No a pak teda ještě ALT + GUNGLA

Offtopinka

Zkouším portovat svoje Exploding atoms z SDL do FireMonkey - pokud se povede tak bude jednoduchá cesta na mobilní OS až přijde čas.

Původní verze byla pro DOS (mimochodem to byla moje druhá hra, kde hrál počítač proti člověku).

Exploding atoms

Poznatek 1: Firemonkey aplikace běží z IDE stále výrazněji pomalu než bez IDE (resp. bez debuggeru).

Datum: 2012-04-02 22:39:00 Tagy: vykriky, utrzky, komponenty, FireMonkey

Novinky