[ 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. 0pTik

    0pTik Banned

    Joined:
    18 Jul 2010
    Messages:
    240
    Likes Received:
    85
    Reputations:
    17
    Держи кинь в папку с прогой http://slil.ru/29487408
     
  2. moodoone

    moodoone Member

    Joined:
    21 Oct 2009
    Messages:
    144
    Likes Received:
    38
    Reputations:
    5
    Ети файлы я и заливал в папку..
    Ошибка дальше!(
     
  3. 0pTik

    0pTik Banned

    Joined:
    18 Jul 2010
    Messages:
    240
    Likes Received:
    85
    Reputations:
    17
    Эти не много другие ! Ты их в папку с программой кинул? Indy какой версии? Ошибка та же ?
     
  4. NemeZz

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

    Joined:
    20 Aug 2008
    Messages:
    102
    Likes Received:
    67
    Reputations:
    3
    какая версия индейцев, какая дельфина? Мб индейцев обнови? У меня на 7-ке эти либы с юнитом подходят.

    Если уж совсем ничего не получается - поставь Synapse (ссылку давал в предыдущем ответе) - он отлично заменяет без всяких либ.

    По теме синапс - есть пару отличных статей
    основы
    подробный пример
     
    #6584 NemeZz, 22 Jul 2010
    Last edited: 22 Jul 2010
  5. STLcRash

    STLcRash New Member

    Joined:
    4 Jun 2009
    Messages:
    39
    Likes Received:
    0
    Reputations:
    0
    В общем вот сайт. Сделан мной, на нём есть програмка кликер. (весь исходник выкладывать слишком объёмно)
    Она подгружает игру [В]Галактике. И производит с ней различные действия, ну в общем это не так важно что она делает, вопрос в том, как сделать, чтоб программа подгружала SWF файл не с сервера контакта
    Code:
    (swf_url":"http:\/\/cs1777.vkontakte.ru\/u5806885\/bc0b2e3d76a332.zip")
    , а с папки на компе пользователя, например папка_с_программой/swf/gala.swf?

    Или подскажите как должна выглядеть процедура загрузки http://vkontakte.ru/app630896 - этой страницы, чтоб после того, как она отобразится, работало swf приложение (почему - то если оно есть в кэше, то вместо него на странице пустое место)
     
    #6585 STLcRash, 23 Jul 2010
    Last edited: 23 Jul 2010
  6. dima798

    dima798 New Member

    Joined:
    30 Nov 2009
    Messages:
    0
    Likes Received:
    0
    Reputations:
    0
    Пытаюсь написать, что то вроде чекера
    аков,Подскажите как разбивать аки из файла вида log:pass? Есть такой код, я его загоняю в цикл, for...do begin
    Code:
    Login := Copy(AccsList[0], 1, Pos(':', AccsList[0]) - 1); Password := Copy(AccsList[0], Pos(':', AccsList[0]) + 1,Length(AccsList[0]));
    Но делится только первая строка, остальные он не затрагивает.
     
  7. Seravin

    Seravin Active Member

    Joined:
    25 Nov 2009
    Messages:
    475
    Likes Received:
    190
    Reputations:
    221
    вместо AccsList[0] - AccsList (ну или какой там счётчик у тя)
     
  8. heretic1990

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

    Joined:
    2 Jul 2008
    Messages:
    487
    Likes Received:
    182
    Reputations:
    5
    как мне найти файл на жестком диске если я знаю только его название, но не знаю в каком каталоге и на каком диске он лежит?
     
  9. Seravin

    Seravin Active Member

    Joined:
    25 Nov 2009
    Messages:
    475
    Likes Received:
    190
    Reputations:
    221
    сканировать всю систему) других вариантов нет я думаю
     
  10. heretic1990

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

    Joined:
    2 Jul 2008
    Messages:
    487
    Likes Received:
    182
    Reputations:
    5
    надо рекурсивный поиск.
     
  11. mys-ber

    mys-ber New Member

    Joined:
    16 Feb 2008
    Messages:
    2
    Likes Received:
    1
    Reputations:
    0
    Здравствуйте! Я недавно начал изучать pascal. Взял для изучения книгу "Алгоритмизация и программирование на Турбо Паскале".
    В 5 главе столкнулся с небольшой проблемой: Паскаль выдаёт ошибку. К тому же не совсем понимаю задание.
    [​IMG]
    [​IMG]

    Code:
    var
    z,y,x,eps,y1:real;
    i,n:integer;
    Begin
    clrscr;
    eps:=0.001;
    y1:=1;
    y:=1;
    x:=PI/3;
    n:=1;
    while abs(y1-y)<=eps do
    begin
    y:=y1;
    z:=x/(exp(ln(y1)*(n-1)));
    if z<>0 then
    y1:=y1+(1/n)*(z-y1);
    WriteLn(y1);
    end;
    readkey;
    End.
    и как потом вычислить корень 2 и 4 степени?
    Подскажите пожалуйста...
     
  12. blinker2009

    blinker2009 Member

    Joined:
    3 Apr 2009
    Messages:
    62
    Likes Received:
    5
    Reputations:
    0
    Не совсем понятно задание. Ну вот как понял так и написал.
    Code:
     uses crt;
    var y,x:real;
        int,n:byte;
    function stepen(x:real;n:byte):real;
    var i:byte;
        ft:real;
    begin
      i:=0;ft:=1;
      if n>=1 then
      begin
        repeat
          ft:=ft*sqrt(x);
          inc(i);
        until n=i;
      end;
      stepen:=ft;
    end;
    begin clrscr;
      write('x=');read(x);
      for n:=1 to 10 do
      begin
        y:=stepen(x,n);
        writeln(y:1:2);
      end;
    readkey;
    end.
    
     
  13. fenixelite

    fenixelite Banned

    Joined:
    7 Feb 2010
    Messages:
    294
    Likes Received:
    56
    Reputations:
    6
    Сейчас работаю с WinSock. И возникла странная проблема... Функция connect() всегда возвращает 0. Даже если сеть отключена( и локальный сервер тоже). В чем может быть проблема?
     
  14. slesh

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

    Joined:
    5 Mar 2007
    Messages:
    2,702
    Likes Received:
    1,224
    Reputations:
    455
    возможно у тя стоит какойто антивирь типа каспера. ПОтмоу что сам встречался с тем, что при коннекте (когда стоит каспер) то всё идет через него. т.е. на деле ты коннектишься на него, а он уже куда надо, и сам проверят траф. также такое возможно при использовании локального прокси.
     
  15. fenixelite

    fenixelite Banned

    Joined:
    7 Feb 2010
    Messages:
    294
    Likes Received:
    56
    Reputations:
    6
    slesh, спс. Сам так же и подумал, что скорее всего из-за нода. Ну это не критично( просто хотел сделать вывод ошибок для компонента ), потом дома разберусь
     
  16. fenixelite

    fenixelite Banned

    Joined:
    7 Feb 2010
    Messages:
    294
    Likes Received:
    56
    Reputations:
    6
    Можно ли как то изменить файл, который в данный момент используется другой программой? ( слишком сложные способы не нужно)
     
  17. alexey-m

    alexey-m Elder - Старейшина

    Joined:
    15 Jul 2009
    Messages:
    518
    Likes Received:
    100
    Reputations:
    37
    если ты имеешь ввиду файлы открытые монопольно, то можно почитать это, кое что доработаешь под себя и все)
     
  18. RAINUR

    RAINUR New Member

    Joined:
    24 May 2010
    Messages:
    151
    Likes Received:
    0
    Reputations:
    0
    А библиотека idhttp1 устанавливать нужно в borland delphi 7? или что?Ж)
     
  19. RAINUR

    RAINUR New Member

    Joined:
    24 May 2010
    Messages:
    151
    Likes Received:
    0
    Reputations:
    0
    Нашел ответ :) _http://parsing-and-i.blogspot.com/2009/05/idhttp-delphi.html
     
  20. Voland-791

    Voland-791 Member

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

    Что у меня не так сделано?должен отсылать анонимку через IdSMTP1 и IdMessage1
     
    #6600 Voland-791, 1 Aug 2010
    Last edited: 1 Aug 2010
Thread Status:
Not open for further replies.