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

78

    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ä.

    Luetuimmat keskustelut

    1. Miehille kysymys

      Onko näin, että jos miestä kiinnostaa tarpeeksi niin hän kyllä ottaa vaikka riskin pakeista ja osoittaa sen kiinnostukse
      Tunteet
      132
      3857
    2. Miksi kaivattusi on

      erityinen? ❤️‍🔥
      Ikävä
      85
      1905
    3. Olen tosi outo....

      Päättelen palstajuttujen perusteella mitä mieltä minun kaipauksen kohde minusta on. Joskus kuvittelen tänne selkeitä tap
      Ikävä
      15
      1771
    4. Haluaisin jo

      Myöntää nämä tunteet sinulle face to face. En uskalla vain nolata itseäni enää. Enkä pysty elämäänkin näiden kanssa jos
      Ikävä
      54
      1412
    5. Ylen uutiset Haapaveden yt:stä.

      Olipas kamalaa luettavaa kaupungin irtisanomisista. Työttömiä lisää 10 tai enempikin( Mieluskylän opettajat). Muuttavat
      Haapavesi
      129
      1313
    6. Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornosta

      https://www.kymensanomat.fi/paikalliset/8081054 Kotkalainen Demari Riku Pirinen vangittu Saksassa lapsipornon hallussapi
      Kotka
      38
      1298
    7. VENÄJÄ muuttanut tänään ydinasetroktiinia

      Venäjän presidentti Vladimir Putin hyväksyi tiistaina päivitetyn ydinasedoktriinin, kertoo uutistoimisto Reuters. Sen mu
      Maailman menoa
      98
      1274
    8. Nainen olet valoni pimeässä

      valaiset tietäni tietämättäsi ❤️
      Ikävä
      70
      1156
    9. Mitä toivot

      Tulevilta päiviltä?
      Ikävä
      69
      1033
    10. Hommaatko kinkkua jouluksi?

      Itse tein pakastimeen n. 3Kg:n murekkeen sienillä ja juustokuorrutuksella. Voihan se olla, että jonkun pienen, valmiin k
      Sinkut
      111
      1014
    Aihe