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

21.12.2009, 02:49
|
|
Познающий
Регистрация: 19.02.2009
Сообщений: 83
Провел на форуме: 181715
Репутация:
50
|
|
n1ghtstalker, есть ф-ии LowerCase и UpperCase (только для латиницы)
Код:
var s:string;
...
s:='Abcda';
s[length(s)]:=UpperCase(s)[length(s)];
|
|
|

21.12.2009, 20:58
|
|
Познающий
Регистрация: 15.07.2009
Сообщений: 71
Провел на форуме: 520157
Репутация:
35
|
|
Сообщение от Markus_13
n1ghtstalker, есть ф-ии LowerCase и UpperCase (только для латиницы)
Для кириллицы, если не ошибаюсь AnsiUpperCase и соответственно AnsiLowerCase функции используются
Последний раз редактировалось alexey-m; 21.12.2009 в 21:07..
Причина: опечатки) и такое бывает =)
|
|
|

21.12.2009, 21:02
|
|
Участник форума
Регистрация: 20.12.2008
Сообщений: 130
Провел на форуме: 436500
Репутация:
11
|
|
Сообщение от alexey-m
AnsiLoverCase
Lover?? любовник??? 
|
|
|

22.12.2009, 10:42
|
|
Познавший АНТИЧАТ
Регистрация: 05.03.2007
Сообщений: 1,985
Провел на форуме: 3288241
Репутация:
3349
|
|
Код:
repeat
if (условие) then break;
until false;
|
|
|

22.12.2009, 11:19
|
|
Познающий
Регистрация: 22.11.2009
Сообщений: 53
Провел на форуме: 33126
Репутация:
0
|
|
дана функция на определенном интервале с определенным шагом.Нужно вычислить значение функции,вычисления надо закончить когда |Ak|<e.Но нужно это условие сделать сложным,то есть цикл не завершаться после первого круга даже если будет выполнено первое условие
|
|
|

22.12.2009, 11:50
|
|
Познающий
Регистрация: 22.11.2009
Сообщений: 53
Провел на форуме: 33126
Репутация:
0
|
|
У меня код такой: q:=1; repeat q:=q+1; until (abs(Ak)<e) and (а вот тут какое условие задать для q я хз).Сори что так пишу,я с телефона 
|
|
|

22.12.2009, 23:16
|
|
Познающий
Регистрация: 13.12.2007
Сообщений: 56
Провел на форуме: 469345
Репутация:
51
|
|
Проблема возникла такая:
Существует БД Access, связанная с проектом в Delphi..в БД, значит, у одного из элементов стоит тип данных: Дата/время..в то же время в проекте работает всё на "ура", но в Edit, который связан с этим элементом в БД, можно вводить только числовое значение - дата/время..
Собственно что нужно. А нужно сделать так, чтобы в этот же Edit можно было вводить текстовую инфу и чтоб она так же заносилась в БД.
В самой базе уже пробовал менять тип данных, но при компиляции выводится ошибка и ругается именно на тип...
|
|
|

23.12.2009, 02:36
|
|
Познающий
Регистрация: 09.08.2009
Сообщений: 39
Провел на форуме: 298385
Репутация:
75
|
|
Я уже спрашивал дважды... меня проигнорили... хм.... рискну еще раз!
Как на инди хттп сервере реализовать поддержку пхп???
помогите кто чем может... не проходите мимо! я вам, блин, хоть станцую... стоя раком на голове....
|
|
|

23.12.2009, 03:09
|
|
Новичок
Регистрация: 26.11.2009
Сообщений: 20
Провел на форуме: 88440
Репутация:
60
|
|
Сообщение от mr_walker
Я уже спрашивал дважды... меня проигнорили... хм.... рискну еще раз!
Как на инди хттп сервере реализовать поддержку пхп???
помогите кто чем может... не проходите мимо! я вам, блин, хоть станцую... стоя раком на голове....
У компонента idHTTPServer имеется процедура обработки GET запросов - OnCommandGet. В ней есть структура ARequestInfo: TIdHTTPRequestInfo и AResponseInfo: TIdHTTPResponseInfo соответственно. Заполняются надлежащим образом, типа :
ARequestInfo.Host = '127.0.0.1:5555'
ARequestInfo.Document = '/index.php'
...
AResponseInfo.ContentText := 'ok';
AResponseInfo.WriteContent;
p.s : Каков вопрос - таков ответ! 
|
|
|

25.12.2009, 18:57
|
|
Познающий
Регистрация: 09.08.2009
Сообщений: 39
Провел на форуме: 298385
Репутация:
75
|
|
Сообщение от Pr0mo
У компонента idHTTPServer имеется процедура обработки GET запросов - OnCommandGet. В ней есть структура ARequestInfo: TIdHTTPRequestInfo и AResponseInfo: TIdHTTPResponseInfo соответственно. Заполняются надлежащим образом, типа :
ARequestInfo.Host = '127.0.0.1:5555'
ARequestInfo.Document = '/index.php'
...
AResponseInfo.ContentText := 'ok';
AResponseInfo.WriteContent;
p.s : Каков вопрос - таков ответ! 
Нет, ты не понял... попытаюсь сформулировать:
на CommandGet пишу:
procedure Form1.CommandGet(AThread: TIdPeerThread;
ARequestInfo: TIdHTTPRequestInfo; AResponseInfo: TIdHTTPResponseInfo);
begin
IvanetsServerMain.ServeFile(AThread, AResponseInfo,
'd:\Server_root\www'+ARequestInfo.Document);
end;
мне нужно чтобы при вводе в строке браузера
http://имя_хоста/index.php выводило полноценную пхп страницу....
Последний раз редактировалось mr_walker; 25.12.2009 в 22:10..
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|