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

11.05.2009, 20:59
|
|
Banned
Регистрация: 10.04.2008
Сообщений: 618
Провел на форуме: 2603997
Репутация:
942
|
|
Люди хелп! Как при реге вконтакте капчу преобразовать в image ? Чё то у меня ваще фигово!
|
|
|

11.05.2009, 21:21
|
|
Познавший АНТИЧАТ
Регистрация: 24.06.2008
Сообщений: 1,996
Провел на форуме: 6075534
Репутация:
2731
|
|
на инди
Код:
uses IdHttp, jpeg;
procedure TForm1.Button1Click(Sender: TObject);
var
http: TIdHttp;
ms: TMemoryStream;
jpeg: TJpegImage;
begin
http := TIdHTTP.Create(nil);
ms := TMemoryStream.Create;
jpeg := TJpegImage.Create;
try
http.Get('http://i136.photobucket.com/albums/q195/combatfather/post-19-1177146510.jpg', ms);
ms.Position := 0;
jpeg.LoadFromStream(ms);
Image1.Picture.Graphic := jpeg;
finally
jpeg.Free; ms.Free; http.Free;
end;
|
|
|

12.05.2009, 22:41
|
|
Познающий
Регистрация: 04.03.2009
Сообщений: 31
Провел на форуме: 50236
Репутация:
2
|
|
Помогите форма нехочет закрываться я прописываю ей Form5.Close; а она нехочет
PHP код:
procedure TForm5.FormCreate(Sender: TObject);
begin
Application.title:=('Соединение с')
Winexec('connect.bat',SW_HIDE);
ShowMessage('Соединение установленно');
Application.ShowMainForm:= False;
Form5.Close;
end;
end.
P.S А ещё можно как нибудь узнать программно имя соединения юзера а то "Соединение с" некатит
Я имею ввиду созданное интернет соединение в реестр лезть надо ?
Как использовать параметры в MessageBox я имею ввиду юзаю MB_OK а как при нажатии на эту кнопку когда запуститься приложение сделать чтобы проект закрывался
Последний раз редактировалось Huligan1; 13.05.2009 в 08:04..
|
|
|

13.05.2009, 01:21
|
|
Постоянный
Регистрация: 05.05.2006
Сообщений: 743
Провел на форуме: 2982851
Репутация:
107
|
|
Что можно использовать вместо отсутсвуешего в BDS редактора ресурсов?
|
|
|

13.05.2009, 09:50
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
2 Huligan1 ты не можешь закрыть форму при её создании.
Зайди в dpr файл проекта и там впишы Application.ShowMainForm:= False;
|
|
|

13.05.2009, 09:52
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
2 _nic С делфи часто очень идет фишка под названием Resource WorkShop
Вот в нем можно создавать простенькие ресурсы(главное незабыть установить win32 в настройках)
Также можешь Заюзать редактор ресурсов от VC++ в 6 версии он встроенные в IDE
Накрайняк можешь через ResHack выдрать все ресурсы, а зачем черезх rc.exe собрать заново как нужно
|
|
|

13.05.2009, 15:08
|
|
Постоянный
Регистрация: 05.05.2006
Сообщений: 743
Провел на форуме: 2982851
Репутация:
107
|
|
Сообщение от slesh
2 _nic С делфи часто очень идет фишка под названием Resource WorkShop
В BDS 2006 такого не наблюдаю 
|
|
|

13.05.2009, 16:21
|
|
Познающий
Регистрация: 04.03.2009
Сообщений: 31
Провел на форуме: 50236
Репутация:
2
|
|
Сообщение от slesh
2 Huligan1 ты не можешь закрыть форму при её создании.
Зайди в dpr файл проекта и там впишы Application.ShowMainForm:= False;
Slesh так вписана же посмотри в коде !?
Как бы мне выполнить закрытие приложения после того как выполниться ShowMessage ?
|
|
|

13.05.2009, 21:27
|
|
Reservists Of Antichat - Level 6
Регистрация: 12.02.2006
Сообщений: 891
Провел на форуме: 1892597
Репутация:
836
|
|
не Form5.Close;
а Application.Close (если я ничего не путаю, наверное путаю, =)) полтора года уже даже IDE не запускал, не говоря уже о кодинге)
скорее всего Form5 не явлается родительской формой, поэтому приложение висит.
__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...
|
|
|

13.05.2009, 23:26
|
|
Reservists Of Antichat - Level 6
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
2 Huligan1 Хочеш закрыть приложение из любого места проги?
ExitProcess(0); тебе в руки )
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|