1. 游客, мы просим Вас ознакомиться с Правилами Форума и Отказом от ответственности!

Тупой вопрос. (Delphi)

本贴由 Brune2013-12-02 发布. 版块名称: Delphi

主题状态:
主题已关闭, 停止回复.
  1. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    Вообщем начал изучение дельфи, и вот поехал первый косяк. Не знаю как сделать кнопку с ссылкой на браузер, точнее при клике на кнопку, чтобы был запуск ссылки прописанной в код запустился в браузере по умолчанию на пк. как это сделать? ShellExecute(0, 'open', 'http://www.google.ru', nil, nil, SW_SHOW); пробовал - не работает...

    честно признаюсь я нереальный нуб сейчас, тапками не кидайтесь
  2. FrozenThrone Пользователи

    注册日期:
    2013-10-26
    帖子:
    256
    支持:
    70
    性别:
    Репутация:
    0
    Команда:
    Winner on life
    offtop
    Очень название темы понравилось:D
  3. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    // offtop
    что естесственно, то не безобразно, не в тему, но по смыслу. Всё еще жду ответа :)
  4. pdev Команда форума Администратор Программист Open Source Contributor

    注册日期:
    2012-09-24
    帖子:
    1,409
    支持:
    1,407
    性别:
    Репутация:
    7
    Команда:
    Indy
    Страна:
    Turkey Turkey
    Application.Handle передай первым параметром.
    эта функция 100% обертка win api. а winapi не может не работать
    已获得Brune的支持.
  5. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    т.е вместо ShellExecute? Если да, то попробовал - не получилось. Будь добр, покажи уже готовый код, что-то туплю :D
  6. FrozenThrone Пользователи

    注册日期:
    2013-10-26
    帖子:
    256
    支持:
    70
    性别:
    Репутация:
    0
    Команда:
    Winner on life
    implementation
    uses ShellApi;
    {$R *.dfm}

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    ShellExecute( Handle, 'open', 'www.google.ru', nil, nil, SW_NORMAL );
    end;
  7. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    implementation - ругается :D
    --- добавлено: 3 дек 2013 в 00:50 ---
    http://joxi.ru/fvKcUtg5CbDyFzptOuY
    Последнее редактирование модератором: 2013-12-10
  8. Тыщ Группа анонимных алкоголиков Art Old school Пользователи

    注册日期:
    2010-07-06
    帖子:
    1,573
    支持:
    812
    性别:
    Репутация:
    2
    Это слово и не надо писать оО
    Последнее редактирование модератором: 2013-12-10
  9. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    Капец, да что такое :D, никак не хочет компилить...
  10. киллер_тест Пользователи

    注册日期:
    2013-11-19
    帖子:
    113
    支持:
    38
    性别:
    Репутация:
    0
    Вроде сделал ему, не знаю, так или не так
  11. TopicStarter Overlay

    Brune B L A C K    L I S T

    注册日期:
    2013-06-03
    帖子:
    507
    支持:
    171
    性别:
    Репутация:
    0
    Команда:
    Solo
    Тему можно закрыть, но не удалять, а то вдруг кому-то понадобится. Помог MrKiller
    http://joxi.ru/LgKdUtg5CbCdJ_Iz1aQ
  12. pdev Команда форума Администратор Программист Open Source Contributor

    注册日期:
    2012-09-24
    帖子:
    1,409
    支持:
    1,407
    性别:
    Репутация:
    7
    Команда:
    Indy
    Страна:
    Turkey Turkey
    точнее написал тебе очевидный код (медвежья услуга)
    --- добавлено: 3 дек 2013 в 03:00 ---
    Решенные вопросы не удаляются.
    Последнее редактирование модератором: 2013-12-10
    已获得Bruneкиллер_тест的支持.
Черновик сохранён Черновик удалён
主题状态:
主题已关闭, 停止回复.

分享此页面