Как реализовать? альтернатива отправки мессаг на Delphi ?

[Voland-791]

Начал писать клиетн для веб-чата почти все получилось реалтзовать авторизацию,отображение в (WebBrowser1) текста, но отправку сообщения именно с 'edit1' а не с веб-формы не получается реализовать
php код процедура отправки,вот как это реализовать в делфи?

		document.getElementById('CommentText').value = document.getElementById('CommentText1').value;
		document.getElementById('CommentText1').value = '';
		document.getElementById('CommentText1').focus();
		
    if(document.getElementById('CommentText').value.replace(/\s+/g, '').length < 1)
    {
        alert('Вы не ввели текст');
		return false;
    } else { 
		
		return true;
	}

пробывал такими способами:

data.Add('CommentText1='+ edit3.Text);
data.Add('Submit=Enter');
IdHTTP1.Post('https://адрес/chat/add.php', data);

h:=WebBrowser1.OleObject.Document.forms.item(0).elements;
h:=WebBrowser1.OleObject.document.forms.postcomment.item(0).elements;
h.item(i).value:=Edit3.Text;
h.item(i).value:='Submit=Enter';
h.item(i).Click;

ob:= WebBrowser1.OleObject.Document.forms.item(0).elements;
for i := 0 to (ovElements.Length - 1) do
if (ob.item(i).tagName = 'INPUT') and
(ob.item(i).type = 'SUBMIT') and
(ob.item(i).Value = 'CommentText1'+ edit3.Text) then
ob.item(i).Click;

[Voland-791]

Раз бессильны то закройте тему!)

[Alex Cones]

Раз не умеете, не беритесь!

http://www.programmersforum.ru/showp...78&postcount=2

Поиском тоже пользоваться не учили?

[kakawkin]

ну так сделай проще:
1) открой чат чтоб програзился
2) запусти снифер
3) отправь месагу
4) останови снифер
и 100% увидишь какой запрос отсылается

[Voland-791]

Сообщение от Alex Cones

Раз не умеете, не беритесь!

http://www.programmersforum.ru/showp...78&postcount=2

Поиском тоже пользоваться не учили?

Это я с закрытыми глазами напишу,нужно именно заполнение веб форм,написал так пару прог и в php чуть подругому в html запросто) Сделаю проще, сниффер не для этого предназначен),чтоб все шло в memo1!