Advertisement
Guest User

Untitled

a guest
May 5th, 2015
195
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.54 KB | None | 0 0
  1. 1 #pragma once
  2.  
  3. 2 //HeimÜbungsblatt1 Aufgabe 3 Lösung Herr Walter
  4.  
  5. 3 namespace AuszuegeAusListen {
  6.  
  7. 4 using namespace System;
  8.  
  9. 5 using namespace System::ComponentModel;
  10.  
  11. 6 using namespace System::Collections;
  12.  
  13. 7 using namespace System::Windows::Forms;
  14.  
  15. 8 using namespace System::Data;
  16.  
  17. 9 using namespace System::Drawing;
  18.  
  19. 10 public ref class Form1 : public System::Windows::Forms::Form
  20.  
  21. 11 {
  22.  
  23. 12 public:
  24.  
  25. 13 Form1(void)
  26.  
  27. 20 protected:
  28.  
  29. 21
  30.  
  31. 24 ~Form1()
  32.  
  33. 31 private: System::Windows::Forms::ListView^ lv_Person;
  34.  
  35. 32 protected:
  36.  
  37. 33 private: System::Windows::Forms::ColumnHeader^ cH_Anrede;
  38.  
  39. 34 private: System::Windows::Forms::ColumnHeader^ cH_Vorname;
  40.  
  41. 35 private: System::Windows::Forms::ColumnHeader^ cH_Nachname;
  42.  
  43. 36 private: System::Windows::Forms::ColumnHeader^ cH_Straße;
  44.  
  45. 37 private: System::Windows::Forms::ColumnHeader^ cH_PLZ;
  46.  
  47. 38 private: System::Windows::Forms::ColumnHeader^ cH_Wohnort;
  48.  
  49. 39 private: System::Windows::Forms::Button^ btn_Save;
  50.  
  51. 40 private: System::Windows::Forms::Label^ lbl_Vor;
  52.  
  53. 41 private: System::Windows::Forms::Label^ lbl_Nach;
  54.  
  55. 42 private: System::Windows::Forms::Label^ lbl_Straße;
  56.  
  57. 43 private: System::Windows::Forms::Label^ lbl_PLZ;
  58.  
  59. 44 private: System::Windows::Forms::Label^ lbl_Oet;
  60.  
  61. 45 private: System::Windows::Forms::ComboBox^ cB_Anrede;
  62.  
  63. 46 private: System::Windows::Forms::TextBox^ txtVorname;
  64.  
  65. 47 private: System::Windows::Forms::TextBox^ txtNachname;
  66.  
  67. 48 private: System::Windows::Forms::TextBox^ txtStrasse;
  68.  
  69. 49 private: System::Windows::Forms::TextBox^ txtPLZ;
  70.  
  71. 50 private: System::Windows::Forms::TextBox^ txtOrt;
  72.  
  73. 51 private: System::Windows::Forms::Button^ btn_Print;
  74.  
  75. 52 private: System::Windows::Forms::ComboBox^ cB_Auswahl;
  76.  
  77. 53 private:
  78.  
  79. 54
  80.  
  81. 57 System::ComponentModel::Container ^components;
  82.  
  83. 277
  84.  
  85. 278 //Aufgabe 3 Auszüge aus Listen
  86.  
  87. 279 private: System::Void button1_Click(System::Object^ sender, System::EventArgs^ e){//Erstellung eines
  88.  
  89. Eintrags
  90.  
  91. 280 ListViewItem ^ Person = gcnew ListViewItem(cB_Anrede->Text);
  92.  
  93. 281 Person->SubItems->Add(txtVorname->Text);
  94.  
  95. 282 Person->SubItems->Add(txtNachname->Text);
  96.  
  97. 283 Person->SubItems->Add(txtStrasse->Text);
  98.  
  99. 284 Person->SubItems->Add(txtPLZ->Text);
  100.  
  101. 285 Person->SubItems->Add(txtOrt->Text);
  102.  
  103. 286 lv_Person->Items->Add(Person); }
  104.  
  105. 287 private: System::Void button2_Click(System::Object^ sender, System::EventArgs^ e){//Ausgabe nach
  106.  
  107. Auswahl
  108.  
  109. 288 int iEintraege = lv_Person->Items->Count;
  110.  
  111. 289 lv_Person->Focus();
  112.  
  113. 290 //Schleife um nacheinander die Ausgabe durchzuführen
  114.  
  115. 291 for(int iLauf = 0;iLauf<iEintraege;iLauf++){ //Zählerschleife
  116.  
  117. 292 lv_Person->Items[iLauf]->Selected= true; //Die jeweilige Zeile auswählen
  118.  
  119. 293 if(cB_Auswahl->SelectedItem == "Frau"){ //Überprüfung nach Anrede Frau
  120.  
  121. 294 if(lv_Person->Items[iLauf]->SubItems[0]->Text == "Frau"){
  122.  
  123. 295 MessageBox::Show(cB_Auswahl->SelectedItem+" \n"+ //Anrede
  124.  
  125. 296 lv_Person->SelectedItems[iLauf]->SubItems[1]->Text+" \n"+ //Vorname
  126.  
  127. 297 lv_Person->SelectedItems[iLauf]->SubItems[2]->Text);} //Nachname
  128.  
  129. 298 }
  130.  
  131. 299 if(cB_Auswahl->SelectedItem == "Herr"){ //Überprüfung nach Anrede Herr
  132.  
  133. 300 if(lv_Person->Items[iLauf]->SubItems[0]->Text == "Herr"){//Es wird nur die Zeile mit Herr
  134.  
  135. ausgegeben.
  136.  
  137. 301 MessageBox::Show(cB_Auswahl->SelectedItem+" \n"+ //Anrede
  138.  
  139. 302 lv_Person->SelectedItems[iLauf]->SubItems[1]->Text+" \n"+ //Vorname
  140.  
  141. 303 lv_Person->SelectedItems[iLauf]->SubItems[2]->Text);} //Nachname
  142.  
  143. 304 }
  144.  
  145. 305 }
  146.  
  147. 306 MessageBox::Show("Es wurden alle passenden Einträge ausgegeben");}
  148.  
  149. 307 };
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement