Отправляет email-рассылки с помощью сервиса Sendsay

Мастера DELPHI. Новости мира компонент, FAQ, статьи...

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Сентябрь 2004   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
25.09.2004
09:17:24
13:47:46
26
27
28
29
30
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Информационный Канал Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHIMASTER.ru

Выпуск от 23.09.04 09:18

Лучшее из нашего FAQ   |x|
CGI. Переменные окружения - как до них добраться?
»»» Laberta - labert@mail.ru (28.11.00 22:15)
Как получить значения переменных окружения в Delphi 3 ? (Нужно для выяснения параметров HTTP запроса в CGI-приложении)

»»» bob (29.11.00 09:03)
Если я правильно понял вопрос, то (взято из книги Marco Cantu 1998, Mastering Delphi 4)

program CgiVars;

{$APPTYPE CONSOLE}
uses Windows;
const
  VarList: array [1..17] of string [30] =
    ('SERVER_NAME', 'SERVER_PROTOCOL',
    'SERVER_PORT', 'SERVER_SOFTWARE',
    'GATEWAY_INTERFACE', 'REQUEST_METHOD',
    'PATH_TRANSLATED', 'HTTP_REFERER',
    'SCRIPT_NAME', 'PATH_INFO',
    'QUERY_STRING', 'HTTP_ACCEPT',
    'REMOTE_HOST', 'REMOTE_USER',
    'REMOTE_ADDR', 'REMOTE_IDENT',
    'HTTP_USER_AGENT');

var

 I: Integer;
  ReqVar: string;
 
  VarValue: array [0..200] of Char;

begin
  writeln('Contenttype: text/html');
  writeln;
  writeln('<HTML><HEAD>');
  writeln('<TITLE>CGI Variables</TITLE>');
  writeln('</HEAD><BODY>');
  writeln('<H1>CGI Variables</H1>');
  writeln('<HR><PRE>');

  // show the variables listed in the array
  for I := Low (VarList) to High (VarList) do
  begin
    ReqVar := VarList[I];
    if (GetEnvironmentVariable (PChar(ReqVar),
        VarValue, 200) > 0) then
    else
      VarValue := '';
    writeln (VarList[I] + ' = ' + VarValue);
  end;
  writeln('</pre></BODY></HTML>');
end.


-= Из конференции сайта MA! STERS OF DELPHI (http://delphi.mastak.com) =-

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Как определить, подключен компьютер к интернет или нет?
В последнее время с завидным постояннством появляется вопрос "Как определить, подключен компьютер к интернет или нет?". Позволим себе порассуждать на эту тему и объяснить некоторые из принципов сетевых взаимодействий...
Новинки книжного рынка   |x|
Программирование серверных приложений для Microsoft Windows 2000 (+CD)
В книге Дж. Рихтера исчерпывающе описаны функции новой операционной системы Microsoft — Windows 2000, позволяющие создавать высокопроизводительные и надежные серверные приложения. Менеджер управления службами, контроль производительности и системных событий, асинхронный ввод-вывод, система безопасности и защищенное взаимодействие приложений обеспечат надежную и эффективную работу ваших приложений в качестве служб операционной системы 24 часа в сутки 7 дней в неделю. Все главы содержат примеры, написанные на C++, демонстрирующие описываемые технологии. Вы можете использовать в своих приложениях фрагменты этих программ и готовые классы C++, исходные тексты которых содержатся на прилагаемом компакт-диске. Книга состоит из 12 глав, 2 приложений и предметного указателя. Прилагаемый к книге компакт-диск содержит программное обеспечение, примеры приложений, документацию и электронную версию книги.
Автор: Дж. Рихтер, Дж. Кларк
Опрос населения :)
Какую ОС вы используете _в_основном_ при написании програм для Win32
»»» Win2k
»»» Win98
»»» WinXP
»»» WinNT
»»» WinMe
»»» Win95
»»» Ни одну из перечисленных
»»» Я не пишу под Win32
»»» Не знаю
Для души

Хокку дня
Да, нелегка самурайская жизнь
Hо делать себе харакири
Обидно, поевши пельменей...

Афоризмы
Самое важное - уметь отличить важное от срочного.

Фраза дня
Бороться и искать, найти и перепрятать

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В городе Прескотт, штат Аризона (США), строжайше запрещено въезжать на лошади по ступенькам перед зданием суда.
В Дании за заключенными признается право бежать из тюрьмы. Если их ловят, им не грозит никакого наказания.

И на закуску коротенький анекдот
Горячая сковорода в руках жены выглядит так же, как и холодная...

Фотоприколы.
Начните день с хорошего настроения!
http://www.delphimaster.ru/cgi-bin/prikol.pl?id=15

На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (merlin@delphimaster.ru)

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
http://subscribe.ru/feedback/		 Подписан адрес:
Код этой рассылки: comp.soft.prog.mdelphi		 Отписаться
В избранное