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

Открытие первой формы по нажатию

本贴由 bradis 于 2015-11-10 发布. 版块名称: Delphi

  1. TopicStarter Overlay
    bradis

    bradis Пользователи

    帖子:
    302
    支持:
    33
    性别:
    男
    Репутация:
    0
    Команда:
    VioTeam
    Всем доброго времени суток, задался вопросом следующего типажа:
    имеются 2 формы
    FORM1 = настройка сети(пингование и т.д.)
    FORM2 = основное окно с чего все начинается
    Так вот,
    1)как сделать чтобы при открытии: Файл-Настройка сети, у меня закрывалось форма2 и открывалась форма 1 и наоборот(при нажатии на батоне формы 1 закрывается первая форма и открывается 2-я)
    2) Кто сможет помочь чтобы при нажатии на batton запускался .exe файл, который мы укажем из настроек?(если же на файл не указа путь будет выдавать ошибку)?
    ссылка на картинку: http://hkar.ru/EPuK
    bradis, 2015-11-10
    #1
  2. JoLan

    JoLan Команда форума Администратор AngeliCore Программист

    帖子:
    1,061
    支持:
    948
    性别:
    男
    Репутация:
    6
    Команда:
    AngeliCore
    Страна:
    Russian Federation Russian Federation
    1) В форме 2 после Implementation надо вписать
    代码:
    uses Unit1;
    Затем в событии OnClick:
    代码:
    Form1.Show;
    С первой формой аналогично.

    2)
    代码:
    uses ShellApi;
...
ShellExecute(0, nil, 'путь к файлу', nil, nil, SW_NORMAL);
    Проверка существования файла
    代码:
    FileExists()
    JoLan, 2015-11-10
    #2
    已获得bradis的支持.
  3. TopicStarter Overlay
    bradis

    bradis Пользователи

    帖子:
    302
    支持:
    33
    性别:
    男
    Репутация:
    0
    Команда:
    VioTeam
    вот тут мне не ясно, куда ShellExecute я должен вставить на батон? (и где проверка на то,что он действительно считывает из opendialog?)
    bradis, 2015-11-10
    #3
  4. JoLan

    JoLan Команда форума Администратор AngeliCore Программист

    帖子:
    1,061
    支持:
    948
    性别:
    男
    Репутация:
    6
    Команда:
    AngeliCore
    Страна:
    Russian Federation Russian Federation
    Всё в то же событие OnClick.

    JoLan, 2015-11-10
    #4
  5. TopicStarter Overlay
    bradis

    bradis Пользователи

    帖子:
    302
    支持:
    33
    性别:
    男
    Репутация:
    0
    Команда:
    VioTeam
    мб я туплю но смотри проблема вот в чем сейчас, я выбрал файл и рядом в поле memo путь до файла не хочет вписываться,после того как файл жмякнул(чтобы быть уверенным чтобы я точно тот файл выбрал) как это исправить?
    upload_2015-11-10_12-32-15.png

    附件文件:

    Последнее редактирование: 2015-11-10
    bradis, 2015-11-10
    #5
  6. JoLan

    JoLan Команда форума Администратор AngeliCore Программист

    帖子:
    1,061
    支持:
    948
    性别:
    男
    Репутация:
    6
    Команда:
    AngeliCore
    Страна:
    Russian Federation Russian Federation
    Memo1.Lines.Add(OpenDialog1.Filename), а методы и свойства класса вообще читал?
    JoLan, 2015-11-10
    #6
  7. TopicStarter Overlay
    bradis

    bradis Пользователи

    帖子:
    302
    支持:
    33
    性别:
    男
    Репутация:
    0
    Команда:
    VioTeam
    неа, да я с делфи только азы знаю как батон разместить и изменить названия.
    но плин припечатало в курсовой сделат ьисходник(
    bradis, 2015-11-10
    #7
Черновик сохранён Черновик удалён
Similar Threads
  1. Botchal

    preg_match проверка формы

    Botchal, 2010-06-17, 所属版块: PHP
    回复:
    1
    浏览:
    1,309
    Fedcomp
    2010-06-23
  2. xamster

    Открытие карты

    xamster, 2013-02-26, 所属版块: Архив
    回复:
    3
    浏览:
    1,407
    exclementos
    2013-02-26
  3. Lockid

    Открытие порта для ЛК

    Lockid, 2014-09-14, 所属版块: Архив
    回复:
    3
    浏览:
    1,399
    pilad
    2014-09-14
  4. on746

    Открытие портов

    on746, 2015-03-04, 所属版块: Общее
    回复:
    22
    浏览:
    9,155
    genby2012
    2015-08-18
  5. vladick322

    1.5.1 (101) Открытие портов.

    vladick322, 2015-05-09, 所属版块: PW Вопросник
    回复:
    2
    浏览:
    997
    SunSoftware
    2015-05-11
正在加载...

分享此页面