forum.boolean.name - нужна помощь!

forum.boolean.name (http://forum.boolean.name/index.php)

- Delphi (http://forum.boolean.name/forumdisplay.php?f=66)

- - нужна помощь! (http://forum.boolean.name/showthread.php?t=14876)

Nikopal

10.06.2011 22:05

нужна помощь!

всем привет!

у меня возник вопрос...
Как можно связать форму на веб-странице с делфи???
то есть, есть фрагмент штмл код

PHP код:




<textarea name="comment_text" style="width:98%; height:100px" class="rul_input" onkeypress="if (event.ctrlKey && event.keyCode == 13) { commentsPost(); }"></textarea> 
                                <a class="send a-button" href="#" onclick="commentsPost(); return false;" > Написать </a>

и я хочу зделать так, чтобы можно было писаль, отсылать сообщение через програму, от только я не могу сообразить как всё это реализовать...

за любую помощь буду благодарен....

RegIon

11.06.2011 13:25

Ответ: нужна помощь!

м,как я знаю есть HTML форма если BorlandDelphi.Используется шел IE

IvanNes

12.06.2011 17:53

Ответ: нужна помощь!

http://parsing-and-i.blogspot.com/20...rst-steps.html
Погляди на эту статью про хтмл парсинг, может что-то пригодится

Nikopal

12.06.2011 22:33

Ответ: нужна помощь!

ммм... немного покапался в сайте, на который надо отослать сообщение,
нашел скрипт пересилеки сообщения

PHP код:




if(jQuery('#msg').val() == "") { 
        jQuery('#msg').focus(); 
        return false; 
    } 
     
    var isNew = isNew || 0; 
     
    jQuery('#btn-save').attr('disabled', 'disabled'); 
     
    jQuery.loadWait({ 
        elem: btn, //'http://'+cur_host+ 
        url: '/mail/ajax/send/'+jQuery('#user_to_id').val(), 
        params: { message: jQuery('#msg').val(), is_new: isNew }, 
        onDone: function(data) { 
            jQuery('#btn-save').attr('disabled', ''); 
            if(isNew == 1) { 
                window.location = '/mail/outbox/'; 
            } else { 
                jQuery('#form-send').html(data.content); 
            }

вывел Ссылку куда передается сообщение...
то как все-таки передать сообщение.... помогите плиз...

Nikopal

13.06.2011 12:34

Ответ: нужна помощь!

всем спасибо за идеи. я уже как то сам разобрался

Nikopal

14.06.2011 23:27

Ответ: нужна помощь!

ммм.... есть такая форма
http://my.topdj.ua/mail/send/473583

нужно в неё ввести лог и пасс

ввожу так

PHP код:




b:=webbrowser1.oleobject.document.getelementbyname('login'); 
b.value:=edit1.Text; //login 
b:=webbrowser1.oleobject.document.getelementbyclass('btn-save'); 
 
v:=webbrowser1.oleobject.document.getelementbyname('password'); 
v.value:=edit2.Text; // password 
v:=webbrowser1.oleobject.document.getelementbyclass('btn-save'); 
v.click; 
  b.click;

чёт не пересылаетса, помогите, скажите что не так???

IvanNes

16.06.2011 12:31

Ответ: нужна помощь!

о! а не можешь подсказать мне как взять данные с мини-чата на одном сайте??

Nikopal

16.06.2011 13:33

Ответ: нужна помощь!

какие имено данные??

IvanNes

17.06.2011 10:17

Ответ: нужна помощь!

сообщения

Baisangur

16.07.2011 01:28

Ответ: нужна помощь!

Nikopal, как то ты решил проблему не с того конца.
Я советую тебе взять firefox, chrome или ту же opera.
В каждом есть инструментарий для разработчика.
В каждом пакете такого инструментария есть HTTP сниффер(обычно вкладочка "Network", например в chrome).
Заходишь на сайт где твоя форма, вводишь данные, переходишь на сниффер, подтверждаешь форму. В сниффере будет точно видно куда форма шлет данные. Патом берешь замечательную библиотеку Indy, которая должна входить в стандартный пакет Delphi, если нет то можно скачать в гугле, она Open Source. С помощь нее отправляешь нужные тебе запросы и т.д., советую разобраться в библиотеке, она может полностью эмулировать обычный браузер, принимать куки и т.д.

IvanNes, также советую взять Indy, а сообщения получать по запросу к скрипту, который их шлет в чат, там 100% используется ajax, который обращается к php скрипту на сервере.

IvanNes

27.08.2011 07:24

Ответ: нужна помощь!

Цитата:

Сообщение от Baisangur (Сообщение 195665)

IvanNes, также советую взять Indy, а сообщения получать по запросу к скрипту, который их шлет в чат, там 100% используется ajax, который обращается к php скрипту на сервере.

::о я даж недумал об этом...

NetBuilding

02.02.2012 21:45

Такой вопрос

Вложений: 2

Есть прога, по формуле вычисляет, принадлежит ли точка графику косинуса, и на основе вырезанных "горбов" графика косинуса (этой самой функции) рисует круги, ну или что то похожее на круги.
Нужно чтоб эти самые круги не вылазили за пределы границ
т.е все круги были цельными
смотрите рисунок:
Вложение 16104
вот код:

Код:

procedure TForm1.Button1Click(Sender: TObject);

var

i,j,a,ident: integer;

x,y: integer;

w,r,t,ax,bx: real;

begin

Image1.Picture:=nil;

i := StrToInt(Edit1.Text);

j := StrToInt(Edit2.Text);

a := StrToInt(Edit3.Text);

ax := a * 0.1;

bx := ax + 0.1;



if (i mod 2=0) then r:=1 else r:=-1; // типа -1 в степени i

if (j mod 2=0) then t:=1 else t:=-1;



  for x:= 0 to 600 do

  for y := 0 to 600 do

  begin

  w:= abs(cos((i*pi*x/300)-(1+r)*pi/4)*cos((j*pi*y/300)-(1+t)*pi/4));





    if (w>ax) and (w<bx) then image1.Canvas.Pixels[x, y]:=clRed;

  end;





end;

Вложение 16105

NetBuilding

03.02.2012 12:30

Вах Вах

Ребята че ваще никак нельзя?

нужно типа проверку когда точка вылазит за границу и принадлежит ли она графику. если нет то прерывать.
границы можно любые поставить хоть 100 на 100.
Главное презентабельный вид :)
Все мои эксперименты не увенчались успехом. Такой ужас выходил вообще.

NetBuilding

14.02.2012 12:49

Ответ: нужна помощь!

решил проблему просто загнав все в прямоугольник который ресайзится в зависимости от значений

Часовой пояс GMT +4, время: 09:04.