добавить из файла в richedit

← →
miracle_fox (2004-01-07 15:52) [0]

день добрый (по местному времени :)!
подскажите пожалуйста, как открвть файл текстовый ... и всё что в нём есть перенести в ричэдит. премного благодарен за помощь

← →
Erik (2004-01-07 16:05) [1]

Var Stream: TMemoryStream;
RichEdit: TRichEdit;
begin
Stream.LoadFromFile("aaa.txt");
Stream.Position := 0;
SetLength(RichEdit.Lines.Text, Stream.Size);
Move(Stream.Memory^, PChar(RichEdit.Lines.Text)^, Stream.Size);
Stream.Free;
end;

Это я на скорую руку написал, непроверая. Но вроде должно работать. Хотя есть куча других способов.

← →
Плохиш_ (2004-01-07 16:10) [2]

>Erik © (07.01.04 16:05) [1]

А чем TRichEdit.Lines.LoadFromFile не устраивает?

← →
miracle_fox (2004-01-07 16:23) [3]

спасибо. в полне

← →
miracle_fox (2004-01-07 16:23) [4]

спасибо. в полне

добавить из файла в richedit Найти похожие ветки