Как перенести код Unit1 в Unit2?

@Сергей 190 · Регистрация: 18.03.2015

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

Здравствуйте господа профессионалы!
Написал на Builder 6 программу для общения чрез COM порт.
Все работает. Теперь, чтобы навести порядок и дальше не запутаться, некоторые функции нужно из Unit1 перенести в другой Unit.
На форме есть Button: «открыть порт» и «закрыть порт». Есть ComboBox «Выбрать номер порта».

Читал Архангельского. Читал на форуме похожие темы. Ничего не получается.

Подскажите, пожалуйста, чайнику:

1- как оставив Button и ComboBox в первой форме перенести функции их обработки в Unit2?

2- Возможно ли ф-ю «void __fastcall TForm1::ComboBox1Change(TObject *Sender) //Выбрать номер порта» написать «красивее»?

3- Почему порты COM1 – COM9 открываются, а выше COM10 – нет?

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
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
// ...
 char* pcComPort= "COM9 ";
 HANDLE hCom;
 DWORD  b;
 OVERLAPPED   ov;
 int TIMEOUT = 1000;
 int baudrate=115200; //9600, 14400, 19200,38400, 57600, 115200
 DWORD bytesRead = 0;
 
// ...
 
void __fastcall TForm1::Button1Click(TObject *Sender)       //открыть порт
{    
hCom =CreateFile(pcComPort,GENERIC_READ | GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 
    if(hCom == (HANDLE)-1) {
        hCom = 0;
            ShowMessage("Ошибка открытия порта");
    }
        else{
        ShowMessage("Порт открыт");
        }
    SetCommMask(hCom, EV_RXCHAR);
    SetupComm(hCom, 1500, 1500);
    COMMTIMEOUTS CommTimeOuts;
    CommTimeOuts.ReadIntervalTimeout = 0xFFFFFFFF;
    CommTimeOuts.ReadTotalTimeoutMultiplier = 0;
    CommTimeOuts.ReadTotalTimeoutConstant = TIMEOUT;
    CommTimeOuts.WriteTotalTimeoutMultiplier = 0;
    CommTimeOuts.WriteTotalTimeoutConstant = TIMEOUT;
 
    if(!SetCommTimeouts(hCom, &CommTimeOuts)) {
        hCom = 0;
    }
 
    DCB ComDCM;
    memset(&ComDCM,0,sizeof(ComDCM));
    ComDCM.DCBlength = sizeof(DCB);
    GetCommState(hCom, &ComDCM);
    ComDCM.BaudRate = DWORD(baudrate);
    ComDCM.ByteSize = 8;
    ComDCM.Parity = NOPARITY;
    ComDCM.StopBits = ONESTOPBIT;
    ComDCM.fAbortOnError = TRUE;
    ComDCM.fDtrControl = DTR_CONTROL_DISABLE;
    ComDCM.fRtsControl = RTS_CONTROL_DISABLE;
    ComDCM.fBinary = TRUE;
    ComDCM.fParity = FALSE;
    ComDCM.fInX = FALSE;
            ComDCM.fOutX = FALSE;
    ComDCM.XonChar = 0;
    ComDCM.XoffChar = (unsigned char)0xFF;
    ComDCM.fErrorChar = FALSE;
    ComDCM.fNull = FALSE;
    ComDCM.fOutxCtsFlow = FALSE;
    ComDCM.fOutxDsrFlow = FALSE;
    ComDCM.XonLim = 128;
    ComDCM.XoffLim = 128;
 
    if(!SetCommState(hCom, &ComDCM)) {
        CloseHandle(hCom);
        hCom = 0;
    }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)        //закрыть порт
{  
    CloseHandle(hCom);
    ShowMessage("Порт закрыт");
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ComboBox1Change(TObject *Sender)        //Выбрать номер порта
{  
switch (ComboBox1->ItemIndex) {
case 0: pcComPort= "COM3";
break;
case 1: pcComPort= "COM4";
break;
case 2: pcComPort= "COM5";
break;
case 3: pcComPort= "COM6";
break;
case 4: pcComPort= "COM7";
break;
case 5: pcComPort= "COM8";
break;
case 6: pcComPort= "COM9";
break;
case 7: pcComPort= "COM10";
break;
case 8: pcComPort= "COM11";
break;
case 9: pcComPort= "COM12";
break;
case 10: pcComPort= "COM13";
break;
case 11: pcComPort= "COM14";
break;
case 12: pcComPort= "COM15";
break;
  }
 Label12->Caption=(pcComPort);
}

@Сергей 190 · 17.11.2015, 15:21 **[ТС]**

Спасибо!
Завтра сделаю.

@+1 · 18.11.2015, 00:03

Сообщение от Сергей 190

В View->Project Manager Pot1.cpp виден, а Pot1.txt – нет. Оказалось Pot1.txt находится в другой папке.
Я ничего не понимаю. Кто сможет объяснить?

В менеджере проекта Pot1.txt и не должен быть виден, ты создал его из винды.
Положить его надо в папку со всеми юнитами.
#include "Pot1. txt" писать не в шапке, а среди кода, как-нибудь так

C++
1
2
3
4
5
6
7
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
#include "Pot1.txt"

предполагая, что из этого места кусок кода перенесен в файл Pot1.txt и компилятор будет воспринимать Unit1.cpp и Pot1.txt как единый сплошной код одного юнита.
Лучше, конечно, делать *.cpp, так легче его редактировать прямо из билдера.

@Lelik-pahan · 18.11.2015, 09:09

Сообщение от +1

#include "Pot1. txt" писать не в шапке, а среди кода

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

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

@Сергей 190 · 18.11.2015, 14:48 **[ТС]**

Собрал рабочий проект в один Unit1.cpp. Работает.
Создал Unit2 и сохранил как PORT.
По Вашим рекомендациям перенес в PORT две ф-ии.

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
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
//Порт 1_1---------------------------------------------------------------------------
//    sketch  Тестовое управление  Test_in_Arduino_5
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
#include "PORT.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//********************************************************************
 #include <windows.h>
 #include <string.h>
 
 
 #include "stdio.h" // для sprintf
 AnsiString pcComPort= "COM9 ";
 HANDLE hCom;
 DWORD  b;
 OVERLAPPED   ov;
 //int TIMEOUT = 1000;
// int baudrate=115200; //9600, 14400, 19200, 38400, 57600, 115200
 DWORD bytesRead = 0;
 char  In_arduino[111];//буфер для передачи в Ардуино
 char  buf2[55],buf1[1] ; //буфер для чтения из Ардуино
int x;
 
 int  tekx=0, znakX=0;
//Код символа 120"x" 88"X"  121"y" 89"Y" 122 "z" 90 "Z" 97 "a" 65 "A"
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner): TForm(Owner){
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{  //Передаём ДАННЫЕ
.
.
.
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Edit2KeyPress(TObject *Sender, char &Key)
{ //Передаём НАСТРОЙКИ длительности импульса
.
.
.
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Edit3KeyPress(TObject *Sender, char &Key)
{//Передаём НАСТРОЙКИ скважность
.
.
.
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{  // Чтение настроек Ардуино
.
.
.
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
OpenPort(pcComPort, hCom);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
   ClosePort(hCom);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::ComboBox1Change(TObject *Sender)
{  //Выбрать номер порта
pcComPort = "\\\\.\\COM" + IntToStr(ComboBox1->ItemIndex+3);
}

PORT.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
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
//---------------------------------------------------------------------------
#pragma hdrstop
#include "PORT.h"
//---------------------------------------------------------------------------
 
 int TIMEOUT = 1000;
int baudrate = 115200; //9600, 14400, 19200,38400, 57600, 115200
 
void OpenPort(AnsiString pcComPort, HANDLE &hCom)
{  //открыть порт
 
 hCom =CreateFile(pcComPort.c_str(),GENERIC_READ | GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);
 
    if(hCom == (HANDLE)-1) {
            hCom = 0;
            ShowMessage("Ошибка открытия порта");
    }
        else{
        Label11->Caption=StringReplace(pcComPort,"\\\\.","",TReplaceFlags());
        Button1->Enabled = false; // выключить
        Button2->Enabled = true; // включить
        Button3->Enabled = true; // включить
        }
    SetCommMask(hCom, EV_RXCHAR);
    SetupComm(hCom, 1500, 1500);
 
    COMMTIMEOUTS CommTimeOuts;
    CommTimeOuts.ReadIntervalTimeout = 0xFFFFFFFF;
    CommTimeOuts.ReadTotalTimeoutMultiplier = 0;
    CommTimeOuts.ReadTotalTimeoutConstant = TIMEOUT;
    CommTimeOuts.WriteTotalTimeoutMultiplier = 0;
    CommTimeOuts.WriteTotalTimeoutConstant = TIMEOUT;
 
    if(!SetCommTimeouts(hCom, &CommTimeOuts)) {
        hCom = 0;
    }
 
    DCB ComDCM;
    memset(&ComDCM,0,sizeof(ComDCM));
    ComDCM.DCBlength = sizeof(DCB);
    GetCommState(hCom, &ComDCM);
    ComDCM.BaudRate = DWORD(baudrate);
    ComDCM.ByteSize = 8;
    ComDCM.Parity = NOPARITY;
    ComDCM.StopBits = ONESTOPBIT;
    ComDCM.fAbortOnError = TRUE;
    ComDCM.fDtrControl = DTR_CONTROL_DISABLE;
    ComDCM.fRtsControl = RTS_CONTROL_DISABLE;
    ComDCM.fBinary = TRUE;
    ComDCM.fParity = FALSE;
    ComDCM.fInX = FALSE;
        ComDCM.fOutX = FALSE;
    ComDCM.XonChar = 0;
    ComDCM.XoffChar = (unsigned char)0xFF;
    ComDCM.fErrorChar = FALSE;
    ComDCM.fNull = FALSE;
    ComDCM.fOutxCtsFlow = FALSE;
    ComDCM.fOutxDsrFlow = FALSE;
    ComDCM.XonLim = 128;
    ComDCM.XoffLim = 128;
 
    if(!SetCommState(hCom, &ComDCM)) {
        CloseHandle(hCom);
        hCom = 0;
    }
}
//---------------------------------------------------------------------------
void ClosePort(HANDLE &hCom)
{//закрыть порт
    CloseHandle(hCom);
    Label11->Caption=("Порт НЕ выбран");
        Button1->Enabled = true; // включить
        Button2->Enabled = false; // выключить
        Button3->Enabled = false; // выключить
}
//---------------------------------------------------------------------------
 
#pragma package(smart_init)

PORT.h

C++
1
2
3
4
5
6
7
8
9
10
//---------------------------------------------------------------------------
 
#ifndef PORTH
#define PORTH
//---------------------------------------------------------------------------
void OpenPort(AnsiString pcComPort, HANDLE &hCom);
void ClosePort(HANDLE &hCom);
//---------------------------------------------------------------------------
 
#endif

На строку void OpenPort(AnsiString pcComPort, HANDLE &hCom); в PORT.h
Получил следующее:

[C++ Error] PORT.h(6): E2147 'AnsiString' cannot start a parameter declaration
[C++ Error] PORT.h(6): E2303 Type name expected
[C++ Error] PORT.h(7): E2147 'HANDLE' cannot start a parameter declaration
[C++ Error] PORT.cpp(17): E2147 'AnsiString' cannot start a parameter declaration
[C++ Error] PORT.cpp(17): E2303 Type name expected

@Lelik-pahan · 18.11.2015, 14:57

Сообщение от Сергей 190

По Вашим рекомендациям

В моих рекомендациях в Unit2.cpp первой строчкой написано

C++
1
#include <vcl.h>

@Сергей 190 · 18.11.2015, 15:58 **[ТС]**

Спасибо. Заработало. Но начало ругаться на
Label11->Caption=StringReplace(pcComPort,"\\\\." ,"",TReplaceFlags());
Button1->Enabled = false; // выключить
Button2->Enabled = true; // включить
Button3->Enabled = true; // включить

в Unit2.cpp

@Lelik-pahan · 18.11.2015, 16:17

А откуда в Unit2.cpp появились Label11 и Button`ы?

Зря ты их впихнул в функцию ClosePort. Лучше оставь это в первом юните

C++
1
2
3
4
5
6
7
8
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    ClosePort(hCom);
    Label11->Caption=("Порт НЕ выбран");
    Button1->Enabled = true; // включить
    Button2->Enabled = false; // выключить
    Button3->Enabled = false; // выключить
}

А вообще, если так уж нужно обращаться к компонентам первой формы из второго юнита, то в Unit2.cpp Добавь

C++
1
#include<Unit1.h>

и обращайся так

C++
1
Form1->Label1->Caption

@Сергей 190 · 19.11.2015, 13:10 **[ТС]**

Спасибо. Заработало!

Возникли еще вопросы:
В функции поставил проверку «открыт ли порт».
if(hCom == 0) ShowMessage("Сначала надо открыть порт.");
else{…….}
При запуске программы – работает. Если порт НЕ открыт – выводит сообщение "Сначала надо открыть порт." Если порт открыт – начинается работа с Ардуино.

Но если закрыть порт, ничего не происходит. Ни сообщения, ни работы.
Если потом заново открыть порт, то работает.

Когда не было проверки, то программа, при НЕ открытом порте, просто зависала.
Как ПРАВИЛЬНО проверить, открыт ли порт?

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
void __fastcall TForm1::Edit1KeyPress(TObject *Sender, char &Key)
{  //Передаём ДАННЫЕ
 if ( Key == VK_RETURN) {// реагируем на клавишу <Enter>
 if(hCom == 0) ShowMessage("Сначала надо открыть порт.");
 else{
x = StrToFloat (Edit1->Text); // получить данные из полей ввода
String Data=x;        //Переводим переменную х в строку
int len=Data.Length(); //Определяем длину строки Data–непосредственно разбиваемая строка
for (int i=1;i<=len;i++) buffer[i]=Data.SubString(i,1); //для отладки
sprintf (In_arduino,"x%s", Edit1->Text);//записываем в буфер значение из поля Edit1
WriteFile(hCom,In_arduino,len+1,&b,&ov);  //Пишем в порт
Edit1->Text="";  //обнуляем поле Edit1
  Label7->Caption=(In_arduino), Label7->Refresh();  // "Отправляем в порт"
  for (int jj=0; jj<33; jj++) (buf2[jj]=0);  // обнулить buf2
 //    FlushFileBuffers(hCom); // Вытолкнуть остаток из буфера.
    //*************
   int  jjj=0;
   tekx=0;
   Label8->Caption=("         "), Label8->Refresh(); //"Читаем порт"
 
   do  {
 Label10-> Color = clRed;
 Label10->Caption=("Читаем                      "),Label10->Refresh();
 Label10-> Color = clWhite ;
    ReadFile(hCom, buf1, 1, &bytesRead, &ov);   /* Начинаем чтение данных */
 if (bytesRead>0){
    if (buf1[0]==120) znakX=-1;  //Код символа "x"
    if (buf1[0]==88) znakX=1;  //Код символа "X"
    if (buf1[0]!=120 && buf1[0]!=88) {
        if (buf1[0]==62){   //Код символа ">"
          jjj++;
          Label8->Caption=(tekx*znakX), Label8->Refresh();
          tekx=0;
        }
        else tekx=tekx*10+buf1[0]-48;
        }
        }
   } while   (buf1[0]!=42 && buf1[0]!=33);   //Код символа * или !
    if (buf1[0]==42) Label10->Caption=("Чтение закончено ");
    if (buf1[0]==33) Label10->Caption=("Аварийный останов");
}
}
}

И один из моих первых вопросов.
Почему НЕ открывается COM10 и выше?
При подключении Ардуино, образовался COM.
Из среды разработки Ардуино, какой бы это порт не был (COM3 или COM33), работает.
Из моей программы работает только до COM9. Из консольной программы, написанной на Dev-C++, тоже не открывается.
Я бы не заморачивался. Но при подключении активного USB удлинителя, ставятся какие то драйвера.
Ардуино улетает с COM9 на COM13. Никакие переназначения порта из винды не помогают.

@nick42 · 19.11.2015, 13:48

Сообщение от Сергей 190

Никакие переназначения порта из винды не помогают

- вот это странно. В диспетчере устройств в свойствах порта (Параметры порта - Дополнительно) можно установить его номер, желательно тот, что не занят... .

Может, потребуется перезагрузить систему.

@Сергей 190 · 19.11.2015, 14:12 **[ТС]**

В винде порты, которые использовались ранее, отмечены как используемые, даже если устройства нет.
У меня одна Ардуина встала на COM6 две другие на COM9. Подключаю только одну. Но другой порт остается занятым. Если на него переопределить подключенную Ардуино, вылезет сообщение «порт занят», но переподключится и будет работать. Но с USB удлинителем такой номер не проходит даже из среды разработки Ардуино.

@Lelik-pahan · 19.11.2015, 16:56

Сообщение от Сергей 190

Но если закрыть порт, ничего не происходит. Ни сообщения, ни работы.

добавь в конец функции ClosePort(HANDLE &hCom) строчку

C++
1
    hCom = 0;

Думаю, это поможет.

На счёт порта с двузначным номером - а ты точно открываешь порт с таким именем

C++
1
pcComPort = "\\\\.\\COM" + IntToStr(...);

а не вернулся к первоначальному варианту

C++
1
pcComPort = "COM" + IntToStr(...);

?

@Сергей 190 · 21.11.2015, 10:05 **[ТС]**

Добавил

C++
1
hCom = 0;

Заработало. Как сам до такой мелочи не догадался))).

Двухзначный порт не открывался, кода даже не было ф-ии выбора порта.
Тогда

C++
1
2
3
char* pcComPort= "COM13";
...
hCom =CreateFile(pcComPort,GENERIC_READ | GENERIC_WRITE,0,NULL,OPEN_EXISTING,FILE_ATTRIBUTE_NORMAL,NULL);

Ни из Dev-C++, ни из C++Builder 6

Мистика…

@_Dimon_ · 21.11.2015, 10:17

Сообщение от Сергей 190

Мистика…

нет здесь никакой мистики. COM1-COM9 - зарегистрированные имена, в отличии от COM10 и дальше

http://www.vsokovikov.narod.ru... conven.htm

@Сергей 190 · 21.11.2015, 10:25 **[ТС]**

Столкнулся с еще одной непоняткой.
Есть несколько ф-ий передачи настроек и, отдельной кнопкой, ф-я чтения настроек.

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
void __fastcall TForm1::Edit3KeyPress(TObject *Sender, char &Key)
{//Передаём НАСТРОЙКИ скважность
     if ( Key == VK_RETURN) {// реагируем на клавишу <Enter>
 
x = StrToFloat (Edit3->Text); // получить данные из полей ввода
String Data=x;        //Переводим переменную х в строку
int len=Data.Length(); //Определяем длину строки Data–непосредственно разбиваемая строка
sprintf (In_arduino,"s%s", Edit3->Text);//записываем в буфер значение из поля Edit1
WriteFile(hCom,In_arduino,len+1,&b,&ov);  //Пишем в порт значение из поля Edit1
 
 Edit1->SetFocus();
 }
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{  // Чтение настроек Ардуино
    int jjj;
    for (jjj=0; jjj<=33; jjj++) buf2[jjj]=0; //обнуляем предыдущие значения в буфере
    WriteFile(hCom,"K",1,&b,&ov);  //Пишем в порт команда на передачу настроек
    ReadFile(hCom, buf2, 33, &bytesRead, &ov);//читаем порт
    if (bytesRead>0)     Label9->Caption=(buf2);
Edit1->SetFocus();
}

После передачи всех настроек глупо отдельно их запрашивать.
Написал так:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void __fastcall TForm1::Edit3KeyPress(TObject *Sender, char &Key)
{//Передаём НАСТРОЙКИ скважность
     if ( Key == VK_RETURN) {// реагируем на клавишу <Enter>
 
x = StrToFloat (Edit3->Text); // получить данные из полей ввода
String Data=x;        //Переводим переменную х в строку
int len=Data.Length(); //Определяем длину строки Data–непосредственно разбиваемая строка
sprintf (In_arduino,"s%s", Edit3->Text);//записываем в буфер значение из поля Edit1
WriteFile(hCom,In_arduino,len+1,&b,&ov);  //Пишем в порт значение из поля Edit1
 
// Чтение настроек Ардуино
     int jjj;
     for (jjj=0; jjj<=33; jjj++) buf2[jjj]=0; //обнуляем предыдущие значения в буфере
WriteFile(hCom,"K",1,&b,&ov);  //Пишем в порт команда на передачу настроек
      ReadFile(hCom, buf2, 33, &bytesRead, &ov);//читаем порт
if (bytesRead>0)     Label9->Caption=(buf2);
 Edit1->SetFocus();
 }
}

Компилируется без ошибок, но программа виснет.

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке 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. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@Сергей 190 365 / 348 / 74 Регистрация: 18.03.2015 Сообщений: 1,293
	17.11.2015, 15:21 [ТС]
	Спасибо! Завтра сделаю. 0

@Сергей 190 365 / 348 / 74 Регистрация: 18.03.2015 Сообщений: 1,293
	18.11.2015, 15:58 [ТС]
	Спасибо. Заработало. Но начало ругаться на Label11->Caption=StringReplace(pcComPort,"\\\\." ,"",TReplaceFlags()); Button1->Enabled = false; // выключить Button2->Enabled = true; // включить Button3->Enabled = true; // включить в Unit2.cpp 0

@Сергей 190 365 / 348 / 74 Регистрация: 18.03.2015 Сообщений: 1,293
	19.11.2015, 14:12 [ТС]
	В винде порты, которые использовались ранее, отмечены как используемые, даже если устройства нет. У меня одна Ардуина встала на COM6 две другие на COM9. Подключаю только одну. Но другой порт остается занятым. Если на него переопределить подключенную Ардуино, вылезет сообщение «порт занят», но переподключится и будет работать. Но с USB удлинителем такой номер не проходит даже из среды разработки Ардуино. 0