Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > Delphi: Общие вопросы > PByte в Memo..... Help!

Автор: JJohn 17.11.2005, 16:41

Есть
var Value : PByte; (Delphi)

Как выводить например в Memo или Edit текстовую строку, в зависимости от:
Value - 1) строка, оканчивающаяся нулём (#0)
2) массив из строк (например, xxx#0yyy#0#0)

Автор: Snowy 17.11.2005, 17:01

А никак. Придется нули заменять на #13.
А потом так:

Код


var
  ms:TMemoryStream;
begin
  ms:=TMemoryStream.Create;
  try
    ms.Write(P^,sz);
    ms.Position:=0;
    Memo1.Lines.LoadFromStream(ms);
  finally
    ms.Free;
  end;

Добавлено @ 17:05
В едит:

Код


  SetLength(s,sz);
  move(P^,s[1],sz);
  Edit1.Text:=s;

Автор: newalex 18.11.2005, 01:29

А PChar тебе ничем случаем не поможет? Тоже вроде указатель...

Автор: <Spawn> 18.11.2005, 23:43

Цитата(newalex @ 18.11.2005, 03:29)

А PChar тебе ничем случаем не поможет? Тоже вроде указатель...

Это null-terminated string, так что он тут не поможет.

Автор: JJohn 19.11.2005, 00:39

переделал на массив из char и все получилось smile