fontdraw-esimerkki

FontManager

Koetan ajaa täällä http://wiki.freepascal.org/fcl-image olevaa esimerkkiä. Se kääntyy ilman virheitä, mutta ei etene edes ensimmäiselle riville. Assembler-ikkunassa on tyhjää ja siellä se suostuu muutamaan askeleeseen, kunnes tulee virheejäljittäjä ilmoittaa:
The GDB command:
"-data-evaluate-expression $fp"
did not return any result.
Käyttössä on Lazarus 1.4 ja Windows 7. Esimerkin hakupolku on korjattu ('C:\Windows\Fonts')

Edellisen esimerkin tuolta sivulta sain toimimaan, mutta en saanut siitäkään muutettua niin, että olisin saanut tekstiä. Sekin menee samanlaiseen tilaan kun lisään rivin
ftfont.InitEngine;

6

102

Äänestä

    Vastaukset

    Anonyymi (Kirjaudu / Rekisteröidy)
    5000
    • lkjhgfder
      • FontManager

        En löytänyt tuolta tiedostoa freetype6.dll, mutta sellainen sattui jo olemaan koneella Freeciv'n hakemistossa. Kopioin sen ja muutin nimeä. Nyt toimii!
        Mistähän ihmeestä tällainenkin olisi pitänyt tietää?

      • lkjhgfder

        Virhe olisi näkynyt ajamalla käännetty ohjelma päätteeltä.

    • FontManager

      Samassa esimerkissä annetaan värit col-alkuisilla vakiolla, jotka löytyvät tiedostosta fpcolors.inc. Yritin määrittää värejä samalla tavalla. Värinmääritys onnistuukin, mutta mitä on tehtävä, jotta saisin kuvioista läpikuultavia? Nyt ne ovat aina täysin läpinäkymättömiä alphan arvosta riippumatta:
      var C : TFPColor;
      . . .
      C.Red:= $0000;
      C.Green:= $8000;
      C.Blue:= $8000;
      C.Alpha:= mitätahansa;
      ImgCanvas.pen.FPColor:=C

    • lkjhgfder

      Entä coltransparent

      • FontManager

        Näkyy mustana. Tai, en kokeillut tuota, mutta yo. esimerkillä siten, että värit $0000 ja C.Alpha:=$0000;

    Ketjusta on poistettu 0 sääntöjenvastaista viestiä.

    Takaisin ylös

    Luetuimmat keskustelut

    1. Huomenta ihana

      Kauniskasvoinen ihanuus 😘 saan sut vielä
      Ikävä
      40
      6993

    2. Hei rakas...

      Miten on työpäivä sujunut? Rakastan sinua 💗
      Ikävä
      32
      3948

    3. Ei tämä etene ikinä

      Kun kumpikaan ei enää ota yhteyttä. Mä en ainakaan uskalla.
      Ikävä
      45
      3330

    4. Edelleen sitä on vaikea uskoa

      Että olisit oikeasti rakastunut muhun
      Ikävä
      40
      2939

    5. Vitsi mihin menit. Heti takasin.

      Mä näin sut tuu takasin! Oli kiire, niin en ehtiny sin perään!
      Ikävä
      17
      2726

    6. Toiveikas vai toivoton

      torstai? Ajatuksia?
      Ikävä
      37
      2238

    7. Mukavaa päivää

      Mun rakkauden kohteelle ❤️ toivottavasti olet onnellinen
      Ikävä
      16
      2196

    8. Koko ajan olet

      Senkin suhteen kiusannut. Halut on ihan mielettömät olleet jo pitkään
      Ikävä
      41
      2143

    9. Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...

      Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons
      Suomalaiset julkkikset
      48
      2077

    10. Miksi et irrota otettasi

      Suhteeni?
      Ikävä
      40
      2058
    Aihe
    TietosuojaselosteKäyttöehdotEvästeasetuksetSäännöt