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

    azbuka New Member

    Joined:
    19 Nov 2008
    Messages:
    4
    Likes Received:
    0
    Reputations:
    0
    продолжая набор вопросов, имею аналогичную указанной проблеме http://www.delphikingdom.ru/asp/answer.asp?IDAnswer=37923.
    Заранее благодарен за посыл в нужном направлении...
     
  2. N1K70

    N1K70 Banned

    Joined:
    2 Jan 2008
    Messages:
    161
    Likes Received:
    76
    Reputations:
    21
    2-m0rgan-:
    Code:
    case Edit1.Text of
      1..100: Label1.Caption := '1';
      101..200: Label1.Caption := '2';
    else
      Label1.Caption := '=\\';
    end;
     
  3. Pir4tt

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

    Joined:
    3 Jan 2008
    Messages:
    73
    Likes Received:
    36
    Reputations:
    5
    Nightmarе:
    Провер, может -1 в делите не надо.. В а будет lol ;)
     
  4. Ponchik

    Ponchik Хлебо-булочное изделие

    Joined:
    30 Aug 2005
    Messages:
    687
    Likes Received:
    807
    Reputations:
    311
    Вопрос по дельфи
    Второй день его "изучаю" по сравнению с PHP это ад Х_Х
    Юзаю borland delphi чёто такое... Вот у мя проблема
    Я там по середине сделал надпись в проге "Hello" и сделал чтоб при нажатии на кнопку происходило
    message.Caption := 'Hello, world';
    И текст при замене уже получается не по центру... А вот как его заставить чтоб он центровался?
    Я надеюсь понятно объясняю?
    =====
    Я вобще и по гуглу бегаю по своим вопросам но нахожу тама коды по 100 строк, хотя когда это делается за 2-3 строки, в гугле одни задроты :)))
    Ну в общем вот...
     
  5. NeXArmAor

    NeXArmAor Banned

    Joined:
    21 Apr 2007
    Messages:
    226
    Likes Received:
    161
    Reputations:
    6
    MessageBox(0,'Hello, world','Fuck you,world',MB_OK);
     
    2 people like this.
  6. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    label1.Alignment:=taCenter;

    если я правильно понял



    бугога :D
    отжег))))))))))))))))))
     
  7. NeXArmAor

    NeXArmAor Banned

    Joined:
    21 Apr 2007
    Messages:
    226
    Likes Received:
    161
    Reputations:
    6
    .Alignment:=taCenter;
     
  8. Ponchik

    Ponchik Хлебо-булочное изделие

    Joined:
    30 Aug 2005
    Messages:
    687
    Likes Received:
    807
    Reputations:
    311
    NeXArmAor, не то, но огромное спасибо что подсказал, я вчера незнал как такое сделать (окошко)
    W!z@rD, ниработат...
    Вот
    [​IMG]
    А вот подлинее
    [​IMG]
    А мне посередине надо :(
     
  9. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Регулярка к примеру типа таких:
    http://regexlib.com/Search.aspx?k=a+href&c=-1&m=-1&ps=20
     
  10. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Ponchik, тебе надо компонент растянуть по верху: Align:=alTop;

    label1.Align:=alTop;
    label1.Alignment:=taCenter;
    label1.Caption:=edit1.Text;
     
  11. Ponchik

    Ponchik Хлебо-булочное изделие

    Joined:
    30 Aug 2005
    Messages:
    687
    Likes Received:
    807
    Reputations:
    311
    W!z@rD, эээ... Работает, но "Присасывается" к верху, а как символ \n вставить? Я пишу ... := '\n' + ...; и не получается, так и выводит \n
     
  12. desTiny

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

    Joined:
    4 Feb 2007
    Messages:
    1,006
    Likes Received:
    444
    Reputations:
    94
    #13#10
     
    1 person likes this.
  13. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    Nightmarе по поводу регулярки можно спросить вон у Пончика )))
    вот к примеру по поводу регулярок в Delphi http://forum.vingrad.ru/articles/topic-213075/anchor-entry1523979/0.html

    Ponchik
    label1.caption:='test'#13#10'2 test'
     
  14. NeXArmAor

    NeXArmAor Banned

    Joined:
    21 Apr 2007
    Messages:
    226
    Likes Received:
    161
    Reputations:
    6
    + забыл поставить
    label1.caption:='test'+#13#10+'2 test'
     
  15. W!z@rD

    W!z@rD Борец за русский язык

    Joined:
    12 Feb 2006
    Messages:
    973
    Likes Received:
    290
    Reputations:
    43
    мда...
    NeXArmAor
    ты сначала так попробуй и задумайся...

    ничего я не забыл
     
  16. NeXArmAor

    NeXArmAor Banned

    Joined:
    21 Apr 2007
    Messages:
    226
    Likes Received:
    161
    Reputations:
    6
    по идее можно и так и так. разницы нет в принципе
     
  17. desTiny

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

    Joined:
    4 Feb 2007
    Messages:
    1,006
    Likes Received:
    444
    Reputations:
    94
    если делфа умная(читай очень умная, читай оптимизатор), то наверное нет. А вообще конкатенация строк с "+", как ни странно, медленнее работает, чем если у тебя сразу строка создана. Можете реверснуть и посмотреть
     
  18. Pir4tt

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

    Joined:
    3 Jan 2008
    Messages:
    73
    Likes Received:
    36
    Reputations:
    5
    Nightmarе, скобку забыл одну:
    Код только что проверен и прекрасно парсит, собстно заменяя <script> и </script> можно парсить любые данные ;) переменные ты правильно обявил))

    p/s/ Можно с регулярками заморочиться, но тебе надо будут прикрутить TRegExp к сорцам, а ради одной единственной фразы оно того не стоит :)
     
  19. Ponchik

    Ponchik Хлебо-булочное изделие

    Joined:
    30 Aug 2005
    Messages:
    687
    Likes Received:
    807
    Reputations:
    311
    Как я закалебался, всё что я в гугле или ещё где нахожу неработает! Ну сколько можно! Ну как так!
    Вот например функция
    http://www.jasonwhite.co.uk/index.php/2006/07/30/delphi-explode-function-like-php-explode/
    Запускаю...
    Какого-то чёрта тама лишний вопросительный знак.... Ну лан, удаляю
    Потом строка
    s := ”;
    ему ненравятся такие ковычки! КАК ТАК! Ну если чел выложил значит должно нравиться! Ну лан! Заменяю на
    s := '';
    Ага... Запускаеца софтина...
    Под функцией пишу
    explode(’,',’test,test,tets’, 0) ;
    опять эти ковычки! Причём побще непонятно одна ` пторая ' мб защита от школьников =\ нипаняяятна, исправляю на
    explode(',','est,test,tets', 0) ;
    Ну и чтобы вы думали... Ошибка естествено! Вы чё! Чтобы что-то запустилось! Да нереал вобще!

    [Error] Unit2.pas(94): Declaration expected but identifier 'explode' found
    [Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit2.pas'

    Что эта гадина хочет?!
     
  20. desTiny

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

    Joined:
    4 Feb 2007
    Messages:
    1,006
    Likes Received:
    444
    Reputations:
    94
    Ponchik, а ты откуда функу вызываешь?) её надо либо в основной блок begin end. добавлять, либо в друкую процедуру/функу типа FormCreate
     
Thread Status:
Not open for further replies.