StringGrid: удалить фиксированный столбец и записать значения в фиксированную строку в дизайнере форм

@Khelleos · Регистрация: 13.05.2010

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

Помогите плиз

@Serj228 · 24.04.2011, 11:50

За тот столбец отвечает свойство FixedCols(По умолчанию равно 1, то есть 1 столбец фиксирован, тебе надо 0).
Записать в ячейки вроде бы никак, так что определяй данные для них в эту процедуру, она же отвечает за "что делать при создании формы"

C++
1
2
3
4
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}

@Khelleos · 24.04.2011, 16:40 **[ТС]**

а как выравнивать текст в таблице?

@Kody123 · 24.04.2011, 16:50

а если взять как двухмерный массив? С i= номер столбца, и j= номер строки. и пиши что хочешь!?

@Khelleos · 24.04.2011, 16:52 **[ТС]**

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

а если взять как двухмерный массив? С i= номер столбца, и j= номер строки. и пиши что хочешь!?

не вариант, потому-что потом пользователь будет добавлять в таблицу данные, когда оно будет запущено. Неужели нету свойства у StringGrid как выравнивать?

@kzru_hunter · 24.04.2011, 17:20

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

а как выравнивать текст в таблице?

в обработчике OnDrawCell:

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
    UINT uFormat = DT_SINGLELINE | DT_VCENTER | DT_CENTER ; // в центре ячейки
    StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
    DrawText(StringGrid1->Canvas->Handle,
                 StringGrid1->Cells[ACol][ARow].c_str(),
                 StringGrid1->Cells[ACol][ARow].Length(),
                 &Rect,
                 uFormat
        );
}

Можно менять выравнивание, меняя значение переменной uFormat (см. описание функции DrawText)

@Khelleos · 24.04.2011, 17:49 **[ТС]**

я написал у себя так

C++
1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
    StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
    DrawText(StringGrid1->Canvas->Handle,
                 StringGrid1->Cells[0][0].c_str(),
                 StringGrid1->Cells[0][0].Length(),
                 &Rect,
                 DT_Center
);

но почему-то компилятор ругается на последную строчку

@kzru_hunter · 24.04.2011, 18:08

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

void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
int ARow, TRect &Rect, TGridDrawState State)
{
StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
DrawText(StringGrid1->Canvas->Handle,
StringGrid1->Cells[0][0].c_str(),
StringGrid1->Cells[0][0].Length(),
&Rect,
DT_Center
);

Фигурная скобка есть в конце?

@Khelleos · 24.04.2011, 18:25 **[ТС]**

C++
1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
int ARow, TRect &Rect, TGridDrawState State)
{
     StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
     DrawText(StringGrid1->Canvas->Handle,
                    StringGrid1->Cells[0][0].c_str(),
                    StringGrid1->Cells[0][0].Length(),
                    &Rect,
                    DT_Center
);

вот она функция

@kzru_hunter · 24.04.2011, 18:39

Последняя круглая скобка относится к DrawText.
Не хватает ещё закрывающей фигурной скобки для обработчика.
Зачем правил функцию?

Не правил бы и не было бы ошибок.

@Khelleos · 24.04.2011, 18:48 **[ТС]**

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

Последняя круглая скобка относится к DrawText.
Не хватает ещё закрывающей фигурной скобки для обработчика.
Зачем правил функцию?

Не правил бы и не было бы ошибок.

я твою функцию скопировал, запустил, и прога не запустилась
Ошибки
[BCC32 Error] Unit1.cpp(29): E2034 Cannot convert 'wchar_t *' to 'const char *'
Full parser context
Unit1.cpp(21): parsing: void _fastcall TForm1::StringGrid1DrawCell(TObject *,int,int,TRect &,TGridDrawState)
[BCC32 Error] Unit1.cpp(29): E2342 Type mismatch in parameter 'lpchText' (wanted 'const char *', got 'wchar_t *')
Full parser context
Unit1.cpp(21): parsing: void _fastcall TForm1::StringGrid1DrawCell(TObject *,int,int,TRect &,TGridDrawState)

@kzru_hunter · 24.04.2011, 18:57

C++
1
AnsiString(StringGrid1->Cells[ACol][ARow]).c_str()

В новом билдере с ansi и юникодом проблемка, поэтому приходится так изворачиваться.
До этого код приводил из билдера6

@Khelleos · 24.04.2011, 19:12 **[ТС]**

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

C++
1
AnsiString(StringGrid1->Cells[ACol][ARow]).c_str()

В новом билдере с ansi и юникодом проблемка, поэтому приходится так изворачиваться.
До этого код приводил из билдера6

вместо DrawText теперь AnsiString

то есть теперь

C++
1
2
3
4
5
6
7
8
UINT uFormat = DT_SINGLELINE | DT_VCENTER | DT_CENTER ; // в центре ячейки
StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
AnsiString(
        StringGrid1->Cells[ACol][ARow].c_str(),
        StringGrid1->Cells[ACol][ARow].Length(),
        &Rect,
        uFormat
        )

или по другому?
а то я уже немного запутался(

@kzru_hunter · 24.04.2011, 19:47

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::StringGrid1DrawCell(TObject *Sender, int ACol,
      int ARow, TRect &Rect, TGridDrawState State)
{
        UINT uFormat = DT_SINGLELINE | DT_VCENTER | DT_CENTER ; // в центре ячейки
        StringGrid1->Canvas->FillRect(Rect); // затирает ячейку белым цветом
        DrawText(StringGrid1->Canvas->Handle,
                 AnsiString(StringGrid1->Cells[ACol][ARow]).c_str(),
                 StringGrid1->Cells[ACol][ARow].Length(),
                 &Rect,
                 uFormat
        );
}

@Khelleos · 24.04.2011, 20:44 **[ТС]**

всем спасибо=)

Новые блоги и статьи Все статьи Все блоги /
Автозаполнение реквизита при выборе элемента справочника Maks 27.03.2026 Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. При выборе "Спецтехники" (Тип Справочник. Спецтехника), заполняется. . .	Сумматор с применением элементов трёх состояний. Hrethgir 26.03.2026 Тут. https:/ / fips. ru/ EGD/ ab3c85c8-836d-4866-871b-c2f0c5d77fbc Первый документ красиво выглядит, но без схемы. Это конечно не даёт никаких плюсов автору, но тем не менее. . . всё может быть. . .	Автозаполнение реквизитов при создании документа Maks 26.03.2026 Программный код из решения ниже размещается в модуле объекта документа, в процедуре "ПриСозданииНаСервере". Алгоритм проверки заполнения реализован для исключения перезаписи значения реквизита,. . .	Команды формы и диалоговое окно Maks 26.03.2026 1. Команда формы "ЗаполнитьЗапчасти". Программный код из решения ниже на примере нетипового документа "ЗаявкаНаРемонтСпецтехники" разработанного в конфигурации КА2. В качестве источника данных. . .
Кому нужен AOT? DevAlt 26.03.2026 Решил сделать простой ланчер Написал заготовку: dotnet new console --aot -o UrlHandler var items = args. Split(":"); var tag = items; var id = items; var executable = args;. . .	Отправка уведомления на почту при создании или изменении элементов справочника Maks 24.03.2026 Программная отправка письма электронной почты на примере типового справочника "Склады" в конфигурации БП3. Перед реализацией необходимо выполнить настройку системной учетной записи электронной. . .	модель ЗдравоСохранения 5. Меньше увольнений- больше дохода! anaschu 24.03.2026 Теперь система здравосохранения уменьшает количество увольнений. 9TO2GP2bpX4 a42b81fb172ffc12ca589c7898261ccb/ https:/ / rutube. ru/ video/ a42b81fb172ffc12ca589c7898261ccb/ Слева синяя линия -. . .	Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .

@Khelleos 39 / 39 / 24 Регистрация: 13.05.2010 Сообщений: 282 Записей в блоге: 1

	StringGrid: удалить фиксированный столбец и записать значения в фиксированную строку в дизайнере форм 24.04.2011, 11:08. Показов 3333. Ответов 14 Метки нет (Все метки) Помогите плиз Миниатюры 0

@Khelleos 39 / 39 / 24 Регистрация: 13.05.2010 Сообщений: 282 Записей в блоге: 1
	24.04.2011, 16:40 [ТС]
	а как выравнивать текст в таблице? 0

@Kody123 1 / 1 / 0 Регистрация: 12.04.2011 Сообщений: 56
	24.04.2011, 16:50
	а если взять как двухмерный массив? С i= номер столбца, и j= номер строки. и пиши что хочешь!? 0

@kzru_hunter 1124 / 795 / 101 Регистрация: 01.02.2011 Сообщений: 1,887 Записей в блоге: 1
	24.04.2011, 18:39
	Последняя круглая скобка относится к DrawText. Не хватает ещё закрывающей фигурной скобки для обработчика. Зачем правил функцию? Не правил бы и не было бы ошибок. 0

@Khelleos 39 / 39 / 24 Регистрация: 13.05.2010 Сообщений: 282 Записей в блоге: 1
	24.04.2011, 20:44 [ТС]
	всем спасибо=) 0