Нужен пример
|
|
gravitas | Дата: Понедельник, 31.01.2011, 17:30 | Сообщение # 1 |
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
| Нужен пример (простенький исходник) билдера вот по этой статье http://delfcode.ru/blog/bilder/2010-10-17-8 Так, что бы кол-во символов в выводимой строке в билде могло быть любым.
TheDeduction Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
|
|
| |
dolphin | Дата: Понедельник, 31.01.2011, 18:50 | Сообщение # 2 |
Администратор
Сообщений: 906
Статус: Offline
| Любым вряд ли, ты же не будешь заново разбивать код на секции по 512 байт, можно просто задать определённый максимум символов, потом скомпилировать, будет запас, например символов 20, этого вполне хватит.
Система: Windows 10 x64, Kali Linux Среды программирования: Delphi 7, Delphi 10.x
Я не профессионал, я всего лишь любитель Я не вредитель, я всего лишь теоретик
|
|
| |
gravitas | Дата: Понедельник, 31.01.2011, 19:29 | Сообщение # 3 |
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
| Quote (dolphin) Любым вряд ли, ты же не будешь заново разбивать код на секции по 512 байт, можно просто задать определённый максимум символов, потом скомпилировать, будет запас, например символов 20, этого вполне хватит. Т.е. исходное значение символов указать по ситуации. А как тогда это будет выглядеть в билдере?
TheDeduction Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
|
|
| |
dolphin | Дата: Понедельник, 31.01.2011, 20:48 | Сообщение # 4 |
Администратор
Сообщений: 906
Статус: Offline
| Допустим у тебя в программе строка: HELLO WORLD занимающее 11 байт Но нужно зарезервировать место под максимальную строку от 1 до 20 байт в программе, то просто пишем HELLO WORLDAAAAAAAAAA, при помощи билдера модифицируем в любую строку от 1 до 20 символов
Система: Windows 10 x64, Kali Linux Среды программирования: Delphi 7, Delphi 10.x
Я не профессионал, я всего лишь любитель Я не вредитель, я всего лишь теоретик
|
|
| |
XSPY | Дата: Понедельник, 31.01.2011, 21:37 | Сообщение # 5 |
Продвинутый
Зарегистрирован: 28.01.2010
Группа: Пользователи
Сообщений: 263
Статус: Offline
| тоже интересуюсь данным вопросом! Мне говорили,что еще можно менять как сдесь,а можно сразу задавать значение...
Я не крекер,а программист! Я не преступник-я свободный человек! Лучше один раз накодить,чем сто раз качать билды!
|
|
| |
gravitas | Дата: Вторник, 01.02.2011, 06:07 | Сообщение # 6 |
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
| Разобрался. Строка в билде: edit1.Text:='ololololololololololo123' Код билдера: H : Cardinal; B : Cardinal; C : array[0..20] of char; begin H:=CreateFile('build.exe',GENERIC_WRITE,FILE_SHARE_WRITE,nil,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,0); SetFilePointer(H,$4D508,nil,FILE_BEGIN); FillChar(C,20,0); lstrcat(C,PChar(Edit1.Text)); WriteFile(H,C,20,B,nil); CloseHandle(H);
TheDeduction Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
|
|
| |
XSPY | Дата: Вторник, 01.02.2011, 23:27 | Сообщение # 7 |
Продвинутый
Зарегистрирован: 28.01.2010
Группа: Пользователи
Сообщений: 263
Статус: Offline
| gravitas, адрес ето смещение тех 20-ти байт??
Я не крекер,а программист! Я не преступник-я свободный человек! Лучше один раз накодить,чем сто раз качать билды!
|
|
| |
gravitas | Дата: Среда, 02.02.2011, 01:10 | Сообщение # 8 |
Авторитетный
Зарегистрирован: 01.05.2010
Группа: Пользователи
Сообщений: 385
Статус: Offline
| Quote (XSPY) ето смещение тех 20-ти байт?? Это судя по всему адрес первого байта в строке.
TheDeduction Для ускорения получения ответов на ваши вопросы рекомендуется подкармливание в виде +'ов в рейтинг :)
|
|
| |