Inicializace grafiky, domeček jedním tahem :-)

Oh, tak si zase malujeme. Tentokrát opravdu vážně. 😉
Domeček jedním tahem

 uses Graph, Crt;

var
 grDriver: Integer;
 grMode: Integer;
 ErrCode: Integer;

begin
 grDriver := Detect;
 InitGraph(grDriver, grMode,' ');
 ErrCode := GraphResult;
 if ErrCode = grOk then
 begin  { domecek jednim tahem}
   MoveTo (round (GetMaxX/2),     round (GetMaxY/2));
   LineTo (round (GetMaxX/2)+100, round (GetMaxY/2));
   LineTo (round (GetMaxX/2)+100, round (GetMaxY/2)-100);
   LineTo (round (GetMaxX/2)+50,  round (GetMaxY/2)-100-50);
   LineTo (round (GetMaxX/2),     round (GetMaxY/2)-100);
   LineTo (round (GetMaxX/2)+100, round (GetMaxY/2)-100);
   LineTo (round (GetMaxX/2),     round (GetMaxY/2));
   LineTo (round (GetMaxX/2),     round (GetMaxY/2)-100);
   LineTo (round (GetMaxX/2)+100, round (GetMaxY/2));
   Readln;
   CloseGraph;
 end
 else
   Writeln('Graphics error:', GraphErrorMsg(ErrCode));

repeat until KeyPressed;
end.

Když je někdo blbej…

V pondělí jsem měla opět první přednášku z grafiky. Je to sice počtvrté, co to mám zapsané, ale teprve podruhé, co se budu účastnit výuky 😀 No, časově je to celkem použitelné, tak na to budu chodit, Péťa mi už chyběl…
Včera jsem se ještě koukla do iCalu, kdeže to mám tu výuku a výsledek? Jsem správně v A2, ale o den dřív. Aspoň, že Strádal vykládá celkem zajímavě, takže to úplně ztracený čas není, jen mě mrzí, že budu muset zítra zase vstávat. Achich, no půjdu dřív hajat a ono to bude zase dobrý. Dneska mě budila písnička od kapely S.E.X. Appeal – Kids in America, tedy přesněji: je to song od Kim Wilde, ale půjčili si ji a superně předělali. Zítra plánuju na budíček Fragile Love (singl 2006). Mezitím, co tu sedím a poslouchám, tak jsem zaktualizovala WordPress (s dvouměsíčním zpožděním), opět jsem na blogu musela řešit kódování databáze.

wp-includes/wp-db.php

změnit
$this->select($dbname);

na
$this->select($dbname);
mysql_query("SET character_set_results=UTF8");
mysql_query("SET character_set_connection=UTF8");
mysql_query("SET character_set_client=UTF8");

NEBO!
do wp-confing.php doplnit

define('DB_CHARSET', 'utf8');
define('DB_COLLATE', '');

Teď jsem si to sem uklidila, snad už nebudu nikdy muset lézt na fórum pípni, kde jsem se tohle dozvěděla 😀