1. Набираем команду codeby webinar. Набираем команду для организации и проведения вебинаров. Подробнее ...

    Скрыть объявление
  2. Требуются разработчики и тестеры для проекта codebyOS. Требования для участия в проекте: Знание принципов работы ОС на базе Linux; Знание Bash; Крайне желательное знание CPP, Python, Lua; Навыки системного администрирования. Подробнее ...

    Скрыть объявление
  3. Получи 30.000 рублей. Для получения денег необходимо принять участие в конкурсе авторов codeby. С условиями и призами можно ознакомиться на этой странице ...

    Внимание! Регистрация авторов на конкурс закрыта.

    Скрыть объявление

Прошу помочь с Tmonthcalendar

Тема в разделе "Delphi - программирование", создана пользователем Azamat, 2 апр 2007.

Статус темы:
Закрыта.
  1. Azamat

    Azamat Гость

    Репутация:
    0
    У меня есть один TMonthCalendar, и два MaskEdit1, MaskEdit2.
    Как сделать так, чтобы при первом выборе (щелчке) даты с TMonthCalendar , дата попала первому MaskEdit1. И при втором выборе (щелчке) с TMonthCalendar , дата попала второму MaskEdit2.
     
  2. Barmutik

    Barmutik Гость

    Репутация:
    0
    Хмм.. сделайте у себя в программе какой-нить флажок и по каждому OnChange календаря меняйте его .. и в соответствии с флагом заносите информацию с календаря то в один МаскЭдит то в другой...
     
  3. Azamat

    Azamat Гость

    Репутация:
    0
    а дату как переносит? если можно объясните.. Спасибо ..
     
  4. DIR3ct0r

    DIR3ct0r Гость

    Репутация:
    0
    MaskEdit.Text:= MonthCalendar.Date;
     
  5. Azamat

    Azamat Гость

    Репутация:
    0
    а второй MaskEdit2? при втором шелчке?
     
  6. Barmutik

    Barmutik Гость

    Репутация:
    0
    такое ощущение что всё очень запущено :)

    MaskEdit2.Text:= MonthCalendar.Date;
     
  7. morpheus

    morpheus скриптописец

    Репутация:
    0
    Регистрация:
    7 авг 2006
    Сообщения:
    3.915
    Симпатии:
    1
    Для: Barmutik
    а шо нам кабанам.... :) :D :D

    Для: DIR3ct0r
    да ... не этично даже както ;)
     
  8. DIR3ct0r

    DIR3ct0r Гость

    Репутация:
    0
    а ну да....
    MaskEdit.Text:= DateTimeToStr(MonthCalendar.Date);

    теперь этично! :)
     
  9. Azamat

    Azamat Гость

    Репутация:
    0
    TmonthCal есть функция MultiSelect начальное дата date а конецное дата enddate;
    теперь как определить первый щелчок или второй щелчок?
     
  10. Azamat

    Azamat Гость

    Репутация:
    0
    TmonthCal есть функция MultiSelect начальное дата date а конецное дата enddate;
    теперь как определить первый щелчок или второй щелчок?
     
  11. DIR3ct0r

    DIR3ct0r Гость

    Репутация:
    0
    var
    bFirstClick: Boolean;

    procedrue Create;
    begin
    bFirstClick:= True;
    end;

    procedure MonthCalendar.Click;
    begin
    if bFirstClick then MaskEdit1.Text:= DateTimeToStr(MonthCalendar.Data)
    else MaskEdit2.Text:= DateTimeToStr(MonthCalendar.Data);
    bFirstClick:= not bFirstClick;
    end;
     
Загрузка...
Похожие Темы - Прошу помочь Tmonthcalendar
  1. Hemenede
    Ответов:
    2
    Просмотров:
    616
  2. Skellar
    Ответов:
    10
    Просмотров:
    6.253
  3. webwareroot
    Ответов:
    2
    Просмотров:
    433
  4. Gandliar
    Ответов:
    12
    Просмотров:
    1.115
  5. virusksv
    Ответов:
    2
    Просмотров:
    1.296
Статус темы:
Закрыта.

Поделиться этой страницей