BGAFC Vendégkönyv

Σ: 1 post

TCH (statz)

#1, Főfasz (10443)

1868 | #34bf | ^ | Idézet | Mon, 17 Aug 2015 21:58:27 +02

188.36.*.*

*.catv.pool.telekom.hu

Amennyiben megpróbálom így lefordítani, akkor közli, hogy

drdrm.pas(206,3) Error: Identifier not found "try"
drdrm.pas(206,3) Fatal: Syntax error, ";" expected but "identifier RESET" found
Fatal: Compilation aborted

Na, akkor beírtam neki az elejére a program után, hogy

{$IFDEF FPC}
	{$MODE DELPHI}
{$ENDIF}

Akkor egy rakás warning mellett közölte, hogy

drdrm.pas(685,19) Error: Ordinal or string expression expected
drdrm.pas(686,6) Error: Constant and CASE types do not match
drdrm.pas(686,11) Error: Constant and CASE types do not match
drdrm.pas(691,6) Error: Constant and CASE types do not match
drdrm.pas(691,11) Error: Constant and CASE types do not match

Akkor a 685. sort módosítottam

case Third_A1answ of

helyett

case Third_A1answ[1] of

lett, na akkor lefordult. Elindulni el is indul, viszont a locale betöltésénél

I cant read the locale file
Locale files are OK
An unhandled exception occurred at $0000000000400E1E :
                                                      EInOutError : File not open
   $0000000000400E1E
                      $0000000000401C49
                                         $000000000040383E

Akkor a 211. sorban, ahol az van, hogy

on E: EInOutError do writeln('I cant read the locale file');

na, abból az lett, hogy

writeln('I cant read the locale file');
halt(0);

ugyanis semmi értelme a hibakóddal baszakodni, ha úgysem használod. Továbbá a readvariables feleslegesen van meghívva a 701. sorban, mert előtte a sellang úgyis meghívja, így azt kitöröltem.
Így ugyan már elindul pofáraesés nélkül, de locale file nincs, így ennyit tudtam tenni most.

BTW, mi az az elején, hogy Formerly SantaFakk2?