Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
16. Jun 2010
@mkinzler: Du meinst bestimmt:
if not (ziffer in ) then ...
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
16. Jun 2010
'ne kleine Umformatierung meint da was Anderes:
procedure TFormrechtschreibung.Rechtschreibungpruefen;
var
woerterbuch: TStringList;
Zeile: string;
wort: shortstring;
wortanfang, wortende, S, R: Integer;
begin
woerterbuch := TStringList.Create;
woerterbuch.LoadFromFile('wörterbuch.txt');
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
16. Jun 2010
PS: Wo wird woerterbuch eigentlich wieder freigegeben?
(ich sehe da ein nettes Speicherleck und von Resourcenschutzblöcken ala Try-Finally dagegen nichts)
Stichwort Codeformatierung (vorallem die Einrückung).
Zähle mal deine BEGIN und die jeweils zugehörigen END durch.
Wobei eine gute Codeformatierung das Durchzählen eigentlich überflüssig machen würde, da man solche Fehler oftmals...
Forum: Object-Pascal / Delphi-Language
Delphi
by himitsu,
16. Jun 2010
Tja, die liebe Delphi-Syntax.
Was machen denn die vielen IFs mitten drin?
Und nicht die Klammern vergessen.
if (Zeile in )
or (Zeile in )
or (Zeile in )
or (Zeile in )
or (Zeile in )
or (Zeile in )