Krach programu – Delphi – Fórum – Programujte.com

 Po ukončení testu se zapisují výsledky do souboru a poté se nastavuje proměnna caption a v ten moment to krachne:

procedure TForm1.ulozit;
var f:textfile;
    uspesnost,uspesnost0,muc,
    nevedel,zapis,jmtestu0,pocetot,pocetot0,datum,
        datum0,jmenouziv0,chyb0,punkt:string;
    i:integer;
begin
{ ZKRÁCENO }
closefile(f);
ulozeno:=true;
{ TADY TO KRACHNE: }
caption:='Učení hebrejštiny a řečtiny';
end;

Obrázek:

http://oi66.tinypic.com/n4hbav.jpg

Nevím co je to za caption, nikde jsem nenašel deklaraci.

Edit: Spíš to "krachuje" během exitu z té funkce ulozit, ale program nespadne. Jak to vyřešit, opravit či odladit?Připojen obrázek.

S delphi jsem nedelal 10 let.

2) Tipnul bych si, ze to spatne pracuje se souborem. Muzes zkusit vsechny radky, co se tykaji prace se soubory, zakomentovat. Sice to nebude nic delat se soubory, ale aspon to pak muzes vyloucit.

1) Caption by ciste teoreticky mohlo byt window.caption, main.caption, proste promenna hlavniho objektu okna.
Dalsi vec, co bych zkusil zakomentovat.

Caption v tomto použití je nadpis Okna/Formuláře. Zkus tam dát self.caption. nebo breakpoint o 1 2 řádky před to a ty řádky mezi krokovat, v jakém kroku ti to vyhodí tu chybu.

Taková drobnost v tom programu je docela guláš, spoustu věcí tam máš dvojmo nebo se opakují na více místech.

Je v něm guláš protože ten kdo to vytvářel v Delphi nebo v čem tak psal názvy komponentů v češtině a ten program z názvů funkcí apod. zcela vypustil diakritiku místo aby převedl např.  funkce "spnost1Click" .. člověk vůbec z názvu nepozná co dělá co...

#4 oxidián
ta chybová hláška ti v podstatě říká, že se snažíš pracovat s nepřístupným objektem. často se objevuje třeba když se snažíš použít objekt který ještě nebyl vytvořen.

Podle adresy to spíš vypadá, že pracuje se zaniklým objektem. Pokud by nebyl vytvořen, asi by to byl zápis na adresu 0x00000000. Že nedal celý kód, tak můžeme jen hádat.

Název spnost1Click vytvořilo IDE automatickyí. Asi je na formuláři tlačítko spnost1 a tohle je obsuha události Click.

To oxidian: nauč se jeden jazyk pořádně a vtom dělej. Nejdřív prasíš C, teď Delphi.... Vůbec bych se nedivil, kdyby v tom byla nějaká tvoje chaotická prasárna.

hu

#6 hlucheucho

myslím že aktualizuje dodělává nějakej převzatej, program navíc to vypadá docela staře nic moc objektový.Spousta kodu by se dala zjednodušit, jak jsem koukal. práci se souborem nemá v Try bloku, desítky proměnejch mimo třídy. apod. prázdné funkce odkazující jen na jinou funkci ...

Jinak já to mám celý v D2010 mi to funguje a dokonce i v Delphi 10.1 Berlin mi to jede, otázka je též situace, kdy tu funkci spouští, je tam vstup z více míst.

jj, "spnost1Click", to se vytvari obvykle automaticky po doubleclicku na tlacitko pri navrhu formulare, jako udalost 'click' . Takhle nejak by to mohlo vypadat na obrazovce, kdyz si kliknes na ten spravny objekt. Ted si nejsem jisty, zda je jednoduche prepnout se z kodu do modu navrh formulare, ale :) Mam pocit, ze v delphi 3, to bylo easy, ale to uz je hodne let. S nejakou applikaci jsem ted delal pro c++, a tam to bylo dost napikacu. Nekdy bylo treba vychytat, proc to nejde prepnout na navrh formulare a z toho jsem byl dost na nervy a radeji oteviral starsi verzi programu.

objekt Mybutton              |
name       | Mybutton        |
caption    | Moje tlacitko   |                    [Moje tlacitko]
onClick    | MybuttonClick   |
onDblClick |                 |
...

Jestli si to dobře pamatuju, tak kód, návrh formuláře.... se přepínali snadno kliknutím na záložku v u dolního okraje pracovní části okna IDE. Object Inspector byl tuším v levém dolním rohu, měl dvě záložky: Properties a Events. Tam se dalo každé komponentě z VCL nastavit při návrhu, co bylo třeba. Moje poslední zkušenosti jsou s C++ Builderem XE5 (příbuzný Delphi), používat jsem ho přestal asi před 1,5 rokem.

Neobjektovost jeho kódu může být způsobena i tím, že objektové a událostmi řízené programování není jeho parketa.

hu

#6 hlucheucho
Ten program krachoval a dělal tenhle problém ještě než jsem k němu přišel.

#7 MilanL

Spouští se to po dokončení testu. Na konci každého testu se provádí zápis výsledků. Myslím že soubor se jmenuje kdykdots.txt. Obsahuje záznamy podobné tomuto:

 22.5.2017 10  .  13- hc2_lekce 10  92%  1chyb s      

#9 hlucheucho
Přestaň už konečně mluvit o "jeho kódu". Psala to žena, Kateřina Bubeníčková v roce cca 1999-2001.

#12 oxidián
nj tenkrát bylo ještě OOP v plenkách :D

#6 hlucheucho

To oxidian: nauč se jeden jazyk pořádně a vtom dělej. Nejdřív prasíš C, teď Delphi.... Vůbec bych se nedivil, kdyby v tom byla nějaká tvoje chaotická prasárna.

Však ho nechej, ať si vyzkouší třeba všechny jazyky. Třeba časem narazí na Lisp, Forth, Go, Haskell či něco podobného a zalíbí se mu to. Také jsem jich vystřídal asi dvacet, než jsem zakotvil u PHP a Bashe.