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

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

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

    Azamat Гость

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

    Barmutik Гость

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

    Azamat Гость

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

    DIR3ct0r Гость

    MaskEdit.Text:= MonthCalendar.Date;
     
  5. Azamat

    Azamat Гость

    а второй MaskEdit2? при втором шелчке?
     
  6. Barmutik

    Barmutik Гость

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

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

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

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

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

    DIR3ct0r Гость

    а ну да....
    MaskEdit.Text:= DateTimeToStr(MonthCalendar.Date);

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

    Azamat Гость

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

    Azamat Гость

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

    DIR3ct0r Гость

    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
    Просмотров:
    246
  2. Skellar
    Ответов:
    10
    Просмотров:
    5.330
  3. webwareroot
    Ответов:
    1
    Просмотров:
    145
  4. Gandliar
    Ответов:
    12
    Просмотров:
    730
  5. virusksv
    Ответов:
    2
    Просмотров:
    1.199
Статус темы:
Закрыта.

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