Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.06.2017, 10:01   #1
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию Область видимости. как сделать правильно?

Имеется программа .exe на delphi7 элемент idhtp2: TIdHTTP;
Внутри обработчика клика по кнопке имею такое. для пересылки данных на сервер:
Код:
stream1:=TMemoryStream.Create;
                             bmp_deck_itog_summa.SaveToStream(Stream1);
                             FileName := login+'test_ds.jpg';
                             formData := TIdMultiPartFormDataStream.Create;
                             formData.AddObject('userfile', 'application/octet-stream', Stream1, FileName);
                             formData.AddFormField('param1',login);
                             sss:=server+'/streamdecks/file_jpg_download.php';
                             sss:=idhtp2.Post(sss,formData);
                             formData.Free;
С этим все нормально и понятно. Но когда я пытаюсь сделать этот блок в отдельной своей процедуре, то мне пишет undeclared identifier idhtp2. Как нужно правильно, ведь idhtp2 фигурирует только в разделе type
idhtp2: TIdHTTP; ?
И все нормально работает, если внутри обработчика клика кнопки.
А тут он необъявленный получается.
Код:
procedure download_server();
var
  stream1:TStream;
FileName,sss:string;
  formData: TIdMultiPartFormDataStream; //
begin
  stream1:=TMemoryStream.Create;
                             bmp_deck_itog_summa.SaveToStream(Stream1);
                             FileName := login+'test_ds.jpg';
                             formData := TIdMultiPartFormDataStream.Create;
                             formData.AddObject('userfile', 'application/octet-stream', Stream1, FileName);
                             formData.AddFormField('param1',login);
                             sss:=server+'/streamdecks/file_jpg_download.php';
                             sss:=idhtp2.Post(sss,formData);
                             formData.Free;
end;

Последний раз редактировалось Illusiony; 22.06.2017 в 10:09. Причина: изменения
Illusiony вне форума Ответить с цитированием
Старый 22.06.2017, 10:09   #2
Alex11223
Старожил
 
Аватар для Alex11223
 
Регистрация: 12.01.2011
Сообщений: 19,500
По умолчанию

Видимо idhtp2 у вас это поле класса формы, а процедура не в этом классе.
Ушел с форума, https://www.programmersforum.rocks, alex.pantec@gmail.com, https://github.com/AlexP11223
ЛС отключены Аларом.
Alex11223 вне форума Ответить с цитированием
Старый 22.06.2017, 10:11   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Сделай процедуру методом формы, тогда доступно будет. Или обращаться через указатель на форму FForm1.idhtp2
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 22.06.2017, 10:21   #4
Illusiony
Форумчанин
 
Регистрация: 17.02.2014
Сообщений: 881
По умолчанию

Цитата:
Сообщение от Аватар Посмотреть сообщение
Сделай процедуру методом формы, тогда доступно будет. Или обращаться через указатель на форму FForm1.idhtp2
Спасибо всем, и Вам конкретно. Помогло.
Illusiony вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Область видимости. Как будет правильно? dr.Chas PHP 4 07.10.2011 21:24
Область видимости chertovich Общие вопросы Delphi 10 24.09.2011 03:21
область видимости классов sashonk JavaScript, Ajax 1 15.09.2010 11:19
область видимости Dimarik Общие вопросы .NET 5 21.02.2010 21:32
область видимости ? artem779 Общие вопросы Delphi 3 14.09.2007 09:34