Aufgabe 1: Girokonto-Struktur
//--------------------------------------------------------------------------- #include <vcl.h> #pragma hdrstop #include "StrukturenUnit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; // Luxusvariante struct CName {AnsiString Vorname,Nachname; }; struct CAnschrift {AnsiString PLZ,Ort,Strasse,Hausnummer; }; struct CTelefon {AnsiString Vorwahl,Telnr; }; struct CAdresse {AnsiString Anrede; CName Name,Anschrift,Telefon; }; struct CGirokonto {CAdresse Adresse; int Kontonummer; Currency Kontostand,Kreditlimit; }; // Kurzvariante struct CGirokonto1 {struct {AnsiString Anrede; struct {AnsiString Vorname,Nachname; }Name; struct {AnsiString PLZ,Ort,Strasse,Hausnummer; }Anschrift; struct {AnsiString Vorwahl,Telnr; }Telefon; }Adresse; int Kontonummer; Currency Kontostand; Currency Kreditlimit; }; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) {CGirokonto g; g.Kontonummer=468256; g.Adresse.Name.Nachname="Sparefroh"; g.Adresse.Name.Vorname="Otto"; g.Kreditlimit=10000; Memo1->Lines->Add(g.Kontonummer); Memo1->Lines->Add(g.Adresse.Name.Vorname+' '+g.Adresse.Name.Nachname); } //---------------------------------------------------------------------------