<?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[Schulaufgaben mit dem Borland Builder...HILFE]]></title><description><![CDATA[<p>Hallo,</p>
<p>ich mache eine Ausbildung zum kaufmännischen Assistenten für Wirtschaftsinformatik und bin mittlerweile im zweiten Ausbildungsjahr.</p>
<p>Wir arbeiten im Unterricht mit dem C++ Builder 6 und haben zwei Aufgaben erhalten, die wir lösen müssen.</p>
<p>Ich habe sie glaube ich schon zum größten Teil gelöst, die Programme wollen aber nicht so laufen, wie ich es will.</p>
<p>Ich schreibe die Aufgaben mit meinen Lösungen mal hier rein, vielleicht hat der eine oder andere ja Lust mir zu helfen, denn im Augenblick weiß ich leider nicht weiter.</p>
<p>1. Rechnerprogramm</p>
<p>Schreibe das Programm für das folgende Strukturgramm:</p>
<p>Klick dir 2 Zahlen<br />
Strukturgramm:<br />
Aufschrift Label1: „Wähle eine Rechenart“<br />
Speicherplatz „Zahl1 erzeugen“<br />
Speicherplatz „Zahl2 erzeugen“<br />
Zufallszahl1 erzeugen<br />
Zufallszahl1 in Zahl1 speichern<br />
Zufallszahl2 erzeugen<br />
Zufallszahl2 in Zahl2 speichern<br />
Zahl1 in Label2 erzeugen<br />
Zahl2 in Label3 erzeugen<br />
Beschriftung Label1 ändern<br />
Zufallszahl1 erzeugen<br />
Zufallszahl1 an Label2 übergeben<br />
Zufallszahl2 erzeugen<br />
Zufallszahl2 an Label3 übergeben</p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

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

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

void __fastcall TForm1::Label1Click(TObject *Sender)
{
Label1 -&gt; Caption=&quot;Wähle eine Rechenart&quot;;
Button1 -&gt; Caption=&quot;+&quot;;
Button1 -&gt; Caption=&quot;-&quot;;
Button1 -&gt; Caption=&quot;*&quot;;
Button1 -&gt; Caption=&quot;/&quot;;

Label2 -&gt; Caption=random(5)+1;
Label3-&gt; Caption=random(5)+1;
}

//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1+zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Addition ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1-zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Subtraktion ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1*zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Multiplikation ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1/zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Division ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button5Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
</code></pre>
<p>2. Währungsumrechnung</p>
<p>a) Nennen Sie die Objekte: ButtonStart, EditEuro und EditDollar.<br />
b) OnKlick auf ButtonStart soll von Euro in Dollar umgerechnet werden, mit einem festen Kurs von 1,12 (Variable:kurs).<br />
c) Der Dollarbetrag soll in EditDollar angezeigt werden (Format: 120,24 $).</p>
<p>Jetzt soll der Kurs veränderbar werden.<br />
d) Ein neuer Button KursAendern soll ein weiteres Editfeld (EditKurs) sichtbar machen.<br />
e) Sobald sich hier etwas ändert (und erst dann!), soll ein neues Button (ButtonKursUebernahme) erscheinen.<br />
f) Ein Klick auf dieses Button verändert den Inhalt der Variablen kurs und lässt EditKurs und ButtonKurs Uebernahme wieder verschwinden.</p>
<p>Mein Lösungsansatz:</p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

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

#include &quot;umrechner_u.h&quot;
double kurs=1.12;
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource &quot;*.dfm&quot;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ButtonStartClick(TObject *Sender)
{
EditDollar -&gt; Text= EditEuro -&gt; Text*kurs;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ButtonKursaendernClick(TObject *Sender)
{
EditKursaendern -&gt; Visible=true;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::EditKursaendernChange(TObject *Sender)
{
ButtonUebernahme -&gt; Visible=true;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ButtonUebernahmeClick(TObject *Sender)
{
kurs = StrToFloat(EditKursaendern -&gt; Text);
EditKursaendern -&gt; Visible=false;
ButtonUebernahme -&gt; Visible=false;

}
//---------------------------------------------------------------------------
</code></pre>
<p>Vielen Dank im voraus für eure Hilfe.</p>
<p><strong>&lt;edit&gt;</strong> sfds [b]&lt;/edit&gt;]</p>
]]></description><link>https://www.c-plusplus.net/forum/topic/171376/schulaufgaben-mit-dem-borland-builder-hilfe</link><generator>RSS for Node</generator><lastBuildDate>Fri, 14 Aug 2026 04:37:48 GMT</lastBuildDate><atom:link href="https://www.c-plusplus.net/forum/topic/171376.rss" rel="self" type="application/rss+xml"/><pubDate>Wed, 24 Jan 2007 20:05:03 GMT</pubDate><ttl>60</ttl><item><title><![CDATA[Reply to Schulaufgaben mit dem Borland Builder...HILFE on Wed, 24 Jan 2007 20:48:35 GMT]]></title><description><![CDATA[<p>Hallo,</p>
<p>ich mache eine Ausbildung zum kaufmännischen Assistenten für Wirtschaftsinformatik und bin mittlerweile im zweiten Ausbildungsjahr.</p>
<p>Wir arbeiten im Unterricht mit dem C++ Builder 6 und haben zwei Aufgaben erhalten, die wir lösen müssen.</p>
<p>Ich habe sie glaube ich schon zum größten Teil gelöst, die Programme wollen aber nicht so laufen, wie ich es will.</p>
<p>Ich schreibe die Aufgaben mit meinen Lösungen mal hier rein, vielleicht hat der eine oder andere ja Lust mir zu helfen, denn im Augenblick weiß ich leider nicht weiter.</p>
<p>1. Rechnerprogramm</p>
<p>Schreibe das Programm für das folgende Strukturgramm:</p>
<p>Klick dir 2 Zahlen<br />
Strukturgramm:<br />
Aufschrift Label1: „Wähle eine Rechenart“<br />
Speicherplatz „Zahl1 erzeugen“<br />
Speicherplatz „Zahl2 erzeugen“<br />
Zufallszahl1 erzeugen<br />
Zufallszahl1 in Zahl1 speichern<br />
Zufallszahl2 erzeugen<br />
Zufallszahl2 in Zahl2 speichern<br />
Zahl1 in Label2 erzeugen<br />
Zahl2 in Label3 erzeugen<br />
Beschriftung Label1 ändern<br />
Zufallszahl1 erzeugen<br />
Zufallszahl1 an Label2 übergeben<br />
Zufallszahl2 erzeugen<br />
Zufallszahl2 an Label3 übergeben</p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

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

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

void __fastcall TForm1::Label1Click(TObject *Sender)
{
Label1 -&gt; Caption=&quot;Wähle eine Rechenart&quot;;
Button1 -&gt; Caption=&quot;+&quot;;
Button1 -&gt; Caption=&quot;-&quot;;
Button1 -&gt; Caption=&quot;*&quot;;
Button1 -&gt; Caption=&quot;/&quot;;

Label2 -&gt; Caption=random(5)+1;
Label3-&gt; Caption=random(5)+1;
}

//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1+zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Addition ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1-zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Subtraktion ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1*zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Multiplikation ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int zahl1,zahl2;
String a;
zahl1 =StrToInt (Label2 -&gt; Caption);
zahl2 =StrToInt (Label3 -&gt; Caption);

a=IntToStr(zahl1/zahl2);
Label1-&gt;Caption=&quot;Das Ergebnis der Division ist&quot; +a;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button5Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
</code></pre>
<p>2. Währungsumrechnung</p>
<p>a) Nennen Sie die Objekte: ButtonStart, EditEuro und EditDollar.<br />
b) OnKlick auf ButtonStart soll von Euro in Dollar umgerechnet werden, mit einem festen Kurs von 1,12 (Variable:kurs).<br />
c) Der Dollarbetrag soll in EditDollar angezeigt werden (Format: 120,24 $).</p>
<p>Jetzt soll der Kurs veränderbar werden.<br />
d) Ein neuer Button KursAendern soll ein weiteres Editfeld (EditKurs) sichtbar machen.<br />
e) Sobald sich hier etwas ändert (und erst dann!), soll ein neues Button (ButtonKursUebernahme) erscheinen.<br />
f) Ein Klick auf dieses Button verändert den Inhalt der Variablen kurs und lässt EditKurs und ButtonKurs Uebernahme wieder verschwinden.</p>
<p>Mein Lösungsansatz:</p>
<pre><code class="language-cpp">//---------------------------------------------------------------------------

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

#include &quot;umrechner_u.h&quot;
double kurs=1.12;
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource &quot;*.dfm&quot;
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ButtonStartClick(TObject *Sender)
{
EditDollar -&gt; Text= EditEuro -&gt; Text*kurs;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::ButtonKursaendernClick(TObject *Sender)
{
EditKursaendern -&gt; Visible=true;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::EditKursaendernChange(TObject *Sender)
{
ButtonUebernahme -&gt; Visible=true;        
}
//---------------------------------------------------------------------------
void __fastcall TForm1::ButtonUebernahmeClick(TObject *Sender)
{
kurs = StrToFloat(EditKursaendern -&gt; Text);
EditKursaendern -&gt; Visible=false;
ButtonUebernahme -&gt; Visible=false;

}
//---------------------------------------------------------------------------
</code></pre>
<p>Vielen Dank im voraus für eure Hilfe.</p>
<p><strong>&lt;edit&gt;</strong> sfds [b]&lt;/edit&gt;]</p>
]]></description><link>https://www.c-plusplus.net/forum/post/1216369</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/1216369</guid><dc:creator><![CDATA[Maverick1981]]></dc:creator><pubDate>Wed, 24 Jan 2007 20:48:35 GMT</pubDate></item><item><title><![CDATA[Reply to Schulaufgaben mit dem Borland Builder...HILFE on Wed, 24 Jan 2007 20:14:20 GMT]]></title><description><![CDATA[<p>Hallo</p>
<p>- Schlechter, nicht aussagekräftiger Threadtitel<br />
- Kein Syntax-Highlithning (beim Posten im Forum der Button C/C++ links unter den Smilies) benutzt, um Code zu formatieren<br />
- Das eigentliche Problem nicht beschrieben</p>
<p>bis bald<br />
akari</p>
]]></description><link>https://www.c-plusplus.net/forum/post/1216382</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/1216382</guid><dc:creator><![CDATA[akari]]></dc:creator><pubDate>Wed, 24 Jan 2007 20:14:20 GMT</pubDate></item><item><title><![CDATA[Reply to Schulaufgaben mit dem Borland Builder...HILFE on Wed, 24 Jan 2007 20:53:05 GMT]]></title><description><![CDATA[<p>Hi</p>
<p>hab das kurz überflogen</p>
<p>das ist garantiert ein Fehler</p>
<pre><code class="language-cpp">EditDollar -&gt; Text= EditEuro -&gt; Text*kurs;
</code></pre>
<p>es muss so heißen</p>
<pre><code class="language-cpp">EditDollar -&gt; Text= FloatToStr(StrToFloat(EditEuro -&gt; Text)*kurs);
</code></pre>
<p>vllt findet jemand noch mehr Fehler <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>übrigens wenn du unter halb von Quelltext auf die Fehler klickst<br />
kommst du an die fehlerhafte Zeile.<br />
Das machst du so lange biss ohne Fehler.<br />
Kanst auch F1 drücken und kanst heraus finden was faul ist.</p>
<p>Grüsse</p>
]]></description><link>https://www.c-plusplus.net/forum/post/1216409</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/1216409</guid><dc:creator><![CDATA[steinsoft]]></dc:creator><pubDate>Wed, 24 Jan 2007 20:53:05 GMT</pubDate></item><item><title><![CDATA[Reply to Schulaufgaben mit dem Borland Builder...HILFE on Wed, 24 Jan 2007 21:17:43 GMT]]></title><description><![CDATA[<p>Programmabläufe lassen sich übrigens auch gerne mit dem <a href="http://www.junix.ch/bcb/help/debug.html" rel="nofollow">Debugger</a> nachvollziehen. Das erspart dir und uns Postings mit ewig langen Listings mit irelevantem Code und völlig undreflektierten Fehlermeldungen wie &quot;geht nicht&quot;.</p>
]]></description><link>https://www.c-plusplus.net/forum/post/1216436</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/1216436</guid><dc:creator><![CDATA[junix]]></dc:creator><pubDate>Wed, 24 Jan 2007 21:17:43 GMT</pubDate></item><item><title><![CDATA[Reply to Schulaufgaben mit dem Borland Builder...HILFE on Thu, 25 Jan 2007 09:48:33 GMT]]></title><description><![CDATA[<p>Hi,</p>
<p>1. In TForm1::Label1Click ordnest Du die vier Grundrechenarten jedesmal dem gleichen Button zu.</p>
<p>2. Praktischer wäre es in der Art:</p>
<pre><code class="language-cpp">void __fastcall TForm1::AlleButtonsClick(TObject *Sender) 
{ 
    AnsiString Rechenart[4] = {&quot;Addition&quot;, &quot;Subtraktion&quot;, &quot;Multiplikation&quot;, &quot;Division&quot;};
    int zahl1,zahl2; 
    String a; 
    zahl1 = StrToInt(Label2-&gt;Caption); 
    zahl2 = StrToInt(Label3-&gt;Caption); 

    switch(((TButton*)Sender)-&gt;Tag)    // Die Tags müssen natürlich vorher
    {                                  // in der IDE gesetzt werden.
        case 0: a = IntToStr(zahl1 + zahl2); break;
        case 1: a = IntToStr(zahl1 - zahl2); break;
        case 2: a = IntToStr(zahl1 * zahl2); break;
        case 3: a = IntToStr(zahl1 / zahl2); break;
    }

    Label1-&gt;Caption=&quot;Das Ergebnis der &quot;+Rechenart[(((TButton*)Sender)-&gt;Tag]+&quot; ist &quot; + a; 
}
</code></pre>
<p>3. Warum eigentlich Zufallszahlen??? Statt dessen 2 Edits, so daß der User eigene Zahlen eingeben kann ...</p>
<p>Umrechnung:<br />
1. Zum Eingeben des Kurses reicht eigentlich ein permanent sichtbares Editierfeld, was dann jedesmal vor der Umrechnung ausgelesen wird. Ich hoffe, Dein Lehrer hatte sich diesen Umweg ausgedacht <img
      src="https://www.c-plusplus.net/forum/plugins/nodebb-plugin-emoji/emoji/emoji-one/1f609.png?v=ab1pehoraso"
      class="not-responsive emoji emoji-emoji-one emoji--winking_face"
      title=";)"
      alt="😉"
    /></p>
<p>2. Find ich jetzt keines.</p>
<p>Viele Grüße,<br />
Christian Sonder</p>
]]></description><link>https://www.c-plusplus.net/forum/post/1216684</link><guid isPermaLink="true">https://www.c-plusplus.net/forum/post/1216684</guid><dc:creator><![CDATA[Christian Sonder]]></dc:creator><pubDate>Thu, 25 Jan 2007 09:48:33 GMT</pubDate></item></channel></rss>