[ 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. 2pick

    2pick Elder - Старейшина

    Joined:
    17 Mar 2007
    Messages:
    117
    Likes Received:
    39
    Reputations:
    2
    За первый спасибо, за второй - попроще то нельзя было ответить что ли как то? (гонору много)
    Кто же знал, что ф-я читает массив посимвольно и ей надо указывать ссылку на первый символ.
     
    #8501 2pick, 13 Sep 2011
    Last edited: 13 Sep 2011
  2. AtomoS

    AtomoS New Member

    Joined:
    17 Feb 2010
    Messages:
    88
    Likes Received:
    1
    Reputations:
    0
    привет всем знатокам)

    столкнулся с проблемой, а точнее с незнанием компонента TChart.
    хочу реализовать показ загруженности ЦП как в диспетчере задач, но не знаю как подойти к этому вопросу.

    не подкинет проектик с реализованным графиком?
    буду признателен.
     
  3. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    Кидаешь на форму Чарт, кликаешь по нему мышкой, во вкладке сериес создаешь новую серию. Далее используешь метод созданной серии AddXY для рисования графика. Например:
    PHP:
      for := 1 to 100 do
         
    Series1.AddXY(iCPUSpeed' 'clRed);
    Где CPUSpeed - значение частоты проца в i момент времени. Пкрикури мануалов. По данному компоненту их достаточно.
     
  4. AtomoS

    AtomoS New Member

    Joined:
    17 Feb 2010
    Messages:
    88
    Likes Received:
    1
    Reputations:
    0
    это понятно.. а вот как сделать вин-стайл-лайк?

    [​IMG]
     
  5. ZdezBilYa

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

    Joined:
    29 Aug 2008
    Messages:
    198
    Likes Received:
    75
    Reputations:
    19
    это не TChart. скорее всего прогрессбар
     
  6. AtomoS

    AtomoS New Member

    Joined:
    17 Feb 2010
    Messages:
    88
    Likes Received:
    1
    Reputations:
    0
    с радостью бы. 2й день в делфи
     
  7. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    почитай про Canvas и обычными линиями на нем накидай оси, и обычными линиями же график
     
  8. Error504

    Error504 New Member

    Joined:
    7 Apr 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    Какой компонент в Delphi 7 нужно поставить что б переходил по ссылкам на определенном сайте
    Проще говоря при запуске программы , программа нажимала кнопочки на сайте
     
  9. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    Вопрос: Какого человека нужно посадить в танк, чтобы он нажимал на кнопочки?
    Ответ: любого.
    Вопрос: Какого человека нужно посадить в танк, чтобы он нажимал на НУЖНЫЕ кнпочки?
    Ответ: Специально обученного.
    Вопрос: А кто его должен обучить?
    Ответ: ты
    Подумай над формулировкой и спроси еще раз.
    что за кнопочки? что за сайты?
    Если это влеш-приложение, то забей,
    если ты хочешь спамер писать, то это одно,
    если че-то еще -> че-то другое.
    Но гугл знает ответ практически на ЛЮБОЙ вопрос
     
  10. DooD

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

    Joined:
    30 Sep 2010
    Messages:
    1,168
    Likes Received:
    450
    Reputations:
    288
    кликер я так понял он хочет написать.проще на авто ит сделать будет.
     
  11. Error504

    Error504 New Member

    Joined:
    7 Apr 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    хочу что бы на определенном сайте програма раз в 2 минуты нажимала 1 и ту же кнопку
     
  12. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    Ты хочешь, чтобы при этом комп был свободен, или его можно занять (отобрать у тебя мышку), если можно занять - то автоит в руки,
    если занимать нельзя, и ты хочешь по-быстрому решить этот вопрос и особо не заморачиваться - то TWebBrowser бери. разобраться недолго.
    Если интересует позаморачиваться - то сниффер и IdHTTP тебе в руки
     
  13. Error504

    Error504 New Member

    Joined:
    7 Apr 2010
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    Спасибо xophet!
    Уже заморочился и разобрался поверхностно
    осталось только углубиться! Если что отпишусь
     
  14. Mr.Wekly

    Mr.Wekly New Member

    Joined:
    15 Sep 2011
    Messages:
    60
    Likes Received:
    3
    Reputations:
    5
    Подскажите пожалуйста хорошии стать по дельфи с использованием HTTPS запроса. Заранее благодарю.
     
  15. _-SanNick-_

    _-SanNick-_ New Member

    Joined:
    10 May 2011
    Messages:
    2
    Likes Received:
    0
    Reputations:
    0
    Каким образом узнать домен аккаунтов из списка: login@domain.ru;pass ?
     
  16. patcher

    patcher Banned

    Joined:
    15 Dec 2009
    Messages:
    190
    Likes Received:
    37
    Reputations:
    10
    Вот, навалял функцию:
    Code:
    function GetDomain(s:string):string;
    var f:string;
    begin
    f:=s;
    delete(f, 1, pos('@', f));
    delete(f, pos(';', f), length(f)-pos(';', f)+1);
    result:=f;
    end;
    
    Полностью рабочая программа для твоих нужд:
    Code:
    program x3;
    
    {$APPTYPE CONSOLE}
    
    function GetDomain(s:string):string;
    var f:string;
    begin
    f:=s;
    delete(f, 1, pos('@', f));
    delete(f, pos(';', f), length(f)-pos(';', f)+1);
    result:=f;
    end;
    
    var s:string; fin, fout:Text;
    begin
    assign(fin, paramstr(1));
    reset(fin);
    assign(fout, paramstr(1)+'.txt');
    rewrite(fout);
    while not eof(fin) do
    begin
    readln(fin,s);
    s:=GetDomain(s);
    writeln(fout,s);
    end;
    close(fin);
    close(fout);
    writeln('Done!');
    readln;
    end.
    
    Ну и скомпиленый .ехе
    Перетягиваешь файл со списком мыл на него и вуаля, рядом такой же файл + .txt со списком доменов
     
  17. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    Всем привет!
    Возникла следующая проблемка:
    компилятор делфи (Delphi 7) на 3-х компах указывает на ошибку на несколько строк выше ее реального местонахождения. при чем происходит это всегда не в главном модуле проекта, а во второстепенных (в гланом модуле строку в которой проблема, определяет верно). проекты разные, пробовал создавать с нуля проблема не исчезает.
    Кто сталкивался?
     
  18. AtomoS

    AtomoS New Member

    Joined:
    17 Feb 2010
    Messages:
    88
    Likes Received:
    1
    Reputations:
    0
    пару тем назад я писал о графике загрузке цп..
    потратил пару дней - результата не добился.

    может кто найдётся добрый и реализует его?
    кстати, вот *.exe моей первой программы (sys.info)
     
  19. xophet

    xophet Member

    Joined:
    16 Apr 2011
    Messages:
    617
    Likes Received:
    49
    Reputations:
    5
    Элементарно, Ватсон:
    Берешь прогресс бар, ставишь Maximum:=100;
    Orientation := pbVertical;
    Position:= Загрузка в процентах;
    И вуаля :)
     
  20. shadowrun

    shadowrun Banned

    Joined:
    29 Aug 2010
    Messages:
    842
    Likes Received:
    170
    Reputations:
    84
    мб у ТСа вин7 и дельфя XE...
     
Thread Status:
Not open for further replies.