<?xml version="1.0" encoding="UTF-8"?><rss xmlns:dc="http://purl.org/dc/elements/1.1/" xmlns:content="http://purl.org/rss/1.0/modules/content/" xmlns:atom="http://www.w3.org/2005/Atom" version="2.0"><channel><title><![CDATA[Problem mit MonthCalendar]]></title><description><![CDATA[<p>Hallo Leute,<br />
ich verwende in meinem Tool ein MonthCalendar. Dieser hat ja das Ereignis OnClick. In dieses Ereignis schreibe ich jetzt meinen Code. So weit so gut...<br />
Der Code soll aber nur ausgeführt werden, wenn der Anwender auf eine Zahl klickt und nicht wenn er mit den beiden Pfeiltasten oben den Monat ändert!!!</p>
<p>Kann da jemand helfen <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f644.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--face_with_rolling_eyes"
      title=":rolling_eyes:"
      alt="🙄"
    /></p>
]]></description><link>https://www.c-plusplus.net/forum/topic/88479/problem-mit-monthcalendar</link><generator>RSS for Node</generator><lastBuildDate>Sun, 05 Jul 2026 11:00:38 GMT</lastBuildDate><atom:link href="https://www.c-plusplus.net/forum/topic/88479.rss" rel="self" type="application/rss+xml"/><pubDate>Sun, 10 Oct 2004 14:30:54 GMT</pubDate><ttl>60</ttl><item><title><![CDATA[Reply to Problem mit MonthCalendar on Sun, 10 Oct 2004 14:30:54 GMT]]></title><description><![CDATA[<p>Hallo Leute,<br />
ich verwende in meinem Tool ein MonthCalendar. Dieser hat ja das Ereignis OnClick. In dieses Ereignis schreibe ich jetzt meinen Code. So weit so gut...<br />
Der Code soll aber nur ausgeführt werden, wenn der Anwender auf eine Zahl klickt und nicht wenn er mit den beiden Pfeiltasten oben den Monat ändert!!!</p>
<p>Kann da jemand helfen <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f644.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--face_with_rolling_eyes"
      title=":rolling_eyes:"
      alt="🙄"
    /></p>
]]></description><link>https://www.c-plusplus.net/forum/post/625366</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/625366</guid><dc:creator><![CDATA[torsten_156]]></dc:creator><pubDate>Sun, 10 Oct 2004 14:30:54 GMT</pubDate></item><item><title><![CDATA[Reply to Problem mit MonthCalendar on Mon, 11 Oct 2004 10:13:24 GMT]]></title><description><![CDATA[<p>Hallo torsten</p>
<p>Ich habe mal schnell was geschriebn kannste dir hier runter ziehen ich denke mal damit ist dir geholfen .</p>
<p>MFG Praetorianer <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f603.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--grinning_face_with_big_eyes"
      title=":D"
      alt="😃"
    /> <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f603.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--grinning_face_with_big_eyes"
      title=":D"
      alt="😃"
    /></p>
<p>Hier klicken <a href="http://www.server-all.de/ip/Kalender.rar" rel="nofollow">http://www.server-all.de/ip/Kalender.rar</a></p>
]]></description><link>https://www.c-plusplus.net/forum/post/625838</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/625838</guid><dc:creator><![CDATA[Praetorianer_33]]></dc:creator><pubDate>Mon, 11 Oct 2004 10:13:24 GMT</pubDate></item><item><title><![CDATA[Reply to Problem mit MonthCalendar on Mon, 11 Oct 2004 14:50:53 GMT]]></title><description><![CDATA[<p>Hallo,<br />
das sieht ja schon ganz gut aus. Aber ohne Code hilft es mir leider nicht <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f61e.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--disappointed_face"
      title=":("
      alt="😞"
    /></p>
<p>Gruß Torsten</p>
]]></description><link>https://www.c-plusplus.net/forum/post/626114</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/626114</guid><dc:creator><![CDATA[torsten_156]]></dc:creator><pubDate>Mon, 11 Oct 2004 14:50:53 GMT</pubDate></item><item><title><![CDATA[Reply to Problem mit MonthCalendar on Mon, 11 Oct 2004 19:20:10 GMT]]></title><description><![CDATA[<p>Hallo Torsten</p>
<p>Es ist alles im Paket enthalten das C++ builder 6 Projekt und alle cpp , h und res dateien müsstest eigentlich was anfangen können. Aber hier Trotzdem der Code;</p>
<p>Code für <strong>Form1 == Unit1.cpp</strong></p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

#include &lt;vcl.h&gt;
#pragma hdrstop

#include &quot;Unit1.h&quot;
#include &quot;Unit2.h&quot;
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource &quot;*.dfm&quot;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::MonthCalendar1Click(TObject *Sender)
{
// Bei Klick anzeige in Statusbar
StatusBar1-&gt;SimpleText = &quot;Heute ist der : &quot; +MonthCalendar1-&gt;Date;
// Öffnen von Form 2
Form2-&gt;Show();
// Anzeigen Nochmals in Form 2 extra Fenster
Form2-&gt;Label2-&gt;Caption = Form1-&gt;MonthCalendar1-&gt;Date;

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
// Button Klick schließt Programm
Application-&gt;Terminate();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
/7 Verschieben des Fensterrs in Style None ohne Rahmen bei Linksmausklick
  ReleaseCapture();
  SendMessage(Form1-&gt;Handle, WM_SYSCOMMAND, SC_MOVE + HTCAPTION, 0);
}
//---------------------------------------------------------------------------
</code></pre>
<p>Code <strong>Unit1.h</strong></p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

#ifndef Unit1H
#define Unit1H
//---------------------------------------------------------------------------
#include &lt;Classes.hpp&gt;
#include &lt;Controls.hpp&gt;
#include &lt;StdCtrls.hpp&gt;
#include &lt;Forms.hpp&gt;
#include &lt;ComCtrls.hpp&gt;
//---------------------------------------------------------------------------
class TForm1 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
        TMonthCalendar *MonthCalendar1;
        TStatusBar *StatusBar1;
        TButton *Button1;
        void __fastcall MonthCalendar1Click(TObject *Sender);
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
private:	// Anwender-Deklarationen
public:		// Anwender-Deklarationen
        __fastcall TForm1(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//---------------------------------------------------------------------------
#endif
</code></pre>
<p>Code <strong>Form2 == Unit2.cpp</strong></p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

#include &lt;vcl.h&gt;
#pragma hdrstop

#include &quot;Unit2.h&quot;
#include &quot;Unit1.h&quot;
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource &quot;*.dfm&quot;
TForm2 *Form2;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::Button1Click(TObject *Sender)
{
// Buttonclick schließt Formular 2
Form2-&gt;Close();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormMouseDown(TObject *Sender, TMouseButton Button,
      TShiftState Shift, int X, int Y)
{
// Wie Form bei Mousklick Form 1
  ReleaseCapture();
  SendMessage(Form2-&gt;Handle, WM_SYSCOMMAND, SC_MOVE + HTCAPTION, 0);
}
//---------------------------------------------------------------------------
</code></pre>
<p>Code <strong>Unit2.h</strong></p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

#ifndef Unit2H
#define Unit2H
//---------------------------------------------------------------------------
#include &lt;Classes.hpp&gt;
#include &lt;Controls.hpp&gt;
#include &lt;StdCtrls.hpp&gt;
#include &lt;Forms.hpp&gt;
//---------------------------------------------------------------------------
class TForm2 : public TForm
{
__published:	// Von der IDE verwaltete Komponenten
        TLabel *Label1;
        TLabel *Label2;
        TButton *Button1;
        void __fastcall Button1Click(TObject *Sender);
        void __fastcall FormMouseDown(TObject *Sender, TMouseButton Button,
          TShiftState Shift, int X, int Y);
private:	// Anwender-Deklarationen
public:		// Anwender-Deklarationen
        __fastcall TForm2(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TForm2 *Form2;
//---------------------------------------------------------------------------
#endif
</code></pre>
]]></description><link>https://www.c-plusplus.net/forum/post/626398</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/626398</guid><dc:creator><![CDATA[Praetorianer_33]]></dc:creator><pubDate>Mon, 11 Oct 2004 19:20:10 GMT</pubDate></item><item><title><![CDATA[Reply to Problem mit MonthCalendar on Mon, 11 Oct 2004 20:20:52 GMT]]></title><description><![CDATA[<p>Hallo,<br />
als ich mir den .rar-File runtergeladen habe und anschl. entpackt hab, konnte ich nur eine .exe finden.<br />
Habe mir das Package nochmals runtergeladen und entpackt. Siehe da, alles vorhanden. Ich werde mich morgen mal damit befassen <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f642.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--slightly_smiling_face"
      title=":)"
      alt="🙂"
    /></p>
<p>DANKE für Deine Mühe...</p>
<p>Gruß Torsten</p>
]]></description><link>https://www.c-plusplus.net/forum/post/626453</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/626453</guid><dc:creator><![CDATA[torsten_156]]></dc:creator><pubDate>Mon, 11 Oct 2004 20:20:52 GMT</pubDate></item></channel></rss>