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;
fontdraw-esimerkki
FontManager
6
108
Vastaukset
- lkjhgfder
http://gnuwin32.sourceforge.net/packages/freetype.htm
tuolta ladattava ensin binaries zip-tiedosto ja asenna tai kopioi freetype6.dll ohjelman kansioon. Se on muutettava freetype-6.dll-nimiseksi.- 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
Hengenvaaralliset kiihdytysajot päättyivät karmealla tavalla, kilpailija kuoli
Onnettomuudesta on aloitettu selvitys. Tapahtuma keskeytettiin onnettomuuteen. Tapahtumaa tutkitaan paikan päällä yhtei1986938- 1592046
- 1131688
- 511390
Suureksi onneksesi on myönnettävä
Että olen nyt sitten mennyt rakastumaan sinuun. Ei tässä mitään, olen kärsivällinen ❤️551248Möykkähulluus vaati kuolonuhrin
Nuori elämä menettiin täysin turhaan tällä järjettömyydellä! Toivottavasti näitä ei enää koskaan nähdä Kauhavalla! 😢501108Älä mies pidä mua pettäjänä
En petä ketään. Älä mies ajattele niin. Anteeksi että ihastuin suhun varattuna. Pettänyt en ole koskaan ketään vaikka hu1001074Reeniähororeeniä
Helvetillisen vaikeaa työskennellä hoitajana,kun ei kestä silmissään yhtään läskiä. Saati hoitaa sellaista. Mitä tehdä?71006Tarvitsemme lisää maahanmuuttoa.
Väestö eläköityy, eli tarvitsemme lisää tekeviä käsiä ja veronmaksajia. Ainut ratkaisu löytyy maahanmuutosta. Nimenomaan253961- 41939