Advertisement
Guest User

Untitled

a guest
Apr 22nd, 2019
77
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C++ 1.96 KB | None | 0 0
  1. // Unit1.cpp
  2. #include <vcl.h>
  3. #pragma hdrstop
  4.  
  5. #include "Unit1.h"
  6. #include "ListDeque.h"
  7. // ---------------------------------------------------------------------------
  8. #pragma package(smart_init)
  9. #pragma resource "*.dfm"
  10. TForm1* Form1;
  11.  
  12. ListDeque<int>d, d2;
  13. int x = 0, y = 0;
  14. // ---------------------------------------------------------------------------
  15. __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) {}
  16. // ---------------------------------------------------------------------------
  17. void TForm1::Redraw() {
  18.     Edit1->Text = ++x;
  19.     Edit2->Text = y;
  20.  
  21.     ListBox1->Items->Clear();
  22.     for (int i = 0; i < d.size(); i++) {
  23.         int x = d[i];
  24.         ListBox1->Items->Add(x);
  25.     }
  26.     ListBox2->Items->Clear();
  27.     for (int i = 0; i < d2.size(); i++) {
  28.         int x = d2[i];
  29.         ListBox2->Items->Add(x);
  30.     }
  31. }
  32. // ---------------------------------------------------------------------------
  33. void __fastcall TForm1::Button1Click(TObject* Sender) {
  34.     x = StrToInt(Edit1->Text);
  35.     d.push_front(x);
  36.     Redraw();
  37. }
  38. void __fastcall TForm1::Button2Click(TObject* Sender) {
  39.     x = StrToInt(Edit1->Text);
  40.     d.push_back(x);
  41.     Redraw();
  42. }
  43. void __fastcall TForm1::Button3Click(TObject* Sender) {
  44.     d.pop_front();
  45.     Redraw();
  46. }
  47. void __fastcall TForm1::Button4Click(TObject* Sender) {
  48.     d.pop_back();
  49.     Redraw();
  50. }
  51. void __fastcall TForm1::Button5Click(TObject* Sender) {
  52.     y = d.front();
  53.     Redraw();
  54. }
  55. void __fastcall TForm1::Button6Click(TObject* Sender) {
  56.     y = d.back();
  57.     Redraw();
  58. }
  59. void __fastcall TForm1::Button7Click(TObject* Sender) {
  60.     y = d.size();
  61.     Redraw();
  62. }
  63. void __fastcall TForm1::Button8Click(TObject* Sender) {
  64.     y = d.empty();
  65.     Redraw();
  66. }
  67. void __fastcall TForm1::Button9Click(TObject* Sender) {
  68.     swap(d, d2);
  69.     Redraw();
  70. }
  71. void __fastcall TForm1::Button11Click(TObject* Sender) {
  72.     y = d == d2;
  73.     Redraw();
  74. }
  75. void __fastcall TForm1::Button12Click(TObject* Sender) {
  76.     y = d != d2;
  77.     Redraw();
  78. }
  79. // ---------------------------------------------------------------------------
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement