[Delphi]/[Pascal] Задай вопрос, получи ответ

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

НОВЫЕ ТОРГОВАЯ НОВОСТИ

Скрыть

		ANTICHAT > ПРОГРАММИРОВАНИЕ > С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby
[Delphi]/[Pascal] Задай вопрос, получи ответ

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

357

Опции темы

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

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

#3561

11.05.2009, 20:59

~~F1shka~~

Banned

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

Сообщений: 618

С нами: 9518786

Репутация: 942

Люди хелп! Как при реге вконтакте капчу преобразовать в image ? Чё то у меня ваще фигово!

#3562

11.05.2009, 21:21

mailbrush

Познавший АНТИЧАТ

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

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

С нами: 9410786

Репутация: 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;

#3563

12.05.2009, 22:41

Huligan1

Познающий

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

Сообщений: 31

С нами: 9045766

Репутация: 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..

#3564

13.05.2009, 01:21

_nic

Постоянный

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

Сообщений: 743

С нами: 10535289

Репутация: 107

Что можно использовать вместо отсутсвуешего в BDS редактора ресурсов?

#3565

13.05.2009, 09:50

slesh

Познавший АНТИЧАТ

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

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

С нами: 10097606

Репутация: 3349

2 Huligan1 ты не можешь закрыть форму при её создании.
Зайди в dpr файл проекта и там впишы Application.ShowMainForm:= False;

#3566

13.05.2009, 09:52

slesh

Познавший АНТИЧАТ

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

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

С нами: 10097606

Репутация: 3349

2 _nic С делфи часто очень идет фишка под названием Resource WorkShop
Вот в нем можно создавать простенькие ресурсы(главное незабыть установить win32 в настройках)
Также можешь Заюзать редактор ресурсов от VC++ в 6 версии он встроенные в IDE
Накрайняк можешь через ResHack выдрать все ресурсы, а зачем черезх rc.exe собрать заново как нужно

#3567

13.05.2009, 15:08

_nic

Постоянный

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

Сообщений: 743

С нами: 10535289

Репутация: 107

Цитата:

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

2 _nic С делфи часто очень идет фишка под названием Resource WorkShop

В BDS 2006 такого не наблюдаю

#3568

13.05.2009, 16:21

Huligan1

Познающий

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

Сообщений: 31

С нами: 9045766

Репутация: 2

Цитата:

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

2 Huligan1 ты не можешь закрыть форму при её создании.
Зайди в dpr файл проекта и там впишы Application.ShowMainForm:= False;

Slesh так вписана же посмотри в коде !?
Как бы мне выполнить закрытие приложения после того как выполниться ShowMessage ?

#3569

13.05.2009, 21:27

W!z@rD

Reservists Of Antichat - Level 6

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

Сообщений: 891

С нами: 10653446

Репутация: 836

не Form5.Close;
а Application.Close (если я ничего не путаю, наверное путаю, =)) полтора года уже даже IDE не запускал, не говоря уже о кодинге)
скорее всего Form5 не явлается родительской формой, поэтому приложение висит.

__________________
*********************************
*Я не волшебник ٩(๏̯͡๏)۶, только учусь...*
*********************************
Программы на заказ
Times to fly...

#3570

13.05.2009, 23:26

slesh

Познавший АНТИЧАТ

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

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

С нами: 10097606

Репутация: 3349

2 Huligan1 Хочеш закрыть приложение из любого места проги?
ExitProcess(0); тебе в руки )

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

357

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

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
[Wi-Fi, BT] Задай вопрос - получи ответ!	Alexsize	Беспроводные технологии/Wi-Fi/Wardriving	2571	20.06.2026 14:48
[jQuery] - Задай вопрос, получи ответ	Isis	PHP	62	25.12.2009 03:25

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

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