Не переключается картинка после отбора данных в ComboBox С++ Builder

@Evgeny92 · Регистрация: 09.11.2011

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

Появилась проблема - одна.
В программе после отбора по жанрам потом открываю по каком-то фильму описание, и там по DBNavigator щелкаю вперед или назад, картинка не переключается, а переключается только текст. Если не отбирать данные перещелкивание картинки работает вместе с текстом.

The_Immortal · 06.05.2013, 02:26

Evgeny92,

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

Все сделал

Верните сериалы - я настаиваю

Кстати, хотел узнать вот что: вам кто-нибудь "Базы данных" читал? Складывается впечатление, что нет.
Следов процесса проектирования БД не наблюдается.

@Evgeny92 · 06.05.2013, 02:33 **[ТС]**

Пока время есть до защиты.
1)Думаю добавить в проект Расписание сеансов, Время проката фильмов в виде таблиц будет 3-й и 4-й вкладке.
(Возможно откажусь).
2)Что то вроде кассы, бронирование мест, отчет(печать билетов, билеты оформленные). Это будет сложно сделать возможно откажусь, видеть бы примеры.
Заходил в кинотеатр известно мне расположение мест в зале 8 рядов 8 ряд диваны Vip. 16 мест. 1-7 ряд по 21 месту вроде.
От всего наверное откажусь.

Добавлено через 3 минуты

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

Evgeny92,

Верните сериалы - я настаиваю

Кстати, хотел узнать вот что: вам кто-нибудь "Базы данных" читал? Складывается впечатление, что нет.
Следов процесса проектирования БД не наблюдается.

Ну сделаю, только путем добавления несколько форм и компонентов. По другому никак не пойму.

The_Immortal · 06.05.2013, 02:35

Evgeny92,

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

бронирование мест

В таком случае предлагаю сделать что-то типа такого:

@Evgeny92 · 06.05.2013, 11:33 **[ТС]**

И так, пишу то что я пока не понимаю как мне это сделать...

Добавлено через 28 минут
Создавал проект, начинал переделывать. Пишу условно, помню как делал. Программы нет переделанной.

Формы и компоненты:

Form1 (Программа Kinoteatr)
Размещены компоненты Button1(Фильмы), Button2(Сериалы), Edit1(Поле поиска по названиям фильма или сериалов), ComboBox1(По жанрам), ComboBox2(По странам), ComboBox3(По годам), Button3(Найти), DBGrid1, DBNavigator1, Button4(Добавить запись), Button5(Изменить запись), Button6(Удалить запись), Button7(Описание).

DataModule2 размещены компоненты DataSourse1, DataSourse2, ADOConnection1, ADOTable1, ADOTable2, ADOQurery1, ADOQurery2.

Form3(Добавление записи в БД Фильмы)

Размещены компоненты Edit1,2,3,4,5,6,7 Memo1,2 Label1 до 9 Image1, Button1(Добавить запись и закрыть), Button2(Добавить запись), Button3(Закрыть), Button4(Загрузить постер),

Ну пока имеется отношение по этим 2-м формам.

Я писал на кнопках Button1 (Фильмы) и Button2(Сериалы). DBGrid1 установил в инспекторе объектов связь с первой таблицей(Фильмы). Далее прописываю на кнопках:

Button1. При нажатии кнопки в DBGrid1 меняется связь с таблицей Фильмы, Меняется в поле название с Названия сериала на Название фильма.

C++
1
2
3
4
5
6
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DBGrid1->DataSource = DataModule2->DataSource1;
DBGrid1->Columns->Items[0]->Title->Caption = "Название фильма";
 
}

Button2. При нажатии кнопки в DBGrid1 меняется связь с таблицей Сериалы, Меняется в поле название с Названия фильма на Название сериала.

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button1Click(TObject *Sender)
{
DBGrid1->DataSource = DataModule2->DataSource2;
DBGrid1->Columns->Items[0]->Title->Caption = "Название сериала";
// это не все еще было прописано. Прописано было еще
// на то чтобы при нажатии кнопки сериалы менялись названия свойством Caption Label'ов, Button'ов, 
// Form3(Добавление записи в БД Сериалы). 
}

Далее пишу...

Добавлено через 16 минут
Код в Добавить запись и закрыть
На Дата сет по таблице Фильмы.

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
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
void __fastcall TForm3::Button3Click(TObject *Sender)
{
if (Edit1->Text=="")
{
ShowMessage("Введите данные Название фильма!");
return;
}
else if (Edit2->Text=="")
{
ShowMessage("Введите данные Жанры!");
return;
}
else if (Edit3->Text=="")
{
ShowMessage("Введите данные Страна!");
return;
}
else if (Edit4->Text=="")
{
ShowMessage("Введите данные Год выхода!");
return;
}
else if (Edit5->Text=="")
{
ShowMessage("Введите данные Режиссер!");
return;
}
else if (Edit6->Text=="")
{
ShowMessage("Введите данные Время!");
return;
}
else if (Memo1->Text=="")
{
ShowMessage("Введите данные В ролях!");
return;
}
else if (Memo2->Text=="")
{
ShowMessage("Введите данные Сюжет!");
return;
}
else if (Edit7->Text=="")
{
ShowMessage("Введите данные Трейлер!");
return;
}
else if(Image1->Picture->Graphic==NULL)
{
ShowMessage("Вставьте Обложку фильма");
return;
}
 
DataModule2->ADOTable1->Insert();
DataModule2->ADOTable1->FieldByName("Название фильма")->AsString = Form3->Edit1->Text;
DataModule2->ADOTable1->FieldByName("Жанры")->AsString = Form3->Edit2->Text;
DataModule2->ADOTable1->FieldByName("Страна")->AsString = Form3->Edit3->Text;
DataModule2->ADOTable1->FieldByName("Год выхода")->AsString = Form3->Edit4->Text;
DataModule2->ADOTable1->FieldByName("Режиссер")->AsString = Form3->Edit5->Text;
DataModule2->ADOTable1->FieldByName("Время")->AsString = Form3->Edit6->Text;
DataModule2->ADOTable1->FieldByName("В ролях")->AsString = Form3->Memo1->Text;
DataModule2->ADOTable1->FieldByName("Сюжет")->AsString = Form3->Memo2->Text;
DataModule2->ADOTable1->FieldByName("Трейлер")->AsString = Form3->Edit7->Text;
 
TMemoryStream* strm = new TMemoryStream();
Image1->Picture->Graphic->SaveToStream(strm);
((TGraphicField*)DataModule2->ADOTable1->FieldByName("Постер фильма"))->LoadFromStream(strm);
 delete strm;
 strm = NULL;
 
DataModule2->ADOTable1->Post();
 
 Form3->Hide();   //Закрыть форму Добавление записи в БД Фильмы
 
//Очистить текст в полях
Edit1->Clear();
Edit2->Clear();
Edit3->Clear();
Edit4->Clear();
Edit5->Clear();
Edit6->Clear();
Memo1->Clear();
Memo2->Clear();
Edit7->Clear();
Image1->Picture->Graphic=NULL;
        
}

Вот тут вопрос. Как прописать и для второй таблице. Ну она также прописывается, поменять только с ADOTable1 на ADOTable2, и там Названия поменять полей. Вот как тут на на кнопке Добавлении записи в зависимости подключенной таблицы, при нажатии этой кнопке добавлял в свою таблицу. Т.е. нужна смена ADOTable1 на ADOTable2(При нажатии кнопки Сериалы) или наоборот c ADOTable2 на ADOTable1(при нажатии кнопки Фильмы).
Нужно по ходу прописывать на Button1(Фильмы) и Button2(Сериалы).

Также нужно сделать и в первой форме Form1(программа Kinoteatr) для компонентов BUtton3(Найти), ComboBox1-3 в зависимости подключенной Таблицы кнопками Button1(Фильмы) и Button2(Сериалы).

Коды на них
Button3(Найти)

C++
1
2
3
4
5
DataModule2->DataSource1->DataSet = DataModule2->ADOQuery1;
    DataModule2->ADOQuery1->Close();
   DataModule2->ADOQuery1->SQL->Clear();
    DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы WHERE  [Название фильма] LIKE '%"+Edit1->Text+"%'");
    DataModule2->ADOQuery1->Open();

Здесь тоже нужно переключение c ADOQuery1 на ADOQuery2 или наоборот в зависимости от подключенной таблицы.

Один из ComboBox'ов. Тоже самое.
ComboBox1

C++
1
2
3
4
5
6
7
8
9
10
11
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
DataModule2->DataSource1->DataSet = DataModule2->ADOQuery1;
    DataModule2->ADOQuery1->Close();
    DataModule2->ADOQuery1->SQL->Clear();
    if(ComboBox1->ItemIndex == 0)
      DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы");
    else
      DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы WHERE  Жанры LIKE '%"+ComboBox1->Text+"%'");
    DataModule2->ADOQuery1->Open();        
}

Добавлено через 9 минут
На кнопку удалить запись (Button6)

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::Button6Click(TObject *Sender)
{
if (DataModule2->ADOTable1->RecordCount==0)
{
ShowMessage("Нечего удалять, нет записи");
}
else
{
DataModule2->ADOTable1->Delete();
}
 
}

Здесь тоже самое надо, при нажатии Фильмы удаление происходит по ADOTable1 при нажатии Сериалы удаление по ADOTable2.
Может сделать удаление с подтверждением типа "Вы действительно хотите удалить данную запись" и варианты ДА и Отмена. Как это сделать?

И вот по моему все пока.

Добавлено через 8 минут
Еще у меня 2-е формы одна Form4 Изменить запись вторая описание FOrm5.
про изменение запси вопросов не будет, т.к. из Добавление запсиси возьму.
А по Form5, будут вопросы. И еще 1 вопрос будет по FOrm1.

@Evgeny92 · 06.05.2013, 12:18 **[ТС]**

проект

@Evgeny92 · 06.05.2013, 12:48 **[ТС]**

Вот забыл дописать код на удаление.
проект: В проекте По другому компоненты подписаны. Т.е. Кнопки Фильмы не Button1 а Button* под другим номером, и т.д.

@Evgeny92 · 06.05.2013, 22:42 **[ТС]**

Кнопка фильмы

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
void __fastcall TForm1::Button5Click(TObject *Sender)
{
DBGrid1->DataSource = DataModule2->DataSource1;
DBGrid1->Columns->Items[1]->Title->Caption = "Название фильма";
Label1->Caption = "Поиск фильма";
Label2->Caption = "Выбрать жанр фильма";
Label3->Caption = "Выбрать страну фильма";
Label4->Caption = "Выбрать год выхода фильма";
 
Form3->Caption = "Добавление записи в БД Фильмы";
Form3->Label1->Caption = "Название фильма";
Form3->Label8->Caption = "Сюжет фильма";
Form3->Button2->Caption = "Загрузить постер фильма";
 
Form4->Caption = "Добавление записи в БД Фильмы";
Form4->Label1->Caption = "Название фильма";
Form4->Label8->Caption = "Сюжет фильма";
Form4->Button2->Caption = "Загрузить постер фильма";
 
Form5->Caption = "О фильме";
Form5->Label7->Caption = "Сюжет фильма";
 
}

----------------------------------------------------------------------------------------
Кнопка сериалы

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
void __fastcall TForm1::Button6Click(TObject *Sender)
{
DBGrid1->DataSource = DataModule2->DataSource2;
DBGrid1->Columns->Items[1]->Title->Caption = "Название сериала";
Label1->Caption = "Поиск сериала";
Label2->Caption = "Выбрать жанр сериала";
Label3->Caption = "Выбрать страну сериала";
Label4->Caption = "Выбрать год выхода сериала";
 
Form3->Caption = "Добавление записи в БД Сериалы";
Form3->Label1->Caption = "Название сериала";
Form3->Label8->Caption = "Сюжет сериала";
Form3->Button2->Caption = "Загрузить постер сериала";
 
Form4->Caption = "Добавление записи в БД Сериалы";
Form4->Label1->Caption = "Название сериала";
Form4->Label8->Caption = "Сюжет сериала";
Form4->Button4->Caption = "Загрузить постер сериала";
 
Form5->Caption = "О сериале";
Form5->Label7->Caption = "Сюжет сериала";
}

-------------------------------------------------------------------------------
Поле поиска фильма или сериала(без сериала). Нужно сделать, если нажал на Фильмы будет искать фильмы, если на Сериалы будет искать сериалы.

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Edit1Change(TObject *Sender)
{
DataModule2->DataSource1->DataSet = DataModule2->ADOQuery1;
    DataModule2->ADOQuery1->Close();
   DataModule2->ADOQuery1->SQL->Clear();
    DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы WHERE  [Название фильма] LIKE '%"+Edit1->Text+"%'");
    DataModule2->ADOQuery1->Open();        
}

--------------------------------------------------------------------------------
Выпадающий список по жанрам фильмы. Тоже самое нужно так сделать.
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{
DataModule2->DataSource1->DataSet = DataModule2->ADOQuery1;
DataModule2->ADOQuery1->Close();
DataModule2->ADOQuery1->SQL->Clear();
if(ComboBox1->ItemIndex == 0)
DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы");
else
DataModule2->ADOQuery1->SQL->Add("Select * from Фильмы WHERE Жанры LIKE '%"+ComboBox1->Text+"%'");
DataModule2->ADOQuery1->Open();
}
[/CPP]
----------------------------------------------------------------------------------
Кнопка Удалить запись. Тоже самое нужно реализовать.

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::Button3Click(TObject *Sender)
{
if (DataModule2->ADOTable1->RecordCount==0)
{
ShowMessage("Нечего удалять, нет записи");
}
else
{
DataModule2->ADOTable1->Delete();
}
 
}

----------------------------------------------------------------------------------------------

На DBGrid1

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
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
void __fastcall TForm1::DBGrid1CellClick(TColumn *Column)
{
AnsiString wsg = DataModule2->ADOTable1->FieldByName( "Трейлер" )
        ->AsString; // Из поле Трейлер будет открываться ссылка на веб страницу
    wsg = wsg.SubString( wsg.Pos( "#" ) + 1, wsg.Length( ) );
    wsg = wsg.Delete( wsg.Pos( "#" ), 1 );
    Form5->CppWebBrowser1->Navigate(WideString(wsg) ) ;  //На форме О фильме Отображает веб страницу с трейлером.
 
  if ( Form1->DBGrid1->DataSource->DataSet == DataModule2->ADOTable1 )
    {
        Browser( DataModule2->ADOTable1 );
    }
    if ( Form1->DBGrid1->DataSource->DataSet == DataModule2->ADOQuery1 )
    {
        Browser( DataModule2->ADOQuery1 );
    }
 //---------------------------------------------------------------------------
if ( !( TBlobField * )DataModule2->ADOTable1->FieldByName( "Постер фильма" )
        ->IsNull && Form1->DBGrid1->DataSource->DataSet ==
        DataModule2->ADOTable1 )
    {
        if ( !Form5->Image1->Visible )
        {
            Form5->Image1->Visible = true;
        }
        TMemoryStream * strm = new TMemoryStream;
        TJPEGImage * ptJpg = new TJPEGImage;
        ( ( TGraphicField * )DataModule2->ADOTable1->FieldByName
            ( "Постер фильма" ) )->SaveToStream( strm );
        strm->Seek( 0, 0 );
        if ( *( Word * )strm->Memory == 0xD8FF )
        {
            Form5->Image1->Picture->Graphic = ptJpg;
        }
        Form5->Image1->Picture->Graphic->LoadFromStream( strm );
        delete strm;
        delete ptJpg;
    }
    else
        if ( !( TBlobField * )DataModule2->ADOQuery1->FieldByName
            ( "Постер фильма" )
            ->IsNull && Form1->DBGrid1->DataSource->DataSet ==
            DataModule2->ADOQuery1 )
        {
            if ( !Form5->Image1->Visible )
            {
                Form5->Image1->Visible = true;
            }
            TMemoryStream * strm = new TMemoryStream;
            TJPEGImage * ptJpg = new TJPEGImage;
            ( ( TGraphicField * )DataModule2->ADOQuery1->FieldByName
                ( "Постер фильма" ) )->SaveToStream( strm );
            strm->Seek( 0, 0 );
            if ( *( Word * )strm->Memory == 0xD8FF )
            {
                Form5->Image1->Picture->Graphic = ptJpg;
            }
            Form5->Image1->Picture->Graphic->LoadFromStream( strm );
            delete strm;
            delete ptJpg;
        }
        else
        {
            Form5->Image1->Visible = false;
        }
//---------------------------------------------------------------------------
 
      if ( !( TBlobField * )DataModule2->ADOTable1->FieldByName( "Постер фильма" )
        ->IsNull && Form1->DBGrid1->DataSource->DataSet ==
        DataModule2->ADOTable1 )
    {
        if ( !Form4->Image1->Visible )
        {
            Form4->Image1->Visible = true;
        }
        TMemoryStream * strm = new TMemoryStream;
        TJPEGImage * ptJpg = new TJPEGImage;
        ( ( TGraphicField * )DataModule2->ADOTable1->FieldByName
            ( "Постер фильма" ) )->SaveToStream( strm );
        strm->Seek( 0, 0 );
        if ( *( Word * )strm->Memory == 0xD8FF )
        {
            Form4->Image1->Picture->Graphic = ptJpg;
        }
        Form4->Image1->Picture->Graphic->LoadFromStream( strm );
        delete strm;
        delete ptJpg;
    }
    else
        if ( !( TBlobField * )DataModule2->ADOQuery1->FieldByName
            ( "Постер фильма" )
            ->IsNull && Form1->DBGrid1->DataSource->DataSet ==
            DataModule2->ADOQuery1 )
        {
            if ( !Form4->Image1->Visible )
            {
                Form4->Image1->Visible = true;
            }
            TMemoryStream * strm = new TMemoryStream;
            TJPEGImage * ptJpg = new TJPEGImage;
            ( ( TGraphicField * )DataModule2->ADOQuery1->FieldByName
                ( "Постер фильма" ) )->SaveToStream( strm );
            strm->Seek( 0, 0 );
            if ( *( Word * )strm->Memory == 0xD8FF )
            {
                Form4->Image1->Picture->Graphic = ptJpg;
            }
            Form4->Image1->Picture->Graphic->LoadFromStream( strm );
            delete strm;
            delete ptJpg;
        }
        else
        {
            Form4->Image1->Visible = false;
        }
 
}

------------------------------------------------------------------------------------

Кнопка добавить запись в другом окне Form3.

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
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
void __fastcall TForm3::Button3Click(TObject *Sender)
{
if (Edit1->Text=="")
{
ShowMessage("Введите данные Название фильма!");
return;
}
else if (Edit2->Text=="")
{
ShowMessage("Введите данные Жанры!");
return;
}
else if (Edit3->Text=="")
{
ShowMessage("Введите данные Страна!");
return;
}
else if (Edit4->Text=="")
{
ShowMessage("Введите данные Год выхода!");
return;
}
else if (Edit5->Text=="")
{
ShowMessage("Введите данные Режиссер!");
return;
}
else if (Edit6->Text=="")
{
ShowMessage("Введите данные Время!");
return;
}
else if (Memo1->Text=="")
{
ShowMessage("Введите данные В ролях!");
return;
}
else if (Memo2->Text=="")
{
ShowMessage("Введите данные Сюжет!");
return;
}
else if (Edit7->Text=="")
{
ShowMessage("Введите данные Трейлер!");
return;
}
else if(Image1->Picture->Graphic==NULL)
{
ShowMessage("Вставьте Обложку фильма");
return;
}
 
DataModule2->ADOTable1->Insert();
DataModule2->ADOTable1->FieldByName("Название фильма")->AsString = Form3->Edit1->Text;
DataModule2->ADOTable1->FieldByName("Жанры")->AsString = Form3->Edit2->Text;
DataModule2->ADOTable1->FieldByName("Страна")->AsString = Form3->Edit3->Text;
DataModule2->ADOTable1->FieldByName("Год выхода")->AsString = Form3->Edit4->Text;
DataModule2->ADOTable1->FieldByName("Режиссер")->AsString = Form3->Edit5->Text;
DataModule2->ADOTable1->FieldByName("Время")->AsString = Form3->Edit6->Text;
DataModule2->ADOTable1->FieldByName("В ролях")->AsString = Form3->Memo1->Text;
DataModule2->ADOTable1->FieldByName("Сюжет")->AsString = Form3->Memo2->Text;
DataModule2->ADOTable1->FieldByName("Трейлер")->AsString = Form3->Edit7->Text;
 
TMemoryStream* strm = new TMemoryStream();
Image1->Picture->Graphic->SaveToStream(strm);
((TGraphicField*)DataModule2->ADOTable1->FieldByName("Постер фильма"))->LoadFromStream(strm);
 delete strm;
 strm = NULL;
 
DataModule2->ADOTable1->Post();
 
 Form3->Hide();   //Закрыть форму Добавление записи в БД Фильмы
 
//Очистить текст в полях
Edit1->Clear();
Edit2->Clear();
Edit3->Clear();
Edit4->Clear();
Edit5->Clear();
Edit6->Clear();
Memo1->Clear();
Memo2->Clear();
Edit7->Clear();
Image1->Picture->Graphic=NULL;
        
}

Добавлено через 3 минуты
Т.е. то что я сделал в проекте это Фильмы. без сериалов. На форму добавил 2-е кнопки. Таблица переключается. Но отбор и поиск и добаление удаление производится по таблице Фильмы. без сериалов.

Добавлено через 1 час 45 минут
Наверное придется продублировать компоненты для другой таблицы. КомбоБоксы, Идит, ДБГрид и много чего... Также как делал бардак в том проекте. Или сериалов не будет.

Добавлено через 4 часа 26 минут
Значит мне сериалы не надо.
Оставлю только фильмы.
Вообще эту программу взял из курсового. На курсовом не было добавления, изменения и удаления, описание. Руководитель говорил что норм программа для дипломки пойдет, только его усовершенствовать необходимо, функционала по больше. И вот дополнение к программе по последней ссылке.

Новые блоги и статьи Все статьи Все блоги /
FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .