![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#2
|
|||
|
|||
![]() А это случаем не конвертация Integer в String?
Проверь примерно такой фокус: Код:
procedure TForm1.Button1Click(Sender: TObject); var I : ^Integer; P : PChar; begin Randomize; GetMem(I,SizeOf(Integer)); I^ := Random(2147483647); P := Pointer(I); ShowMessage('String(Integer(' + IntToStr(I^) + ') = ' + StrPas(P)); end; |