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

29.10.2007, 16:05
|
|
Постоянный
Регистрация: 08.05.2006
Сообщений: 816
Провел на форуме: 1845671
Репутация:
1338
|
|
t04 Ну все хорошо работает и без ошибок! Проблема в недопонимании.
Уж так повелось, что в процессорах интел-совместимых, числа в памяти идут "Старший байт имеет старший адресс"!!!
Т.е. когда ты отправишь данные и примишь их "FLAP_HDR" - все встанет на свои места.
|
|
|

30.10.2007, 00:03
|
|
Новичок
Регистрация: 28.10.2007
Сообщений: 3
Провел на форуме: 19128
Репутация:
0
|
|
Запускаешь Дельфи, нажимаешь Shift+Ctrl+F11 в появившемся окне переходишь на закладку Application нажимаешь кнопку Load Icon и выбираешь че те надо, потом жмешь окей.
За это конечно благодарствую, но имел в виду немного другое.. нужно изменить иконку так, чтобы при запуске проги эта же иконка отображалась.. сверху... не знаю, как объяснить... там , где название...
|
|
|

30.10.2007, 11:53
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Сообщение от Inf
За это конечно благодарствую, но имел в виду немного другое.. нужно изменить иконку так, чтобы при запуске проги эта же иконка отображалась.. сверху... не знаю, как объяснить... там , где название...
свойство Icon у формы.
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

01.11.2007, 22:39
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
Провел на форуме: 2360904
Репутация:
1393
|
|
Помогите плз разобраться с ф-цией WaveOutOpen (api)
Было бы хорошо с примерчиком.
Курил мсдн, но не помог (
|
|
|

02.11.2007, 00:02
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Сообщение от z01b
Помогите плз разобраться с ф-цией WaveOutOpen (api)
Было бы хорошо с примерчиком.
Курил мсдн, но не помог (
гугл
Для воспроизведения звуковых файлов на низком уровне после опре-деления возможностей устройства вывода необходимо открыть устройст-во, это удобно сделать с помощью функции waveOutOpen.
UINT
waveOutOpen(LPHWAVEOUT lphWaveOut,
UINT wDeviceID,
LPWAVEFORMAT lpFormat,
DWORD dwCallbackInstance,
DWORD dwFlags);
Здесь lphWaveOut -дальний указатель на переменную типа HWAVEOUT. В эту переменную будет записан идентификатор устройства вывода, который необходим для выполнения всех операций с устройством. Функция waveOutOpen также может быть использована для определения возможности воспроизведения звуковых данных заданного формата (в том числе нестандартного), в этом случае параметр lphWaveOut может иметь значение NULL, дополнительно в параметре dwFlags следует установить флаг WAVE_FORMAT_QUERY.
подробнее тут
выкинь свой мсдн, переходи на траву посильнее - гугл
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
Последний раз редактировалось W!z@rD; 02.11.2007 в 14:35..
|
|
|

02.11.2007, 01:09
|
|
Постоянный
Регистрация: 05.01.2007
Сообщений: 508
Провел на форуме: 2360904
Репутация:
1393
|
|
у меня сайт не работает (
_____________________________________________
Уже разобрался сам ), нашол на васме uMOD, юзайте, очень полезно!
Последний раз редактировалось z01b; 02.11.2007 в 03:48..
|
|
|

02.11.2007, 19:24
|
|
Познающий
Регистрация: 29.10.2007
Сообщений: 79
Провел на форуме: 374452
Репутация:
16
|
|
Помогите пожалуйста! Есть такой код:
Код:
var
a:integer;
b,c:string;
begin
h.host:='www.google.ru';
j.Max:=memo4.Lines.Count;
////////
for a:=1 to memo4.Lines.Count-1 do
begin
Application.ProcessMessages;
if pos(':',memo4.Lines[a])>0 then
begin
b:=copy(memo4.Lines[a],0,pos(':',memo4.Lines[a]));
c:=copy(memo4.Lines[a],pos(':',memo4.Lines[a])+1,length(memo4.Lines[a])+1);
end;
////
form1.Caption:=inttostr(a)+b;
j.Position:=a;
h.ProxyParams.ProxyServer:=b;
h.ProxyParams.ProxyPort:=strtoint(c);
try
h.get('www.google.ru');
except
form1.Caption:='Проверка прокси';
end;
Никак не получается проверить(((
Потому что прокси каждый следующий идет совершенно не правильно...
|
|
|

02.11.2007, 21:39
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
Код:
var
a:integer;
b,c:string;
begin
h.host:='www.google.ru';
j.Max:=memo4.Lines.Count;
////////
Application.ProcessMessages;
for a:=0 to memo4.Lines.Count-1 do
begin
if pos(':',memo4.Lines[a])>0 then
begin
b:=copy(memo4.Lines[a], 0, pos(':',memo4.Lines[a])-1);
c:=copy(memo4.Lines[a],pos(':',memo4.Lines[a])+1,length(memo4.Lines[a]));
end;
////
form1.Caption:=inttostr(a)+b;
j.Position:=a;
h.ProxyParams.ProxyServer:=b;
h.ProxyParams.ProxyPort:=strtoint(c);
try
h.get('www.google.ru');
except
form1.Caption:='Проверка прокси';
end;
мб так? хотя я хз
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

03.11.2007, 22:31
|
|
Познающий
Регистрация: 29.10.2007
Сообщений: 79
Провел на форуме: 374452
Репутация:
16
|
|
Сообщение от W!z@rD
Код:
var
a:integer;
b,c:string;
begin
h.host:='www.google.ru';
j.Max:=memo4.Lines.Count;
////////
Application.ProcessMessages;
for a:=0 to memo4.Lines.Count-1 do
begin
if pos(':',memo4.Lines[a])>0 then
begin
b:=copy(memo4.Lines[a], 0, pos(':',memo4.Lines[a])-1);
c:=copy(memo4.Lines[a],pos(':',memo4.Lines[a])+1,length(memo4.Lines[a]));
end;
////
form1.Caption:=inttostr(a)+b;
j.Position:=a;
h.ProxyParams.ProxyServer:=b;
h.ProxyParams.ProxyPort:=strtoint(c);
try
h.get('www.google.ru');
except
form1.Caption:='Проверка прокси';
end;
мб так? хотя я хз
Не то ,к сожаленью
|
|
|

04.11.2007, 11:56
|
|
Участник форума
Регистрация: 11.07.2006
Сообщений: 125
Провел на форуме: 413927
Репутация:
71
|
|
поставь курсор на строчку функции нажми F5 и запусти
потом нажимая F7 просматривай значения в переменных
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|