Вопрос по циклу

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by aydar, 31 Aug 2010.

  1. aydar

    aydar Member

    Joined:
    12 Nov 2009
    Messages:
    259
    Likes Received:
    6
    Reputations:
    -2
    Вообщем такой, есть мемо туда подгружаю список мыл, есть запрос:

    Вообщем возникла необходимость за 1 запрос посылать настраиваемое кол-во мыл, допустим ввожу в эдит 10

    как мне правильно сделать цикл? и если у меня допусти мыл 16 отправляю за 1 запрос по 10?
     
  2. good_man

    good_man New Member

    Joined:
    24 May 2010
    Messages:
    112
    Likes Received:
    3
    Reputations:
    -2
    ну как бы я не понял вашего алгоритма, но читать из мемо всякие там логины мыла пароли вроде как принято построчно.

    следовательно цикл должен брать сначала нулевую строку, потом первую, вторую ит.д.

    за указатель на строку брать переменную. в цикле увеличивать ее значение на единицу.

    следовательно если нужно взять первые десять строк то сделать это можно примерно так:
    int i=0;
    int count=StrToInt(Edit1->Text);
    int count_max=Memo1->Lines->Count;//посчитаем все строки
    while (i<count)
    {
    Memo2->Lines->Add(Memo1->Lines->Strings); //Data->Add(Memo1->Lines->Strings);
    i++;
    if (i==count_max){break;}//мыла кончились
    }
    если кинуть на форму едит, два мемо, и баттон, написать в мемо1 десять строк, в едите вписать три то в мемо два будут первые три строки из мемо1 ))

    простой примерчик в стиле C++
     
    #2 good_man, 31 Aug 2010
    Last edited: 31 Aug 2010
  3. 090808

    090808 Member

    Joined:
    15 Mar 2009
    Messages:
    171
    Likes Received:
    46
    Reputations:
    10
    Code:
    var
    I:integer;
    begin
    for I:= 0 to memo1.lines.count-1 do 
    begin
    ...
    Data.Add('emails='+Memo1.lines[i]);
    ...
    end;
    end;
     
    2 people like this.