TMemo Grössenbegrenzung aufheben

[RPRI]

Hallo Leute,

habe folgendes Problem.

Ich verwende eine TMemo Komponente in einem Programm.
Im Programm wird die Proc. "ColorMemo.Lines.LoadFromFile ( DateiName );"

Wenn ich das Programm auf einem Win2K Rechner laufen lasse, kann die Datei, die geladen wird auch > 1.5MB haben.

Wenn ich das Programm auf einem Win98 Rechner laufen lasse kann er Dateien die grösser als 65K sind nicht mehr Laden.

Kann man diese Betriebsystemspzifische eigenheit ändern?

Wer kann mir helfen?

Danke schon mal für Eure Mühe.

[Motzi]

Zitat von RPRI:

Kann man diese Betriebsystemspzifische eigenheit ändern?

Nein, das ist eben eine jener Einschränkungen, die unter der 9x-Reihe noch existieren.. Aber du kannst ein RichEdit nehmen. Das kann auch Texte >65kb laden.

[Luckie]

Nein. Das liegt an den Betriebssystem im Zusammenspiel mit dem Multiline-Edit aka Memo.

Aber versuch es mal mit einem RichEdit, das müßte unter Consumer Windows auch mehr können, denn alle Textdateien größer 64 kb werden unter Consumer Windows automatisch mit dem Wordpad geladen.

[City Light]

mit einen kleinen eingriff ist auch das Problem TRichEdit von 64kb gelöst

Delphi-Quellcode:

{
  Standardmässig ist der Text im Richedit auf 64 KB beschränkt.
  Indem man die Maxlength auf $7FFFFFF0 setzt, kann man ungefähr 2 GB
  Text im TRichEdit haben.
}

procedure TForm1.Button1Click(Sender: TObject);
begin
  RichEdit11.MaxLength := $7FFFFFF0;
end;

//oder:

procedure TForm1.Button1Click(Sender: TObject);
begin
  SendMessage(RichEdit1.Handle, EM_EXLIMITTEXT, 0, $7FFFFFF0);
end;