6 Antworten

Für Fraganten ist deine Frage ehrlich gesagt eine Zumutung! Wir sind nicht dafür zuständig, hunderte von Codezeilen auf Sinn oder Unsinn abzuklappern!

Abgesehen davon, dass diese veraltete Programmiersprache fast aus der Praxis verschwunden ist, fehlen uns ein paar Infos darüber, was der Code erledigen soll, wäre auch ein Hinweis nett, wo du den Fehler vermutest und insbesondere deine Frage dahingehend konkretisieren könntest, was genau nicht funktioniert bzw. falsch ist!

Außerdem gibt es aussterbende Pascal-Foren, die in solchen Fragen viel besser helfen könnten:

https://www.google.de/search?q=Pascal+programmier-forum&ie=utf-8&oe=utf-8&client=firefox-b&gfe_rd=cr&ei=BI6uWPXnE7Li8AfYqouQBg

Eine kleine Tipsammlung, damit Du auf derartige Fragen nützliche Antworten bekommst:

- Formatiere den Code lesbar (mit Einrückungen).

- Informiere den potentiellen Helfer darüber, was der Code tun soll

- Informiere weiterhin, worin Dein Problem besteht.

Anderenfalls werden es viele so machen wie ich, dass ich gar nicht genauer hinschaue.

Zeile 65 und 66

GetNewPhrase := Uppercase(ThisNewPhrase);
Letters := 'abcdefghijklmnopqrstuvwxyz';

die eingelesene Zeichenfolge ist groß geschrieben.

Letters sind alle klein

Absicht?

LinaNeu2000 22.02.2017, 18:01

ist ja für den Code erstmal egal denke ich

0

Hast du den Code komplett selbst geschrieben, oder Copy&Paste von einer anderen Seite?

Wo vermutest du in den 506 Zeilen einen Fehler?

Moin

versuch mal statt asignfile nur assign zu nehmen und statt closefile nur close.

das ist glaube ich Delphi und Pascal was Du dar gemixt hattest ?!

Hoffe ich liege richtig - ist aber schon ien paar Jahrzehnte her.

good luck 

so long(knife)

Was möchtest Du wissen?