|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Проблема с указателем
Добрый вечер.
Ситуация: Код:
type PMytype:^Mytype; Mytype: record data: array [1..64000] of byte; end; .................................................. procedure test; var stroka:string; begin stroka:='1111'; func(@stroka) .................................................. end; function func(buf:PMytype); var st:string; i:integer; begin st:=''; for i to 50 do st:=st+chr(buf^.Data); .................................................. end; Орды байтов строки @stroka не передаются в массив ... Последний раз редактировалось Admin, 10.04.2013 в 19:05. |