Delphi Помогите спарсить

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by jax33, 24 Sep 2013.

  1. jax33

    jax33 New Member

    Joined:
    8 Aug 2011
    Messages:
    35
    Likes Received:
    0
    Reputations:
    -1
    Извините что прошу так много :rolleyes:

    мне нужно

    [​IMG]

    вот смотрите на скрине на кнопке (извините еще раз что прошу готовое )
     
  2. qw1mb1

    qw1mb1 Member

    Joined:
    8 Feb 2013
    Messages:
    113
    Likes Received:
    16
    Reputations:
    8
    Code:
    uses ..., MSHTML;
    ...
    var
    Doc:IHTMLDocument2;
    S:string;
    begin
    Doc:= WebBrowser1.Document as IHTMLDocument2;
    s := doc.body.innerHTML;
    delete(s, 1, pos('<title>', s)+length('<title>')-1);
    Edit1.Text := copy(s, 1, pos('</title>', s)-1);
    
     
  3. jax33

    jax33 New Member

    Joined:
    8 Aug 2011
    Messages:
    35
    Likes Received:
    0
    Reputations:
    -1
    а как всё это в коде самой кнопке прописать или где там вообще
     
  4. qw1mb1

    qw1mb1 Member

    Joined:
    8 Feb 2013
    Messages:
    113
    Likes Received:
    16
    Reputations:
    8
    включи хоть немного смекалку... в противном случае тебе сюда --> Предложения работы, услуг
     
  5. jax33

    jax33 New Member

    Joined:
    8 Aug 2011
    Messages:
    35
    Likes Received:
    0
    Reputations:
    -1
    ладно завтро на нормальную голову сам наверное сделаю
     
  6. BlackIce

    BlackIce Elder - Старейшина

    Joined:
    10 Jan 2013
    Messages:
    108
    Likes Received:
    31
    Reputations:
    27
    Там таких и так хватает
     
Loading...