Most viccen kívül kérdezem:

Éles környzetben ismertek olyan project-et, amit ezen a nyelven fejlesztenek? Ha igen, akkor miért?

Sziasztok!

XML fájlból szeretnék UTF-8 kódolású adatokat beolvasni. Linuxon minden oké, de Windows XP-n már más a helyzet: a beolvasott adatokban az ékezetes karakterek helyén kérdőjelek szerepelnek. Egy biztos, nem a megjelenítéssel van a baj. A mellékelt link végén levő fájlban van egy mintaprogram forráskóddal és képernyőmentéssel.
Az interneten keresgéltem rá gyógyírt, de csak annyit tudtam meg, hogy már másnak is volt ilyen problémája.

Rendszer: Windows XP Home, Lazarus 0.9.28-2, Freepascal 2.2.4-3

Hogyan lehet Delphi (7) alatt a TreeView komponenest úgy beállítani, hogy amikor nem ő van a fókuszban akkor is lehessen látni melyik node van kijelölve? Vagy van-e valahol ilyen free komponens?
Előre is köszi!

Jó dolog ez a lazarus, csak egy bajom van vele: az égegyvilágon semmilyen *rendes* doksi nincs hozzá. Ha akarok valamit, akkor delphi környékén kell turkálni.
Éppen előkészítek dolgokat egy majdani munkához (amit remélem meg is rendelnek), lazarusban szándékozom majd elkövetni. Mivel a priuszomban csupán clipper, pascal, némi php és baromi sok z80 assembly fordul elő, ámde delphi nem, ezért az átállás nekem meglehetősen nehézkes.
A kérdésem: a lazreport szerkesztőjét hogyan lehet előcsalogatni? Írják valahol, hogy ugyanolyan egyszerű, mint a delphiben.

Minden megtalalt dokumentacio /gugli, hupwiki, konyv/ (meg a sajat ezer eves emlekeim) szerint a lenti kodot valahogy igy kell megirni. Ellenben FreePascal anyazik. Esetleg meg tudja valaki mondani, hogy hogyan kellene azt a rohadt forward hivatkozast megejteni ahhoz, hogy le is forduljon?
[code]
program lo;

procedure egy( dd: longint );forward;

procedure ketto( d: longint );
var i:longint;
begin
i := d * d;
egy( i );
writeln( 'Ez itt a ketto: ', i );
end;

procedure egy;
var i: longint;
begin
i := dd * dd;
writeln( 'Ez itt az egy: ', i );
end;

BEGIN

Üdv emberek!
Nem értek egy feladatot , szeretném ha segítene benne valaki.
Előre is köszönöm

A feladat:
Generálj 3 számot (ez eddig megy) irasd ki őket válaszd ki a legkisebbet és legnagyobbat. és írasd ki a 3 mal oszható számokat a legkisebbtől a legnagyobbig

hogy kéne kiválasztani legkisebb és legnagyobb számot a generáltakból?
Valaki súgja meg a megoldást please.
Tomcsi1987

Edig Delphi 3 tapasztalatom van. (Anno azt mnegvettem brutto 20 e FT-ért végkiárusításon) Elég régen csináltam abban is új alkalmazást. Akkor adatbázisaimat Paradox táblákban tároltam. (Ami említésreméltó munkám Delph 3-ban egy Kamarai Tagnyílvántartó, Iktató könyv, Menetlevél elszámolás. Mindegyik Paradox táblákat használ. Csak azért nem DBF-et, mert megtetszett az autóinkrementális adat típus.)

Most szeretnék Lazarusban MySQL-t használni (egyelőre Windows XP-n).

Üdv emberek!
Találtam egy feladatot amit nem értek:(
A feladat:
Bekérsz 1 számot(a) ez a ciklus kezdőértéke és kiíratod (a) tól százig a 3mal oszható számokat.
Majd a program kérdezzen rá hogy újra fusson -e le.
Ezt hogy kéne?
Valaki tudna ebben segíteni?
Előre is köszi.
Tomcsi1987

Üdv emberek
Találtam egy számomra elgondolkodtató feladatot.
Gondoltam megosztom veletek, mert én nem sokra jutok vele.

1. Kérjen be egy számot 30 és 40 közt (gondolom ezt readln el kell + forral)

2. Generáljon véletlenszerűen egy számot 40 és 50 közt.

3. Ki íratni a páros számokat (gondolom ezt meg writeln el)

Én nem sokra jutottam vele sajnos:(

Ui: nem tudtok pár linket dobni ahol van sokminden pascalról?

Sziasztok!

A grafikus rendszer felélesztése után beleütköztem a következő problémába. Nem tudom az egeret megjeleníteni a grafikus képernyőn. Az én feltételezésem az, hogy a "vgamouse" unitot kellene használni. Próbáltam a mouse_init() függvényt használni, de sehogy se jött össze. Aztán az "svgalib" unitban lévő vga_setmousesupport() függvényt, de ez se hozott eredményt.

Tehát a fő kérdésem, hogyan lehet az egeret inicializálni és megjeleníteni Free Pascal-ban grafikus képernyőt használva?
Tud valaki tanácsot adni ebben a kérdésben?

Sziasztok!

Nem fordítja le a Free Pascal a minimál programomat, ami így néz ki:

program pr;
uses graph;
begin
end.

Szóval a program csak azért született, hogy ellenőrizzem, képes-e fordítani a graph unit-val.
Hát nem! Valami apróság van, ami kifog rajtam. Először a fordító nem találta meg a graph unit-ot. Ekkor az "options" menü "Directories" dialógus ablakán belül a "Units" fülön megadtam a graph unit elérési útvonalát. Ezután viszont linkelési hibát ír ki, amivel már nem boldogulok.
Most ezt a fordítási hibaüzenetet kapom:

Üdv!

Lazarusban próbálok MySQL adatbázishoz kapcsolódni.

Sz'asztok!

Elindult a Magyar Lazarus Közösség oldala!
Minden Lazarussal foglalkozó emberkét várunk!

Csövi!

Lazarus ismerkedés közben belebotlottam ebbe: http://homepage.bluewin.ch/msegui/

Használta ezt valaki a tisztelt társaságból?
Mik a tapasztalatok?

Ami miatt nekem szimpatikus, hogy teljesen azonosan néz ki az elkészített alkalmazás felülete windowson és linuxon is. Nem kell hozzá külön widget set.

Ha hihetünk a verziószámok jelentésének, ez az 1.6 talán stabilabb is lehet, mint a lazarus a 0.9-ével...

Sziasztok,

kylix zsákutca megkerülésére elkezdtem foglalkozni lazarusszal, elég igéretes. Egyenlőre csak windowson próbáltam, de iszonyú 20-30 megás exéket fordít. Ez tízszerese annak, amit delphi/kylix esetén megszoktam.

Miért lehet ez?
Ha azért van, mert olyasmit is linkel, amit nem használ a program, meg lehet-e akadályozni valahogy?

WinXP home eng SP2, lazarus 0.9.24 béta, zeosdbo 6.6.2rc, lazreport 2.32

köszi, soky

Üdv!

Sok évvel ezelőtt egy -emlékeim szerint- kék-fehér borítós Turbó pascal könyvben láttam egy nagyon jópofa vonalrajzoló algoritmust. A könyv szerint -ha jól emléxem- a Sinclair ZX Spectrum használta először azt az algoritmust vonalrajzoláshoz. Ha tudod miről beszélek és van rá módód, kérlek tedd közkinccsé azt az algoritmust itt!
Köszi!

Pascalból, cairóval szeretnék nyomtatni, ehhez írok egy csomagot, mely az fpc-hez ill. lazarushoz illeszkedik. Printer osztály, hozzá canvas, stb. mely a cairót használja a nyomtatáshoz szükséges ps adatok előállításához.
Cairoban van egy eljárás, ami a vonalakhoz állít be patternt (ezt nem tudtam jobban leírni). Ez az eljárás így néz ki:
cairo_set_dash(cr: cairo_t; dash: PDouble; Dashnum: integer; Offset: Double);

Sziasztok!

Elmúlt napokban a googlet túrtam, de valahogy nem sikerül a megfelelő keywordoket megtalálni. :|

A problémám a következő, hátha valaki tudna segíteni:

Adott egy lazarusban írt program ami többek között a soros portra kötött raw printerre nyomtat (1K bufferre van a printernek, a nyomtatandó szöveg nemtöbb 300 karakternél). -szerk: a soros port és a printer is 9600bps-en kommunikál, a printelés a /dev/ttyS0-n keresztül történik-

Üdv!

Előkerült egy probléma, aminek nem tudom, van-e megoldása.

type csalad=record
nev:string;
gyerek:byte;
end;
var cs:array[1..100] of csalad;

Most szeretnék írni ehez egy rendezést, aminek paraméterként adom át, hogy mi szerint rendezze. Pl. rendez(nev). Az egyetlen működő megoldás az, hogy a rendezésnél egy feltétell megvizsgálom, mit adtam meg (case) és a szerint adom meg utána a rendezésben szükséges feltételt. Kb így:

[code]
case mit of
'nev': if cs[i].nev>cs[j].nev then
begin
[...]
end;

A problémám a következő:
Készitek egy progit freepascal/lazarus-szal, firebird adatbázist használ, első indításnál, illetve ha több adatbázist akarnak létrehozni, a szükséges beállításokat csak root jogokkal lehet elvégezni. Nem bonyolultak (könyvtár létrehozás /srv alatt, /usr/lib/firebird/alias.conf írása, stb) bash scripttel mindegyik egyszerűen megoldható. Viszont elakadtam ott ha user indítja a programot, és a root jelszót is meg tudja adni, akkor sem találok lehetőséget arra, hogy az alkalmazás root hogokkal indítsa a scriptet.

Freepascal, lazarusból szeretném használni a Cairo-t.

Addig el is jutottam, hogy .png képet minden további nélkül létre tudok hozni.
Mivel nyomtatni is szeretnék, postscriptet is elő kellene állítanom. A cairo unit csak és szigorúan a cairo.h-ban lévő deklarációkat tartalmazza, ezt ezért kibővítettem ideiglenesen a cairo-ps.h deklarációival.

A lenti kód részben mükszik is, de vagy üres fájlt hoz létre, vagy létrehozza a .ps fájlt, de egy 1x1 pontos üres dokumentum az eredmény, ami mindent tartalmaz, de BoundingBox 0 0 1 1 bejegyzést tartalmaz, ill. a dokumentum nem rendelkezik tartalmi résszel.