|
µ¨¸¶´ç °ø½Ä ÀºÇà°èÁ |
ÇϳªÀºÇà 227-910235-83607 |
¿¹±ÝÁÖ ÀÌ»ó±¹(¿î¿µÁø) |
|
|
|
|
|
|
|
|
|
|
°ÁÂ, ÆÁ, Á¤º¸ |
°ÁÂ, ÆÁ, Á¤º¸ ÀÔ´Ï´Ù. |
|
|
|
µ¨ÆÄÀÌ »õ´Þ·ÂÄÞÆ÷³ÍÆ® ±â´ÉÇâ»ó ¹× ¹ö±×¼öÁ¤ |
³ªºñ½º
(±ÇȲÁß)
2017-08-18 ¿ÀÀü 5:29:01
Ä«Å×°í¸®:
ÆÁ
2909ȸ Á¶È¸
µî·ÏµÈ ÆÄÀÏÀÌ ¾ø½À´Ï´Ù.
|
|
|
µ¨ÆÄÀÌ¿¡ »õ·Î Ãß°¡µÈ ´Þ·Â ÄÞÆ÷³ÍÆ®Áß.. TCalendarView, TCalendarPicker ÄÞÆ÷³ÍÆ®¿¡ ´ëÇؼ Àü¿¡ Á¦°¡ ¾ê±âÇÑ ¹ö±×¿Í ±â´ÉÀ» Á÷°üÀûÀ¸·Î ¼öÁ¤µÈ ³»¿ëÀ» ¾Ë·Áµå¸³´Ï´Ù.
TCalendarView ÀÌ ÄÞÆ÷³ÍÆ®´Â ±âÁ¸¿¡ ½Ì±Û¼±Åñâ´É½Ã ´õºíŬ¸¯ÇÏ¸é ¼±ÅÃµÈ°Ô ÇØÁ¦µË´Ï´Ù. ¾î¶»°Ô º¸¸é µÎ¹ø Ŭ¸¯ÇßÀ¸´Ï, ¼±ÅÃÇÏ°í ¼±ÅÃÇØÁ¦ ÇÏ°í ÀÌ·± µ¿ÀÛÀÌ ¸Â½À´Ï´Ù.
±×·±µ¥ ½Ç¹«¿¡ Àû¿ëÇØ º¸¸é.. ´ëºÎºÐ ÄÄÇ»Å͸¦ ¸ð¸£´Â ºÐµéÀ̳ª ±âŸ ¾÷¹«¿¡ »ç¿ëÇϽô ºÐµéÀÎ °æ¿ì ¹«Á¶°Ç ´õºíŬ¸¯À» ÇÕ´Ï´Ù. ±×·¯´Ùº¸´Ï.. ¼±ÅÃÀÌ ¾È µÈ´Ù°í Ç×ÀÇÇÏ´Â °æ¿ì°¡ Á¾Á¾ÀÖ½À´Ï´Ù. ÀÌ ÄÞÆ÷³ÍÆ®´Â ±â´Éµµ ÁÁ°í, ÀûÀýÇÑ ¾Ö´Ï¸ÞÀÌ¼Ç È¿°ú¿¡ ½Ã°¢ÀûÀ¸·Î ¶Ù¾î³ª »ç¿ëÀ» ¾ÈÇÏ¸é ¼ÕÇØÀÔ´Ï´Ù.
±×·¡¼, ´õºíŬ¸¯½Ã¿¡µµ ¼±ÅÃÀÌ À¯ÁöµÇµµ·Ï ¼öÁ¤À» ÇÏ´Â ¹æ¹ýÀ» ¾Ë·Áµå¸³´Ï´Ù. ¹°·Ð ´ÙÁß¼±Åýÿ¡´Â ±âÁ¸°ú °°½À´Ï´Ù.
¹æ¹ý. Vcl.WinXCalendars À¯´ÖÀÇ ¼Ò½º¸¦ ¿¾î¼ ¾Æ·¡ºÎºÐÀ» ¼öÁ¤ÇÏ¿© ÄÄÆÄÀÏ ÈÄ »ç¿ëÇÏ½Ã¸é µË´Ï´Ù. TCustomCalendarView ÀÇ ClickOnDate(const ADate: TDate)ÇÔ¼ö¸¦ ã¾Æ¼ ¾Æ·¡Ã³·³ ¼öÁ¤ÇÏ½Ã¸é µË´Ï´Ù. ¿ø¼Ò½º TSelectionMode.smSingle: begin if IsDateSelected(ADate) then RemoveFromSelectedDates(ADate) else begin if SelectionCount > 0 then FSelectedDates.Clear; AddToSelectedDates(ADate); end; end; ¼öÁ¤¼Ò½º TSelectionMode.smSingle: begin if not IsDateSelected(ADate) then begin if SelectionCount > 0 then FSelectedDates.Clear; AddToSelectedDates(ADate); end; end;
TCalendarPicker ÀÌ ÄÄÆ÷³ÍÆ®ÀÇ À§ÀÇ ´Þ·ÂÄÄÆ÷³ÍÆ®¸¦ ÀÌ¿ëÇؼ ³¯Â¥¸¦ ¼±ÅÃÇÒ ¼ö ÀÖµµ·Ï ÇÏ´Â ÄÞº¸¹Ú½º ÄÞÆ÷³ÍÆ®ÀÔ´Ï´Ù. Ç÷§ µðÀÚÀÎÀÌ Àû¿ëµÇ¾î ¸ð´øÇÑ UI¸¦ º¸¿©ÁÖ´Â ÄÞÆ÷³ÍÆ®·Î ½Ã°¢ÀûÀ¸·Î ±âÁ¸ ´Þ·ÂÄÞÆ÷³ÍÆ®¿Í ºñ±³ÇÒ ¼ö ¾ø½À´Ï´Ù. ±âÁ¸¿¡´Â ¹ö±×·Î Æ˾÷ À©µµ¿ìÀÇ ÆûÀ» fsStayOnTop °ªÀ¸·Î µÐ »óÅ·ΠShow Çؼ ¿ÀÇÂÇÒ °æ¿ì, ÄÞº¸»óÀÚ ¼±Åýà ³ª¿À´Â TCalendarView ÄÞÆ÷³ÍÆ®°¡ À©µµ¿ì µÚ·Î ¼û´Â ¹ö±×ÀÔ´Ï´Ù.
ÀÌ ¹ö±×·Î ÀÎÇØ °ÅÀÇ »ç¿ëÀ» ¾ÈÇÏ´Ù°¡, ½Ã°£ÀÌ ³ª¼ ¿ø¼Ò½º¸¦ º¸´Ù°¡ ¹ö±×°¡ ÀÖ´Â ºÎºÐÀ» ã¾Æ¼ ¼öÁ¤ÈÄ Å×½ºÆ®Çغ¸´Ï Á¤»óÀûÀ¸·Î µ¿ÀÛÇÔÀ» È®ÀÎÇß½À´Ï´Ù. ¹æ¹ý Vcl.WinXCalendars À¯´ÖÀÇ ¼Ò½º¸¦ ¿¾î¼ ¾Æ·¡ºÎºÐÀ» ¼öÁ¤ÇÏ¿© ÄÄÆÄÀÏ ÈÄ »ç¿ëÇÏ½Ã¸é µË´Ï´Ù. TCustomCalendarPicker Ŭ·¡½ºÀÇ Create »ý¼ºÀÚ ÇÔ¼öºÎºÐÀ» ¼öÁ¤ÇÏ½Ã¸é µË´Ï´Ù. ¿ø¼Ò½º FCalendarView := TPopupCalendarView.Create(Self); FCalendarView.TabStop := False; FCalendarView.OnChange := CalendarViewChange; FCalendarView.DisplayMode := TDisplayMode.dmMonth; FCalendarView.SelectionMode := TSelectionMode.smSingle; ¼öÁ¤¼Ò½º À§ÀÇ ¿ø¼Ò½º ´ÙÀ½Ç׸ñ¿¡ ¾Æ·¡ Ç׸ñÀ» Ãß°¡ÇϽŠÈÄ ÄÄÆÄÀÏ ÈÄ »ç¿ëÇÏ½Ã¸é µË´Ï´Ù. SetWindowPos(FCalendarView.Handle, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE or SWP_NOACTIVATE or SWP_NOOWNERZORDER);
µµ¿òÀÌ µÇ±â¸¦ ¹Ù¶ó¸é¼...
|
|
|
|
|
|
|
|
|