Antichat снова доступен.
Форум Antichat (Античат) возвращается и снова открыт для пользователей.
Здесь обсуждаются безопасность, программирование, технологии и многое другое.
Сообщество снова собирается вместе.
Новый адрес: forum.antichat.xyz
 |
|

19.05.2010, 11:53
|
|
Познающий
Регистрация: 27.11.2008
Сообщений: 60
Провел на форуме: 163634
Репутация:
41
|
|
ПРИВЕТ, ДРУЗЬЯ!)
КТО НИБУДЬ может помочь с решением курсовой??????????
(всего две задачи, думаю у вас они не вызовут затруднений, 1 курс, решить с помощью Procedure или Function)
уже есть наброски практически готовые задачи. в одной просто надо добавить какую то функции и процедуру, а во второй просто какая то ошибка)
Связь: Icq 282435 или отпишите здесь
очень срочно
[PASCAL]
|
|
|

19.05.2010, 11:56
|
|
Участник форума
Регистрация: 05.06.2009
Сообщений: 125
Провел на форуме: 1454012
Репутация:
59
|
|
Сообщение от koSteck
ПРИВЕТ, ДРУЗЬЯ!)
КТО НИБУДЬ может помочь с решением курсовой??????????
(всего две задачи, думаю у вас они не вызовут затруднений, 1 курс, решить с помощью Procedure или Function)
уже есть наброски практически готовые задачи. в одной просто надо добавить какую то функции и процедуру, а во второй просто какая то ошибка)
Связь: Icq 282435 или отпишите здесь
очень срочно
[PASCAL]
ну показывай посмотрим.
|
|
|

19.05.2010, 12:07
|
|
Познающий
Регистрация: 27.11.2008
Сообщений: 60
Провел на форуме: 163634
Репутация:
41
|
|
Сообщение от narik_
ну показывай посмотрим.
добавься в аську, я тебе изображение скину
|
|
|

19.05.2010, 13:16
|
|
Участник форума
Регистрация: 01.01.2009
Сообщений: 138
Провел на форуме: 817404
Репутация:
82
|
|
Мне нужно сделать чтобы пхп скрипт передал команду проге через сокеты(фсокопен.....), заюзав либо компонент идхттпсервер либо сокетсервер. Лучше первое.
На чём проще?
И примерчик если можете простой.
|
|
|

19.05.2010, 18:45
|
|
Участник форума
Регистрация: 30.03.2007
Сообщений: 121
Провел на форуме: 188563
Репутация:
52
|
|
Сообщение от Vlad&slav
Мне нужно сделать чтобы пхп скрипт передал команду проге через сокеты(фсокопен.....), заюзав либо компонент идхттпсервер либо сокетсервер. Лучше первое.
На чём проще?
И примерчик если можете простой.
Если тебе просто получить, ответ (что выводит php скрипт) то:
На Indy Client.
PHP код:
var
str:string;
begin
str:=idHTTP.Get('http://127.0.0.1/index.php?login=user&password=123');
ShowMessage(str);
end;
Скрипт
PHP код:
<?php
Echo "Login: ".$_GET['login']."<br>";
Echo "Pswd: ".$_GET['lpassword']."<br>";
?>
P.s. Писалось на коленках 
|
|
|

19.05.2010, 22:28
|
|
Участник форума
Регистрация: 01.01.2009
Сообщений: 138
Провел на форуме: 817404
Репутация:
82
|
|
Сообщение от JnK
Если тебе просто получить, ответ (что выводит php скрипт) то:
На Indy Client.
PHP код:
var
str:string;
begin
str:=idHTTP.Get('http://127.0.0.1/index.php?login=user&password=123');
ShowMessage(str);
end;
Скрипт
PHP код:
<?php
Echo "Login: ".$_GET['login']."<br>";
Echo "Pswd: ".$_GET['lpassword']."<br>";
?>
P.s. Писалось на коленках 
Это я умею, мне нужно в точности до наоборот.
В РОЛИ КЛИЕНТА ВЫСТУПВЕТ СКРИПТ, скрипт зная ип компа делает запрос на него через сокеты а комп принимает и выполняет действие
|
|
|

19.05.2010, 23:48
|
|
Новичок
Регистрация: 16.11.2008
Сообщений: 27
Провел на форуме: 104236
Репутация:
6
|
|
как сделать что бы при вводе в текстовое поле допустим уравнения или функции(cos(х)) программа считывала его и дальше с ним работала?
|
|
|

20.05.2010, 05:29
|
|
Познающий
Регистрация: 05.09.2009
Сообщений: 34
Провел на форуме: 86734
Репутация:
14
|
|
Indy. При Пост запросе компоненту передается заголовок location, после чего компонент переходит по адресу в заголовке, но делает он это тоже Пост запросом с MimeType multipart/form-data. Мне необходимо, что бы indy переходил get запросом. Как реализовать?
При попытке отключения HandleRedirects, delphi отказывается выводить Response.Location.
|
|
|

20.05.2010, 12:12
|
|
Познающий
Регистрация: 15.02.2008
Сообщений: 98
Провел на форуме: 183980
Репутация:
50
|
|
Vlad&slav неочень понял вопрос но может так?:
1. Ляпаеш на форму TtcpServer.
2. Настраиваешь порт, хост и т.д. (а... и ещё Active := true)
3. Событие OnAccept возникнет когда что то придёт.
procedure TForm1.tcpServer1(Sender: TObject;
ClientSocket: TCustomIpClient);
begin
//ClientSocket.Receiveln; это как раз то что пришло.
end;
|
|
|

20.05.2010, 15:45
|
|
Познающий
Регистрация: 14.05.2009
Сообщений: 92
Провел на форуме: 299447
Репутация:
5
|
|
Доброго времени суток :-) Помогите)
Код:
sid:= cgi.Strings[135];
Delete(sid,1,28);
sid становится такой src="img2img.cgi?img=ba2eb0f65e4f6436b48795169ae403d5" /> <i>→</i>'
Вопрос: Как выдрать текст "ba2eb0f65e4f6436b48795169ae403d5"
Длина текста может быть разной. Будьте добры кусочек кода.
P.S пробовал так: sid:=Copy(sid,Pos(sid,'"'),Pos(sid,'"'); Не выходит...
|
|
|
|
 |
|
|
Здесь присутствуют: 1 (пользователей: 0 , гостей: 1)
|
|
|
|