Текущий архив: 2005.10.30;
Скачать: CL | DM;
Вниз
Есть ли пример работы с TStream? Найти похожие ветки
← →
Prohodil Mimo © (2005-10-09 16:48) [0]Пытаюсь создать TStream, записать в него RTF, а потом содержимое поместить в RichEdit.
Var
St : String;
StF : TMemoryStream;
Begin
StF := TMemoryStream.Create;
St := "Darba Ligums Nr. ";
StF.Write(St,Length(St));
REdit1.Lines.LoadFromStream(StF);
StF.SaveToFile("E:\S.txt");
StF.Free;
RichEdit пустой.
в S.txt - какой-то бред.Var
St : String;
StF : TMemoryStream;
Begin
StF := TMemoryStream.Create;
StF.Write("Darba Ligums Nr. ",Length("Darba Ligums Nr. "));
REdit1.Lines.LoadFromStream(StF);
StF.SaveToFile("E:\S.txt");
StF.Free;
RichEdit пустой.
в S.txt - "Darba Ligums Nr. ".Var
St : String;
StF : TMemoryStream;
Begin
StF := TMemoryStream.Create;
StF.LoadFromFile("E:\S.txt");
REdit1.Lines.LoadFromStream(StF);
StF.Free;
RichEdit содержит - "Darba Ligums Nr. ".
Что я делаю не так?
Где можно прочитать о работе с TStream?
Цель такова: создать в памяти RTF-файл и отобразить его в RichEdit.
Сразу в RichEdit не пишу, т.к. все символы латышские символы заменяются на русские, если регион Россия, и наоборот, если Латвия. А мне надо поддержку и тех и других.
Если пишу в файл, а потм открываю, то всё работает, но не хочется на диск файлы кидать.
← →
begin...end © (2005-10-09 17:01) [1]Господи, ну сколько же можно! Одна и та же ошибка!
var
St: String;
StF: TMemoryStream;
begin
StF := TMemoryStream.Create;
St := "Darba Ligums Nr. ";
StF.Write(St[1], Length(St));
StF.Position := 0;
REdit1.Lines.LoadFromStream(StF);
...
end
← →
Prohodil Mimo © (2005-10-09 17:10) [2]begin...end © (09.10.05 17:01) [1]
спасибо!
не знал что надо его в начало перевести :о)
Всё работает.
← →
Anatoly Podgoretsky © (2005-10-09 17:19) [3]Prohodil Mimo © (09.10.05 17:10) [2]
Stream это поток! Указатель автоматически перемещается при чтении/записи.
← →
Prohodil Mimo © (2005-10-09 17:36) [4]Anatoly Podgoretsky © (09.10.05 17:19) [3]
да уже всё понял.
Думал LoadFromStream сам в начало перемещается.
← →
Anatoly Podgoretsky © (2005-10-09 17:46) [5]Не перемещает и это хорошо, а то как бы загрузить из середины.
← →
Prohodil Mimo © (2005-10-09 17:51) [6]Anatoly Podgoretsky © (09.10.05 17:46) [5]
согласен.
Страницы: 1 вся ветка
Текущий архив: 2005.10.30;
Скачать: CL | DM;
Память: 0.45 MB
Время: 0.038 c
