[ Delphi / Pascal ] — начинающим: задаем вопросы (архивная - 2015)

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by banned, 6 May 2007.

Thread Status:
Not open for further replies.
  1. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    http://www.delphiexpert.ru/view_lesson.php?id=76
     
  2. firstfallen

    firstfallen New Member

    Joined:
    1 Mar 2010
    Messages:
    64
    Likes Received:
    0
    Reputations:
    0
    и ещё 1 проблема... как в делфи в стринговую переменную занести символы '
     
  3. firstfallen

    firstfallen New Member

    Joined:
    1 Mar 2010
    Messages:
    64
    Likes Received:
    0
    Reputations:
    0
    совсем не то, тут не сказано как с ним работать, тут сказано как подключится и вывести в него
     
  4. Seven[up]

    Seven[up] Banned

    Joined:
    10 Aug 2009
    Messages:
    45
    Likes Received:
    36
    Reputations:
    0
    Code:
    var s:string
    begin
      s:='''';
    end;
     
  5. firstfallen

    firstfallen New Member

    Joined:
    1 Mar 2010
    Messages:
    64
    Likes Received:
    0
    Reputations:
    0
    есть dbgrid заполненый. как из определённого столбца взять нужную строчку и скинуть ей в мемо или едит?
     
  6. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Парсил страницу, и упёрся в знаки вопросов место русских букв... Понимаю, чо связано с кодировками Cyrillic (windows-1251) и ANSI Latin 1 (windows-1252). Как перекодировать?


    =====Вопрос решен======
    Порешал так :
    PHP:
    var
       
    TStringStream;
       
    temp string;
     
    begin
       a 
    := TStringStream.Create(temp);
       
    IdHTTP1.Get('http://site.ru'a);
       
    Memo1.Lines.Add(a.DataString);
     
    #8266 shadowrun, 4 Jun 2011
    Last edited: 4 Jun 2011
  7. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    Utf8toAnsi
    И
    AnsiToUtf8
     
  8. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    пробовал, не катило...
     
  9. ZeaL

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

    Joined:
    3 Apr 2011
    Messages:
    72
    Likes Received:
    20
    Reputations:
    14
    проще обычной стрингой получать страницу, ее проще парсить и работать с ней в целом...

    var
    s : string;
    begin
    s:=IdHTTP1.Get('http://site.ru');
    Memo1.Lines.Text:=s;
     
  10. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Да ну??? *ДВОЙНОЙ РУКАЛИЦО*
     
  11. skagen

    skagen Member

    Joined:
    8 Jan 2010
    Messages:
    122
    Likes Received:
    13
    Reputations:
    0
    посоветуйте пожалуйста учебник delphi для новичков с подробным описанием классов, компонентов и т.д. желательно для delphi 2010
     
  12. waik

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

    Joined:
    2 Nov 2008
    Messages:
    405
    Likes Received:
    163
    Reputations:
    12
    ZeaL хватит в эти стринги целые страницы запихивать! Пора работать с потоком данных.
     
  13. ZeaL

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

    Joined:
    3 Apr 2011
    Messages:
    72
    Likes Received:
    20
    Reputations:
    14
    как по мне так стринга хоть и простая и никчёмная, но работать с ней в разы проще чем со стримами. к тому же они могут вместить информации на 2гб, так что http страницы для них не пробема)
    да, я кэп...

    shadowrun, ваша ирония не уместна, не флудите не по теме
     
    #8273 ZeaL, 6 Jun 2011
    Last edited: 6 Jun 2011
  14. skagen

    skagen Member

    Joined:
    8 Jan 2010
    Messages:
    122
    Likes Received:
    13
    Reputations:
    0
    мне кто-нибудь поможет?
    Code:
    посоветуйте пожалуйста учебник delphi для новичков с подробным описанием классов, компонентов и т.д. желательно для delphi 2010
     
  15. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    DRKB Explorer
     
  16. 4ipolino

    4ipolino New Member

    Joined:
    24 Dec 2010
    Messages:
    27
    Likes Received:
    0
    Reputations:
    0
    в основную программу надо реализовать вот такое:
    на форме есть ComboBox1 Edit1 Edit2
    в файле логин лист идет название_сайта:ip:порт
    как загрузить текст разделяемый : в отдельный компонент?
    http://www.keep2.me/fd9901 набросал форму с кнопками и код загрузки файла loginlist.txt в ComboBox1

    помогите нубу кодом или допишите загрузку файла по отдельным компонентам :D
     
    #8276 4ipolino, 8 Jun 2011
    Last edited: 8 Jun 2011
  17. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    PHP:
    var
     
    i:integer;
     
    TL:TStringList;
     
    s,site,ip,port:string;
     
    begin
     TL
    :=TStringList.Create;
     
    OpenDialog1.Execute;
     
    tl.LoadFromFile(OpenDialog1.FileName);
     for 
    i:=0 to Tl.Count -do
      
    begin
       s
    :=TL.Strings[i];
       
    site:=Copy(s,0,Pos(':',s)-1);
       
    Delete(s,1,pos(':',s));
       
    ip:=Copy(s,0,POS(':',s)-1);
       
    Delete(s,1,pos(':',s));
       
    port:=Copy(s,0,length(s));
      
    end;
      
    tl.Free;
     
    end;
     
    #8277 shadowrun, 8 Jun 2011
    Last edited: 8 Jun 2011
  18. 4ipolino

    4ipolino New Member

    Joined:
    24 Dec 2010
    Messages:
    27
    Likes Received:
    0
    Reputations:
    0
    мне нужно содержимое файла логинлист распределить по ComboBox1 Edit1 Edit2 ....
     
  19. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Ты хочешь сказать, что при выборе в ComboBox1 определенного сайта в Edit1 появляется его IP, а в Edit2 порт?
     
  20. 4ipolino

    4ipolino New Member

    Joined:
    24 Dec 2010
    Messages:
    27
    Likes Received:
    0
    Reputations:
    0
    да именно так
    п.с посоветуйте хорошою книгу по дельфи почитать на досуге)
     
Thread Status:
Not open for further replies.