Forum: Object-Pascal / Delphi-Language
Delphi
by mercanery,
27. Feb 2004
danke!
habs:
procedure TFrm_Hangman.speichern(a:Speichertyp);
var i:integer;
begin
assignfile(Datei,'woerter.txt');
if fileexists('woerter.txt')
then reset(datei)
Forum: Object-Pascal / Delphi-Language
Delphi
by mercanery,
26. Feb 2004
mal im ernst luckie...hast du vielleicht kummer?
das eine posting habbich angefangen zu schreiben, als du gerade rst genatwortet hattest und abgesendet, als schon viel mehr antworten da waren...die machten mein posting dann unsinnig...also habbichs geändert und das war nur EINMAL!!!
back to topic:
hab mir die hilfe durchgelsen und muss mich wundern...bei mir hat beides denselben...
Forum: Object-Pascal / Delphi-Language
Delphi
by mercanery,
26. Feb 2004
IHR---HABT---ES---NICHT---ANDERS GEWOLLT!!!
Code in den Anhang gepackt Mfg, thomasdrewermann
Forum: Object-Pascal / Delphi-Language
Delphi
by mercanery,
26. Feb 2004
wenn ich reset benutze wird die datei doch auch neugeschrieben...
Forum: Object-Pascal / Delphi-Language
Delphi
by mercanery,
26. Feb 2004
Hi folks!
Wir haben im Info-Unterricht n Hangman (Galgenmännchen) programmiert.
Jetz soll sich das Prog die eingegebenen Wörter in iner Datei merken um sie evtl. später zufallsgesteuert als zu ratendes Wort einzulesen.
Unser Lehrer hat uns dazu AssignFile,ReWrite,Write,Read und seek gegeben. Mein jämmerlicher Source dazu sieht so aus:
procedure TFrm_Hangman.speichern(a:Speichertyp);...