Älterern Eliza Quellcode in neuen übersetzten

**R2D2**

Hallo!

Ich habe im Internet Eliza für Delphi gefunden. nun habe ich versucht, das in eine Konsolenanwendung zu kopieren, aber ich bekomme in der Zeile
text_file : Text[4096];
einen Fehler. Der Compiler erwartet ein ; statt eine [.

Wie kann ich diesen Fehler beheben (für später benötige ich aber einen Dateityp File)?

Danke!

**BenjaminH**

Könnte es sein, dass du Statt Text einfach String verwenden kannst?
String[4096]

**R2D2**

Dann kommen Fehler:

Zitat:

String Literale können maximal 255 Elemente besitzten

Auserdem ist String keine File.

**glkgereon**

dann nimm halt einfach Text...

und guck ob irgendwo eine schleife explizit bis 4096 läuft, die musst du dann entsprechend umbiegen.

**Klaus01**

wenn die Variable text_file ein textfile sein soll

text_file : Text[4096]; ist

text_file: TextFile;
besser.

Wie wird die Variable denn später verwendet?

Grüße
Klaus

**R2D2**

Hier ist mal der gesammte Quellcode. Die text_file muss eine file für die späteren Operationen sein.

**Union**

Nimm doch lieber dieses

http://www.torry.net/samples/samples.../elizademo.zip

**Klaus01**

Was tut denn das Programm wenn DU SetLength auskommentierst,
läuft es dann stabil und tut es was es tuen soll?

markieren

Delphi-Quellcode:

			begin

  randomize;

//  SetLength(eliza_text_file, 4096);

  chat_with_eliza;

end.

Grüße
Klaus

**marabu**

Guten Morgen.

Zitat:

ich bekomme in der Zeiletext_file : Text[4096]; einen Fehler.

Es handelt sich hierbei um ISO Pascal. Da wird ein i/o buffer von - für damalige Verhältnisse gigantischen - 4 KB deklariert. Borland ist da mit SetTextBuf andere Wege gegangen. In Delphi einfach weglassen. Der Aufruf von SetLength() im main block ist wohl keine Originalzeile.

Grüße vom marabu

**R2D2**

Die Zeile SetLength ist tatsächlich bloß ein Versuch. Wenn ich sie auskommentiere, und schreibe
text_file: Text; kommt allerding woanders (bei dem erstellen der ersten Konsolenzeile) ein E/A-Fehler.

Woran liegt das?

Älterern Eliza Quellcode in neuen übersetzten

Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Re: Älterern Eliza Quellcode in neuen übersetzten

Forumregeln

BenjaminH Registriert seit: 14. Okt 2004 Ort: Freiburg im Breisgau 713 Beiträge Turbo Delphi für Win32	#2 Re: Älterern Eliza Quellcode in neuen übersetzten 11. Mär 2006, 16:27 Könnte es sein, dass du Statt Text einfach String verwenden kannst? String[4096] Benjamin
	Zitat

R2D2 Registriert seit: 20. Jan 2006 Ort: München 253 Beiträge Delphi 2005 Personal	#3 Re: Älterern Eliza Quellcode in neuen übersetzten 11. Mär 2006, 16:30 Dann kommen Fehler: Zitat: String Literale können maximal 255 Elemente besitzten Auserdem ist String keine File.
	Zitat

glkgereon Registriert seit: 16. Mär 2004 2.287 Beiträge	#4 Re: Älterern Eliza Quellcode in neuen übersetzten 11. Mär 2006, 16:31 dann nimm halt einfach Text... und guck ob irgendwo eine schleife explizit bis 4096 läuft, die musst du dann entsprechend umbiegen. »Unlösbare Probleme sind in der Regel schwierig...«
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.755 Beiträge Delphi 10.4 Sydney	#5 Re: Älterern Eliza Quellcode in neuen übersetzten 11. Mär 2006, 16:33 wenn die Variable text_file ein textfile sein soll text_file : Text[4096]; ist text_file: TextFile; besser. Wie wird die Variable denn später verwendet? Grüße Klaus Klaus
	Zitat

Union Registriert seit: 18. Mär 2004 Ort: Luxembourg 3.487 Beiträge Delphi 7 Enterprise	#7 Re: Älterern Eliza Quellcode in neuen übersetzten 12. Mär 2006, 20:57 Nimm doch lieber dieses http://www.torry.net/samples/samples.../elizademo.zip Ibi fas ubi proxima merces sudo /Developer/Library/uninstall-devtools --mode=all
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.755 Beiträge Delphi 10.4 Sydney	#8 Re: Älterern Eliza Quellcode in neuen übersetzten 13. Mär 2006, 07:03 Was tut denn das Programm wenn DU SetLength auskommentierst, läuft es dann stabil und tut es was es tuen soll? markieren Delphi-Quellcode: begin randomize; // SetLength(eliza_text_file, 4096); chat_with_eliza; end. Grüße Klaus Klaus
	Zitat

R2D2 Registriert seit: 20. Jan 2006 Ort: München 253 Beiträge Delphi 2005 Personal	#10 Re: Älterern Eliza Quellcode in neuen übersetzten 13. Mär 2006, 09:49 Die Zeile SetLength ist tatsächlich bloß ein Versuch. Wenn ich sie auskommentiere, und schreibe text_file: Text; kommt allerding woanders (bei dem erstellen der ersten Konsolenzeile) ein E/A-Fehler. Woran liegt das?
	Zitat