Путеводитель по кафедрам факультета

@Apache812 · Регистрация: 02.12.2013

Студворк — интернет-сервис помощи студентам

Приложение должно выполнять функции путеводителя по кафедрам одного из факультетов университета :
1. схематически отображать расположение корпусов, аудиторий и кабинетов на этажах каждого корпуса с возможностью изменения масштаба изображения;
2. осуществлять поиск сведений о заданной кафедре (фамилия зав. кафедрой, количество преподавателей, количество профессоров и доцентов и др.) с отображением ее территориального расположения;
3. осуществлять редактирование базы данных (изменение сведений о кафедрах).
Разработать интерфейс приложения.

Вот что имеется на данный момент:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "CSPIN"
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
//Переход к этажам
 int a;
 a = StrToInt(CSpinEdit1->Text);
 if (a==1)
 Image1->Picture->LoadFromFile ("схема 1 этажа.jpg");
   if (a==2)
  Image1->Picture->LoadFromFile ("схема 2 этажа.jpg");
    if (a==3)
   Image1->Picture->LoadFromFile ("схема 3 этажа.jpg");
     if (a==4)
    Image1->Picture->LoadFromFile ("схема 4 этажа.jpg");
      if (a==5)
     Image1->Picture->LoadFromFile ("схема 5 этажа.jpg");
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Image1->Picture->LoadFromFile ("общая карта универа.jpg");
Button1->Visible = False;
Button2->Visible = False;
CSpinEdit1->Visible = False;
Label1->Visible = False;
SpeedButton1->Visible = True;
//Label2->Visible = True;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::SpeedButton1Click(TObject *Sender)
{
//Переход с общей карты университета на первый (второй) этаж
Image1->Picture->LoadFromFile ("схема второго этажа.jpg");
Button1->Visible = True;
Button2->Visible = True;
SpeedButton1->Visible = False;
CSpinEdit1->Visible = True;
Label1->Visible = True;
//Label2->Visible = False;
CSpinEdit1->Text = 2;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
//Возврат к общей карте университета.
Image1->Picture->LoadFromFile ("общая карта универа.jpg");
Form1->ShowHint = true;
}
//---------------------------------------------------------------------------

Проблемы возникли со 2 и 3 пунктами задачи.
Была идея, чтобы при выборе кафедры (например, по нажатии на SpeedButton на схеме одного из этажей) выходила вторая форма, на которой в Memo или StringGrid выводилась информация о выбранной кафедре. Через StringGrid1->Cells[0,0] не получилось, да и с функцией изменения и сохранения информации идей не было. Решил сделать через Memo, ноне знаю, как сие действо реализовать.

@Apache812 · 16.12.2013, 19:54 **[ТС]**

UI, это, кстати, тоже не работает.
Работа программы моментально прекращается и выводится окно с жутким сообщением.
Либо я всё таки не туда что-то пишу (что вероятнее всего), либо что-то ещё...

@demon_7 · 16.12.2013, 21:28

и так, теперь все о чем я говорил тока собранное на коленке....
Опять же взята ситуация когда заполнение мемо полей идет из файлов...и привожу алгоритм который я описывал выше...

Unit1.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "Unit2.h"
#include <memory>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
std::auto_ptr<TStringList> SL(new TStringList);
SL->LoadFromFile("1.txt");
Form2->Memo1->Text=SL->Text;
Form2->Show();
 
}
//---------------------------------------------------------------------------

Unit2.cpp

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit2.h"
#include "Unit1.h"
#include <memory>
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm2 *Form2;
int c;
//---------------------------------------------------------------------------
__fastcall TForm2::TForm2(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormCreate(TObject *Sender)
{
   c=Memo1->Text.Length();
}
//---------------------------------------------------------------------------
void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
std::auto_ptr<TStringList> SL(new TStringList);  // Создаем переменную типа StringList
if (c!=Memo1->Text.Length()) {
SL->Add(Memo1->Text);
SL->SaveToFile("1.txt")  ;
 
}
}
//---------------------------------------------------------------------------

@Apache812 · 16.12.2013, 21:42 **[ТС]**

Сообщение от demon_7

C++
1
SL->SaveToFile("1.txt")

*;

а вот этого не получится. Нюанс такой, что у нас в корпусе 6 кафедр, а обработчик события открытия файла (для каждой кафедры) и сохранения один. Я вижу тут только один выход:

C++
1
2
if  (SaveDialog1->Execute() )
Memo1->Lines-> SaveToFile (SaveDialog1->FileName) ;

Остальные (перепробовал три способа) плодов не принесли.

C++
1
2
3
if (c!=Memo1->Text.Length()) {
SL->Add(Memo1->Text);
SL->SaveToFile("1.txt")  ;

а если без StringGrid делать? У меня просто только одно единственное Memo.

@demon_7 · 16.12.2013, 21:47

я StringGrid не использовал в своем примере....
И собственно может и не понял в чем проблема 6 кафедр и 1-го обработчика, в любом случае делайте так как Вам удобнее для реализации... Просто чтоб пояснить свой алгоритм я Вам привел код, ели Вы уже решили эти проблемы другим путем то это круто =)

@Apache812 · 16.12.2013, 21:53 **[ТС]**

Сообщение от demon_7

Form2->Memo1->Text=SL->Text;

значит я просто не понял значение SL)

Проблему я решил, но мне не очень нравится это решение. Я пол дня ломаю голову, как сделать быстрое сохранение текстового файла, что бы нажал Button и текст сохранился - но увы)

@demon_7 · 16.12.2013, 21:56

используйте StringList как в моем примере... или присутствие на форме Open\SaveDialog обязательно?

@Apache812 · 16.12.2013, 21:59 **[ТС]**

А блин, это StringList был...извиняй, уже крыша слегка скатывается.
Нет, не обязательно, просто я не вижу другого варианта, что сохранять разные текстовые файлы. Пробовал присваивать имя файла в Unit1 какой-нибудь переменной и потом использовать её в Unit2, но потом понял, что это бред.

@demon_7 · 16.12.2013, 22:05

я думаю я Вам уже не раз сказал и даже привел пример в коде, про то как это сделать через StringList, что мешает попробовать сделать? есть какие то конкретные трудности?

@Apache812 · 16.12.2013, 23:26 **[ТС]**

Спасибо, товарищи, всё работает, ничего не лагает (что более важно). Благодарю)

Новые блоги и статьи Все статьи Все блоги /
Море в объективе kumehtar 06.07.2026 Хотел написать много проникновенных слов, но передумал. Оно само - говорит. Кто слышит тот слышит.	Оказывается, Unreal Engine позволяет качество на порядки выше, чем было в Lineedge Etyuhibosecyu 05.07.2026 Жаль, конечно, что я не узнал об этом, пока Lineedge существовала, а то бы Noname2331 написал, что волки превращаются в пиксельную кашу, а я бы его попросил скачать какую-нибудь бриллиантовую или Pro. . .	Doom для терминала без стрельбы и монстров. 3D Raycasting на ascii. dcc0 05.07.2026 Попросил нейронную сеть deepai. org написать рейкастинг 3D с библиотекой ncurses для Linux. Чтобы можно было ходить на стрелочки. Чтобы стены были отрисованы символами. Справилась. Первый вариант. . .	Установка статуса документа по условию Maks 05.07.2026 Алгоритм из решения ниже реализован на нетиповом документе "НарядПутевка" разработанного в КА2. Задача: в табличной части "Материалы" документа при записи автоматически устанавливать статус. . .
Сезонность и суточность закисления почв anaschu 04.07.2026 200 часов это все равно моловато. Есть ситуации, но нестандартные, когда смена происходит за 5 лет. Но обычно это 50 лет и более. Наверное, закисление почвы происходит сезонно в средней. . .	В чем ценность человеческого опыта в глобальном смысле? kumehtar 03.07.2026 Возможно, ценность человека не в том, что он однажды достигает мудрости, а в том, что он становится носителем карты пути. Он знает не только истину, но и последовательность внутренних изменений,. . .	интеграция AnyLogic с самописным REST API и переход на Odoo anaschu 03.07.2026 Успешная интеграция AnyLogic с самописным REST API и переход на промышленную Odoo WMS Сегодня проделал огромный путь от простой симуляции физических процессов до построения полноценной. . .	Поиск всех путей на ориентированном графе. Linux dcc0 02.07.2026 Переработка старого кода из моей статьи. Через несколько переработок от PHP кода к C89 (надеюсь, 89). Но довольно запутанно получилось. Код для Linux. Но если убрать time и то, что с ним. . .

@Apache812 0 / 0 / 0 Регистрация: 02.12.2013 Сообщений: 29
	16.12.2013, 19:54 [ТС]
	UI, это, кстати, тоже не работает. Работа программы моментально прекращается и выводится окно с жутким сообщением. Либо я всё таки не туда что-то пишу (что вероятнее всего), либо что-то ещё... 0

@demon_7 260 / 192 / 60 Регистрация: 12.05.2013 Сообщений: 857
	16.12.2013, 21:47
	я StringGrid не использовал в своем примере.... И собственно может и не понял в чем проблема 6 кафедр и 1-го обработчика, в любом случае делайте так как Вам удобнее для реализации... Просто чтоб пояснить свой алгоритм я Вам привел код, ели Вы уже решили эти проблемы другим путем то это круто =) 0

@demon_7 260 / 192 / 60 Регистрация: 12.05.2013 Сообщений: 857
	16.12.2013, 21:56
	используйте StringList как в моем примере... или присутствие на форме Open\SaveDialog обязательно? 0

@Apache812 0 / 0 / 0 Регистрация: 02.12.2013 Сообщений: 29
	16.12.2013, 21:59 [ТС]
	А блин, это StringList был...извиняй, уже крыша слегка скатывается. Нет, не обязательно, просто я не вижу другого варианта, что сохранять разные текстовые файлы. Пробовал присваивать имя файла в Unit1 какой-нибудь переменной и потом использовать её в Unit2, но потом понял, что это бред. 0

@demon_7 260 / 192 / 60 Регистрация: 12.05.2013 Сообщений: 857
	16.12.2013, 22:05
	я думаю я Вам уже не раз сказал и даже привел пример в коде, про то как это сделать через StringList, что мешает попробовать сделать? есть какие то конкретные трудности? 0

@Apache812 0 / 0 / 0 Регистрация: 02.12.2013 Сообщений: 29
	16.12.2013, 23:26 [ТС]
	Спасибо, товарищи, всё работает, ничего не лагает (что более важно). Благодарю) 0