Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Копирование буфера Move


Frozzen ©   (2004-12-12 13:33:00) 

День добрый!
Подскажите как скопировать таким образом буфер допустим не с начала, а с 5 позиции
Move( TmpBuf^ , Buffer, Count );
чего и как прибавить к TmpBuf?


Frozzen   (2004-12-12 15:19:00) [1]

да надоело мне с этой бедой бадаться
плюнул

поэтому вопросов не буду задавать
да и тема другая


Суслик   (2004-12-12 15:16:00) [2]

И?
ты вопрос задаешь или делишься решением?


Frozzen   (2004-12-12 15:09:00) [3]

шифрованая dfm у меня спрятана внутри ехе как
procedure TryToCall;
asm
DB 35,184,87,192,136,41,115,
DB 193,100,108,143,130,58,245,49,23
...
end


Frozzen   (2004-12-12 15:08:00) [4]

Да ситуация интересная
я пытаюсь подгрузить ресурс не из файла а из ехе.
При подгрузке его расшифровываю
если интересно покажу как


Frozzen   (2004-12-12 15:08:00) [5]

Да ситуация интересная
я пытаюсь подгрузить ресурс не из файла а из ехе.
При подгрузке его расшифровываю
если интересно покажу как


Ryan   (2004-12-12 14:56:00) [6]

Только как ее найти, если дают только одну строчку кода???


Суслик   (2004-12-12 14:54:00) [7]


>  [12] Frozzen   (12.12.04 14:03)
> Вроди работает
> но все в общен нет
> но думаю ошибка не здесь

я тоже думаю, что не здесь


Ryan   (2004-12-12 14:30:00) [8]

Move( pointer(cardinal(TmpBuf) + cardinal(FPosition*sizeof(byte)))^ , Buffer, Count );


Суслик   (2004-12-12 14:03:00) [9]


> Так написал

и? Работает?


Frozzen   (2004-12-12 14:03:00) [10]

Вроди работает
но все в общен нет
но думаю ошибка не здесь


Frozzen   (2004-12-12 13:56:00) [11]

Так написал
Move( pointer(integer(TmpBuf)+FPosition)^ , Buffer, Count );


Суслик   (2004-12-12 13:55:00) [12]


> а почему к интегер

integer + f1
там все написано.


Суслик   (2004-12-12 13:54:00) [13]


> Выдает exception

прочитать текст сообщения, перевести и сделать выводы.


Frozzen   (2004-12-12 13:54:00) [14]

а почему к интегер


Frozzen   (2004-12-12 13:53:00) [15]

FPosition : integer

Выдает exception


Суслик   (2004-12-12 13:53:00) [16]

могда именно так, как я сказал.
приводи только к integer.


Frozzen   (2004-12-12 13:51:00) [17]

TCryptArray = array [0..100000] of byte;
PCryptArray = ^TCryptArray;

var
 TmpBuf : PCryptArray;

Move( pointer(byte(TmpBuf)+byte(FPosition))^ , Buffer, Count );


Суслик   (2004-12-12 13:46:00) [18]


> Указатель на массив byte

привел бы объявление что ли - вариантов много можно написать :)))
и все будут разные


Frozzen   (2004-12-12 13:45:00) [19]

Указатель на массив byte


Суслик   (2004-12-12 13:35:00) [20]

что такое tmpbuf?

move(pointer(integer(tmpbuf)+5)^, buffer, count)


Наверх

Титульная страница Поиск, карта сайта Написать письмо