[ 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. Ename

    Ename New Member

    Joined:
    24 Jun 2010
    Messages:
    12
    Likes Received:
    0
    Reputations:
    0
    Помогите составить вот такую задачку на pascal ABC http://imgsave.ru/image-6980_4D3C2126.jpg
    маштаб 1 клетка - 20 пикселей
     
    #7621 Ename, 23 Jan 2011
    Last edited: 23 Jan 2011
  2. Isaev

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

    Joined:
    25 Jul 2007
    Messages:
    120
    Likes Received:
    19
    Reputations:
    6
    Проблема то в чём? Команду рисования прямой забыл или окружности? Или калькулятор подсказать как в виндовсе вызывается?
     
  3. SkyLine32

    SkyLine32 Member

    Joined:
    1 Mar 2009
    Messages:
    144
    Likes Received:
    22
    Reputations:
    2
    у кого есть исходник регера вконтакте с ручным вводом капчи?
     
  4. Melfice

    Melfice New Member

    Joined:
    24 Jan 2011
    Messages:
    1
    Likes Received:
    0
    Reputations:
    0
    Процедуры

    Подскажите, кто может, как сделать, чтобы процедура могла взаимодействовать со всеми объектами на поле, а не только с передаваемыми при вызове?

    Code:
    procedure clicki(BlueDidClick:integer;RedDidClick:integer);
    begin
      if RedDidClick=1 then
        begin
          if panel9.color=clred then
            begin
            click(panel2,clwhite);
            end;
        end;
    end;
    
    программа при запуске утверждает, что panel9 - неинициализированная переменная.
     
  5. Ename

    Ename New Member

    Joined:
    24 Jun 2010
    Messages:
    12
    Likes Received:
    0
    Reputations:
    0
    Ну подскажи..у меня linux стоит.
    ну раз обращаюсь значит забыл/незнаю
     
    #7625 Ename, 24 Jan 2011
    Last edited: 24 Jan 2011
  6. Isaev

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

    Joined:
    25 Jul 2007
    Messages:
    120
    Likes Received:
    19
    Reputations:
    6
    потому, что procedure clicki не относится к форме
    вызывай Form1.panel9

    MoveTo, LineTo, Ellipse, Arc это всё, что тебе нужно
    Гугл в помощь
     
  7. SkyLine32

    SkyLine32 Member

    Joined:
    1 Mar 2009
    Messages:
    144
    Likes Received:
    22
    Reputations:
    2
    нужно в WebBrowser1 выбрать программно на странице регистрации vkontakte.ru поле 'Пол:' как сделать?
     
  8. InfectedM

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

    Joined:
    4 Nov 2007
    Messages:
    155
    Likes Received:
    12
    Reputations:
    0
    Есть что-нибдуь в делфи для рандомной вставки(что бы не изобретать велосипед)
    нужно что-то типа вот этого:
    Code:
    edit1.text:=randominsert('Машина|Самолет|Трактор|Верблюд|Пешком');
     
    #7628 InfectedM, 25 Jan 2011
    Last edited: 25 Jan 2011
  9. Isaev

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

    Joined:
    25 Jul 2007
    Messages:
    120
    Likes Received:
    19
    Reputations:
    6
    Бери снифер и смотри что посылается при выборе... Если нужно визуально, то парси страницу по названию поля, меняй, обновляй

    в чём же велосипед то? Обычный массив строк и рандомный выбор
     
  10. ADR-007

    ADR-007 Member

    Joined:
    12 Jul 2010
    Messages:
    218
    Likes Received:
    9
    Reputations:
    0
    ктота видил крек к Delphi XE?)
     
  11. Isaev

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

    Joined:
    25 Jul 2007
    Messages:
    120
    Likes Received:
    19
    Reputations:
    6
    на руборде лежит
     
  12. SkyLine32

    SkyLine32 Member

    Joined:
    1 Mar 2009
    Messages:
    144
    Likes Received:
    22
    Reputations:
    2
    парсил, там поле input, выбор пола происходит через джаваскрипт...поэтому я и прошу помощи. а вот кнопка "Зарегистрироваться" вообще тупо сделана на div'ах...
     
    #7632 SkyLine32, 25 Jan 2011
    Last edited: 25 Jan 2011
  13. unnnder

    unnnder New Member

    Joined:
    1 Dec 2010
    Messages:
    27
    Likes Received:
    0
    Reputations:
    0
    доброго времени суточек всем, народ подскажите плиз как едиту присвоить значение из монт календарь?
     
  14. AGIMgal

    AGIMgal New Member

    Joined:
    9 Jun 2010
    Messages:
    66
    Likes Received:
    0
    Reputations:
    0
    как вызвать окошко, в котором путь к файлу выбирается?

    и ещё, если я делаю
    Code:
    idhttp1.get('url')
    то уходить информация, что я прошёл по данной ссылки?если нет, то как можно сделать чтобы уходила?
     
    #7634 AGIMgal, 25 Jan 2011
    Last edited: 25 Jan 2011
  15. Voland-791

    Voland-791 Member

    Joined:
    1 May 2009
    Messages:
    163
    Likes Received:
    13
    Reputations:
    5

    idhttp1.post('url')
     
  16. Cock3r

    Cock3r New Member

    Joined:
    19 Jan 2011
    Messages:
    14
    Likes Received:
    3
    Reputations:
    0
    Компонент OpenDialog из закладки Dialogs

    if OpenDialog1.Execute then
    ShowMessage(OpenDialog1.Filename)

    если ты об этом
     
  17. Isaev

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

    Joined:
    25 Jul 2007
    Messages:
    120
    Likes Received:
    19
    Reputations:
    6
    SkyLine32 конечная цель так и осталась загадкой...
    Тебе нужно программно эмулировать процесс регистрации или визуально?
     
  18. r3l0c

    r3l0c New Member

    Joined:
    23 Jan 2011
    Messages:
    17
    Likes Received:
    0
    Reputations:
    0
    Как на делфях расшифровать пасс от ТимВиевера, который был в реестре в двоичном формате, но я его выдернул как текст??)
     
  19. AGIMgal

    AGIMgal New Member

    Joined:
    9 Jun 2010
    Messages:
    66
    Likes Received:
    0
    Reputations:
    0
    [Error] Unit1.pas(29): There is no overloaded version of 'Post' that can be called with these arguments
    вот такая ошибка вылазеет на idhttp1.post('url')
     
  20. МongBa†

    МongBa† Member

    Joined:
    12 May 2009
    Messages:
    66
    Likes Received:
    12
    Reputations:
    0
    post идет только с постдатой:

    var pd:TStringList;
    begin
    pd:=tstringList.Create;
    //..... добавляем постдату
    idhttp1.post(url,pd);
    pd.free;
    end;
     
Thread Status:
Not open for further replies.