abclinuxu.cz AbcLinuxu.cz itbiz.cz ITBiz.cz HDmag.cz HDmag.cz abcprace.cz AbcPráce.cz
Inzerujte na AbcPráce.cz od 950 Kč
Rozšířené hledání
×
    včera 23:55 | Humor

    Spouštět webový prohlížeč jenom kvůli nákupu kávy? Nestačí ssh? Stačí: ssh terminal.shop (𝕏).

    Ladislav Hagara | Komentářů: 2
    včera 18:11 | Nová verze

    Yocto Project byl vydán ve verzi 5.0. Její kódové jméno je Scarthgap. Yocto Project usnadňuje vývoj vestavěných (embedded) linuxových systémů na míru konkrétním zařízením. Cílem projektu je nabídnou vývojářům vše potřebné. Jedná se o projekt Linux Foundation.

    Ladislav Hagara | Komentářů: 0
    včera 17:56 | Nová verze

    Operační systém 9front, fork operačního systému Plan 9, byl vydán v nové verzi "do not install" (pdf). Více o 9front v FQA.

    Ladislav Hagara | Komentářů: 0
    včera 13:11 | Nová verze

    Svobodná webová platforma pro sdílení a přehrávání videí PeerTube (Wikipedie) byla vydána v nové verzi 6.1. Přehled novinek i s náhledy v oficiálním oznámení a na GitHubu. Řešeny jsou také 2 bezpečnostní chyby.

    Ladislav Hagara | Komentářů: 3
    včera 12:33 | Zajímavý software

    Lennart Poettering na Mastodonu představil utilitu run0. Jedná se o alternativu k příkazu sudo založenou na systemd. Bude součástí systemd verze 256.

    Ladislav Hagara | Komentářů: 14
    29.4. 23:22 | Nová verze

    Hudební přehrávač Amarok byl vydán v nové major verzi 3.0 postavené na Qt5/KDE Frameworks 5. Předchozí verze 2.9.0 vyšla před 6 lety a byla postavená na Qt4. Portace Amaroku na Qt6/KDE Frameworks 6 by měla začít v následujících měsících.

    Ladislav Hagara | Komentářů: 11
    29.4. 21:44 | Komunita

    Ubuntu 24.10 bude Oracular Oriole (věštecká žluva).

    Ladislav Hagara | Komentářů: 12
    29.4. 20:22 | Nová verze

    Byla vydána nová verze 2.45.0 distribuovaného systému správy verzí Git. Přispělo 96 vývojářů, z toho 38 nových. Přehled novinek v příspěvku na blogu GitHubu a v poznámkách k vydání. Vypíchnout lze počáteční podporu repozitářů, ve kterých lze používat SHA-1 i SHA-256.

    Ladislav Hagara | Komentářů: 0
    29.4. 13:33 | IT novinky

    Před 25 lety, ve čtvrtek 29. dubna 1999, byla spuštěna služba "Úschovna".

    Ladislav Hagara | Komentářů: 0
    29.4. 01:00 | Nová verze

    Byla vydána nová verze 24.04.28 s kódovým názvem Time After Time svobodného multiplatformního video editoru Shotcut (Wikipedie) a nová verze 7.24.0 souvisejícího frameworku MLT Multimedia Framework. Nejnovější Shotcut je vedle zdrojových kódů k dispozici také ve formátech AppImage, Flatpak a Snap.

    Ladislav Hagara | Komentářů: 0
    KDE Plasma 6
     (75%)
     (8%)
     (2%)
     (15%)
    Celkem 887 hlasů
     Komentářů: 4, poslední 6.4. 15:51
    Rozcestník

    Dotaz: freepascal+grafika

    5.5.2003 18:59 pavel
    freepascal+grafika
    Přečteno: 666×
    Nevíte někdo jak rozjet ve freepascalu pod linuxem nějakou jednoduchou grafiku? Něco jako byla v dosu jednotka GRAPH. Ta tady sice taky je, ale nevim, jak inicializovat ovladač gr. karty, tak jak to bylo v dosu InitGraph(g,m)... Dík moc

    Odpovědi

    5.5.2003 23:53 Tomáš Bláha
    Rozbalit Rozbalit vše freepascal+grafika
    Jednotka graph pod freepascalem je a používá se snad stejně, jako pod DOSem. Nicméně pokud byste malinko slevil z té jednoduchosti, tak bych Vám doporučil Simple Directmedia Layer prostřdnictvím projektu SDL4Freepascal (http://www.grulic.org.ar/~dmoisset/sdl4fp/english.html), který k SDL (www.libsdl.org) tvoří rozhraní. SDL je poměrně známá multiplatformní knihovna pro práci s grafikou na nízké úrovni. K ní pak existují i další knihovny pro kreslení čar apod., ty ale asi pro pascal si budete muset upravit sám.
    6.5.2003 13:12 pavel
    Rozbalit Rozbalit vše freepascal+grafika
    Zkusil jsem nainstalovat to SDL, ale vysledek je stejny jako s GRAPH. Pri linkovani mi to vyhodi chybu, ze nemuze najit -LSDL a u GRAPH -LVGA, pri tom mam SDL 1.2 urcite nainstalovany.
    6.5.2003 23:34 Tomáš Bláha
    Rozbalit Rozbalit vše freepascal+grafika
    A máte určitě nainstalovanou SDL včetně vývojového balíku (ale když to hlásí až při linkování, tak snad jo) a SDL4Freepascal? Pokud se týče jednotky graph, máte nainstalovánu super vga lib, opět včetně devel?
    6.5.2003 23:36 Ondra 'Kepi' Kudlík | skóre: 29 | Brno
    Rozbalit Rozbalit vše freepascal+grafika
    Asi jste na to myslel, ale máte určitě nainstalovány také devel balíčky SDL? Ty by to mohli způsobovat. Jinak předpokládám, že parametry, které knihovny má přilinkovat zadáváte (dělal jsem to už dávno, takže si nepamatuju, které to přesně byly)..
    16.1.2009 12:48 ikarlos
    Rozbalit Rozbalit vše Re: freepascal+grafika

    Dík za nakopnutí směrem k SDL, funguje to pěkně, určitě je příjemnější překompilovat staré DOSové prográmky pod touhle SDL a pouštět si je v oknech X, než přepínat obrazovku do nějakých svga módů, které na dnešních videokartách ani nemusejí řádně fungovat. Kdysi jsem také bojoval s graph unit pod linuxem, nakonec to nějak šlo (byla to hodně komplexní aplikace pro srovnávání molekul peptidů ve 3D), ale byl to opruz a vypadalo to děsně, 480x640 na dnešním širokoúhlém monitoru, a svg módy fungovaly jen některé. A při přepínání rozlišení to padalo.

    7.5.2003 11:15 pavel
    Rozbalit Rozbalit vše freepascal+grafika
    Tak už se mi povedlo rozchodit tu jednotku Graph, kompilace proběhne OK, vyhodíto spustitelnej soubor, ale při jeho spuštění to napíše nelze najít /dev/svga Nevíte co teď s tím. Dík Moc.
    16.1.2009 11:05 jimi | skóre: 14 | blog: linuxnazs
    Rozbalit Rozbalit vše Re: freepascal+grafika

     

    Nevíte někdo jak rozjet ve freepascalu pod linuxem nějakou jednoduchou grafiku? Něco jako byla v dosu jednotka GRAPH. Ta tady sice taky je, ale nevim, jak inicializovat ovladač gr. karty, tak jak to bylo v dosu InitGraph(g,m)... Dík moc

     

    Program inigraph1;
    
    { Program to demonstrate static graphics mode selection }
    
    uses graph;
    
    
    const
      TheLine = 'We are now in 640 x 480 x 256 colors!'+
                ' (press <Return> to continue)';
    
    var
      gd, gm, lo, hi, error,tw,th: integer;
      found: boolean;
    
    begin
      { We want an 8 bit mode }
      gd := D8bit;
      gm := m640x480;
      initgraph(gd,gm,'');
      { Make sure you always check graphresult! }
      error := graphResult;
      if (error <> grOk) Then
        begin
        writeln('640x480x256 is not supported!');
        halt(1)
        end;
      { We are now in 640x480x256 }
      setColor(cyan);
      rectangle(0,0,getmaxx,getmaxy);
      { Write a nice message in the center of the screen }
      setTextStyle(defaultFont,horizDir,1);
      tw:=TextWidth(TheLine);
      th:=TextHeight(TheLine);  
      outTextXY((getMaxX - TW) div 2,
                (getMaxY - TH) div 2,TheLine);
      { Wait for return }
      readln;
      { Back to text mode }
      closegraph;
    
    Staci? :-)
    end.
    
    17.1.2009 16:54 HS | skóre: 12
    Rozbalit Rozbalit vše Re: freepascal+grafika

    Jo pascal to byly casy. Nyni je pro me ten jazyk jen nostalgii. Ale v dobe, kdy jsem v nem tvoril, tak jsem mel s nim a jeho grafikou spatne zkusenosti. Proto jsem jsem se poohlidnul po jeho graficke nastavbe, rozjel jsem Lazarus a nekolik programku jsem v nem napsal. Pak jsem presel na Javu, a od te doby jsem pascal nepouzil.

    Založit nové vláknoNahoru

    Tiskni Sdílej: Linkuj Jaggni to Vybrali.sme.sk Google Del.icio.us Facebook

    ISSN 1214-1267   www.czech-server.cz
    © 1999-2015 Nitemedia s. r. o. Všechna práva vyhrazena.