Typove subory v LAZARUS – Pascal – Fórum – Programujte.com

TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Trvalé přihlášení

Zapomněl jsi heslo?

Typove subory v LAZARUS – Pascal – Fórum – Programujte.com

Rozšířené hledání ›

Nejnovější témata ve fóru

22:06, Startupy Megastroj.cz – Vše na jednom místě: půjčovna, bazar a inze…

21:17, Inzerce FPGA vývojová deska XILINX VIRTEX 5 ML507

20:59, OS - GNU / Linux Ubuntu a OpenSuse

21:47, Offtopic Digitalizace v Česku

10:10, Cinema 4D Export USDC do DaVinci Resolve

16:58, Photoshop Jak odstranit (potlačit) odlesky

Stavba Laser Arény
Laser Game Brno

Typove subory v LAZARUS

matesko

~ Anonymní uživatel
~ 8 příspěvků

15. 12. 2015 #1

potreboval by som vyriesit deklaraciu typoveho suboru v LAZARUS-konzolova aplikacia

ma to spravene takto a stale to hadze chybu:
program project1;
uses crt;

type rovnica=record
zadanie:string;
vysledok:integer;
end;
var rov : rovnica;
i:integer;
f:file of rovnica;

Nahlásit jako SPAM

IP: 87.197.42.–

Blog.Glor.cz - blog nejenom o cestování

JoDiK

~ Anonymní uživatel
~ 987 příspěvků

15. 12. 2015 #2

#1 matesko
chjo...

Jakou chybu????

Nahlásit jako SPAM

IP: 88.103.236.–

JoDiK

~ Anonymní uživatel
~ 987 příspěvků

15. 12. 2015 #3

Syntakticky je to správně, nemůže to žádnou chybu házet...

Nahlásit jako SPAM

IP: 88.103.236.–

mjseven0

Návštěvník

15. 12. 2015 #4

Pokud je to kompletní kód tak je potřeba na konec ještě napsat "begin end."

Pak by to mělo jít kompilovat.

Nahlásit jako SPAM

IP: 66.249.93.–

Matesko

~ Anonymní uživatel
~ 8 příspěvků

15. 12. 2015 #5

prikladam prtscrn celeho programu+vypis chyby

v dev-pascal mi to v pohode frci

Připojen obrázek.

Nahlásit jako SPAM

IP: 92.52.18.–

Sniper

~ Anonymní uživatel
~ 215 příspěvků

15. 12. 2015 #6

Bože screenshot... to sem nemůžeš ten kód nakopírovat?!

Máš to v tý chybě celkem dost jasně napsané - typové soubory nesmí obsahovat ref-counted typy, v tvém případě je to typ string. Takže buď v tom recordu použij ShortString (délka omezená na 255 bytů) nebo to ukládej jinak.
A chybí ti na konci uvolnění prostředků - close(f).

V dev-pascal ti to "v pohode frci" protože dev-pascal nemá implicitně zapnuté long stringy, FPC ano.
Prostě, v dev-pascal String = ShortString, v FPC String = AnsiString (což je ref-counted typ).

Nahlásit jako SPAM

IP: 90.179.201.–

JoDiK

~ Anonymní uživatel
~ 987 příspěvků

15. 12. 2015 #7

#5 Matesko
Tak příště hoď název té chyby do google a přečti si to řešení sám...

Místo string použij shortstring. Lazarus má string vylepšenej přes ukazatele, takže už to není standardní typ jako v Pascalu a nelze ho ukládat do typového souboru.

Nahlásit jako SPAM

IP: 88.103.228.–

Sniper

~ Anonymní uživatel
~ 215 příspěvků

15. 12. 2015 #8

EDIT: Tím FPC jsem myslel Lazarus, ne FPC samotný, sorry....

Nahlásit jako SPAM

IP: 90.179.201.–

Matesko

~ Anonymní uživatel
~ 8 příspěvků

15. 12. 2015 #9

#8 Sniper