VPF::StringGrid - Форум программистов

Reptile

Дата 10.11.2006, 13:42 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 30.9.2006
Где: Украина, Первомай ск

Репутация: 2
Всего: 3

Под рукой Builder-а нету smile

Пишу здесь могут быть опечятки smile

Вот это вешаеш на нажатие кнопки:

Код


  Form2->Edit1->Text = StringGrid1.Cells[1][StringGrid1->Row];
  Form2->Edit2->Text = StringGrid1.Cells[2][StringGrid1->Row];
  Form2->Edit3->Text = StringGrid1.Cells[3][StringGrid1->Row];
  Form2->Edit4->Text = StringGrid1.Cells[4][StringGrid1->Row];
  Form2->ShowModal();

Это во второй форме на нажатие "Сохранить"(или как там у тебя...):

Код


  Form1->StringGrid1->Cells[1][Form1->StringGrid1->Row] = Form2->Edit1->Text;
  Form1->StringGrid1->Cells[2][Form1->StringGrid1->Row] = Form2->Edit2->Text;
  Form1->StringGrid1->Cells[3][Form1->StringGrid1->Row] = Form2->Edit3->Text;
  Form1->StringGrid1->Cells[4][Form1->StringGrid1->Row] = Form2->Edit4->Text;
  Close();

Если будут ошибки - пиши smile

Буду благодарен за исправления.
P.S.Не забудь подключить формы друг к другу.

Это сообщение отредактировал(а) Reptile - 10.11.2006, 13:47

docwar

Дата 10.11.2006, 17:11 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 209
Регистрация: 24.9.2006

Репутация: нет
Всего: нет

Reptile, спасибо огромное!!!
Я писал такой же код, но строка после редактирования добавлялась ПОСЛЕ, а не заменяла строку, текст которой помещался в Эдиты... поэтому и решил, что метод мой ошибочный! ))
Уже и перед нажатием на ОК (на форме редактирования) активировал ф-ию удаления строки и Form1->StringGrid1->RowCount--; писал.....
Как быть? =)

Добавлено @ 17:13
Строка после редактирования добавляется после всех остальных строк....

Reptile

Дата 10.11.2006, 17:50 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 30.9.2006
Где: Украина, Первомай ск

Репутация: 2
Всего: 3

Цитата(docwar @ 10.11.2006, 17:11

)

Я писал такой же код, но строка после редактирования добавлялась ПОСЛЕ, а не заменяла строку

Значит уже не такой smile

Цитата(docwar @ 10.11.2006, 17:11

)

Уже и перед нажатием на ОК (на форме редактирования) активировал ф-ию удаления строки и Form1->StringGrid1->RowCount--; писал.....
Как быть? =)

Не понял

Етот код редактирует, для добавления строки делай похожую форму но увеличивай Form1->StringGrid1->RowCount и добавляй.

Цитата(docwar @ 10.11.2006, 17:11

)

Добавлено @ 17:13
Строка после редактирования добавляется после всех остальных строк....

Как это?

Код


  Form1->StringGrid1->Cells[1][Form1->StringGrid1->Row] = Form2->Edit1->Text;
  Form1->StringGrid1->Cells[2][Form1->StringGrid1->Row] = Form2->Edit2->Text;
  Form1->StringGrid1->Cells[3][Form1->StringGrid1->Row] = Form2->Edit3->Text;
  Form1->StringGrid1->Cells[4][Form1->StringGrid1->Row] = Form2->Edit4->Text;

Изменяет сущуствующие ячейки,он не добавляет
В чем вопрос?

docwar

Дата 10.11.2006, 18:21 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 209
Регистрация: 24.9.2006

Репутация: нет
Всего: нет

Вопрос в том, что строка, которую мы выбираем для редактирования остается неизменной, а отредактированная добавляется ПОСЛЕ всех строк таблицы...

Цитата(Reptile @ 10.11.2006, 17:50

)

Етот код редактирует, для добавления строки делай похожую форму но увеличивай Form1->StringGrid1->RowCount и добавляй.

Увеличивать RowCount или нет? Только смысл? Уменьшение желаемого результата тоже не принесло.

Забыл сказать, что у меня на главной форме прописано StringGrid1->Options = StringGrid1->Options << goRowSelect; ..... но это ни на что не должно влиять...

Reptile

Дата 10.11.2006, 18:44 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 30.9.2006
Где: Украина, Первомай ск

Репутация: 2
Всего: 3

Цитата(docwar @ 10.11.2006, 18:21

)

Покажи код навешаный на кнопку ОК. А лучше прикрепи проект, я проверю и завтра выложу smile

Какие у Тебя значения в FixedRows и FixedCols ?

Цитата(docwar @ 10.11.2006, 18:21

)

Увеличивать RowCount или нет?

Нет, если надо только редактировать.

Цитата(docwar @ 10.11.2006, 18:21

)

Забыл сказать, что у меня на главной форме прописано StringGrid1->Options = StringGrid1->Options << goRowSelect;

Это логично, иначе Ты бы не выделял всей строки smile

Это сообщение отредактировал(а) Reptile - 10.11.2006, 18:45

docwar

Дата 10.11.2006, 18:53 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 209
Регистрация: 24.9.2006

Репутация: нет
Всего: нет

FixedRows=1
StringGrid1->FixedCols = 0;

Сожалею, но весь проект прикрепить не могу.... smile

Цитата(Reptile @ 10.11.2006, 18:44

)

Покажи код навешаный на кнопку ОК.

Код

  Form1->StringGrid1->Cells[0][Form1->StringGrid1->Row] = Form2->Edit1->Text;
  Form1->StringGrid1->Cells[1][Form1->StringGrid1->Row] = Form2->Edit2->Text;
  Form1->StringGrid1->Cells[2][Form1->StringGrid1->Row] = Form2->Edit3->Text;
  Form1->StringGrid1->Cells[3][Form1->StringGrid1->Row] = Form2->Edit4->Text;
  Form1->StringGrid1->Cells[4][Form1->StringGrid1->Row] = Form2->Edit5->Text;
  Form1->StringGrid1->Cells[5][Form1->StringGrid1->Row] = Form2->Edit6->Text;
  Form1->StringGrid1->Cells[6][Form1->StringGrid1->Row] = Form2->Edit7->Text;
  Form1->StringGrid1->Cells[7][Form1->StringGrid1->Row] = Form2->Edit8->Text;
  Close();

Reptile

Дата 10.11.2006, 19:10 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 30.9.2006
Где: Украина, Первомай ск

Репутация: 2
Всего: 3

Цитата(docwar @ 10.11.2006, 18:53

)

Сожалею, но весь проект прикрепить не могу.... smile

Тогда ничем не могу помочь smile

У меня все работает smile

Не могу понять

Цитата(docwar @ 10.11.2006, 18:21

)

отредактированная добавляется ПОСЛЕ всех строк таблицы...

Как

Это сообщение отредактировал(а) Reptile - 10.11.2006, 19:30

Присоединённый файл ( Кол-во скачиваний: 8 )

22.GIF 26,97 Kb

docwar

Дата 10.11.2006, 21:09 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Участник
Сообщений: 209
Регистрация: 24.9.2006

Репутация: нет
Всего: нет

Reptile, вопрос решил добавление переменной, хранящей номер строки, которую мы хотим отредактировать.
Как же ты без этого сделал не пойму!

Спасибо большое за помощь!

Reptile

Дата 11.11.2006, 10:27 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 115
Регистрация: 30.9.2006
Где: Украина, Первомай ск

Репутация: 2
Всего: 3

Цитата(docwar @ 10.11.2006, 12:59

)

Reptile, буду благодарен, если проект под Билдер адаптируешь

Бодьше не чем не могу помоч smile

Присоединённый файл ( Кол-во скачиваний: 6 )

StrinGrid.rar 4,29 Kb

XPyCT

Дата 2.7.2008, 14:24 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 381
Регистрация: 24.8.2007
Где: Moldova

Репутация: 10
Всего: 10

Цитата(docwar @ 29.9.2006, 17:22)

Извините, но я не могу выделить строку. Это вообще возможно?

что тут  не ясного! хоть пост был давно но отпишу
Предположим у вас стрингрид  с одним выделенным рядом и одним выделенным столбцом!
нумерация в стрингриде идет с нуля!
и так первый фикс ряд =0  и фикс кол=0;

идем дальше вам нужно к примеру выделить ряд под номером №5

кидаем на форму едит и кнопку
Далее пишем там этот код по событию нажатия кнопки

Код


void __fastcall TForm1::Button1Click(TObject *Sender)
{
int cRow=StrToInt(Edit1->Text);

  if(cRow > StringGrid1->RowCount-1 || Edit1->Text.IsEmpty())
    ShowMessage("Диапазон рядов задан не верно!");
      else
       {
        StringGrid1->Row=cRow;
        StringGrid1->Options<<goRowSelect;  //  "<<" - так разрешаем выделение строки  ">>" -Так запрещаем
         // goEditing; "<<" - так разрешаем Редактирование таблицы  ">>" -Так запрещаем
       }
}

Одновременное применение своиств goRowSelect и goEditing не дает эфекта (goEditing);- только goRowSelect

Это сообщение отредактировал(а) XPyCT - 2.7.2008, 14:27

XPyCT

Дата 4.7.2008, 10:18 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 381
Регистрация: 24.8.2007
Где: Moldova

Репутация: 10
Всего: 10

вот написал думаю поможет!
прошу не пинать сам не силен но пишу то что знаю и делал!
и так есть две формы
fmBaza - Главная форма
fmADD- Форма добавления товара
SGBaza- StringGrid

по нажатию клавиши ентер появляется форма добавления
которая смотрит какая колонка и ряд и исходя из этого уже добавляет
привожу код
1. Главная форма

Код


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include<winuser.h>

#include "MAIN_Unit.h"
#include "ADD_ITEM_Unit.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmBaza *fmBaza;
int cRow,cCol; //Глобальные переменные
//---------------------------------------------------------------------------
__fastcall TfmBaza::TfmBaza(TComponent* Owner)
        : TForm(Owner)
{
     //Ввод начального значения
SGBaza->Cells[1][1]="Сахар";
SGBaza->Cells[2][1]="20,75";
SGBaza->Cells[3][1]="8,25";
}
//---------------------------------------------------------------------------
void __fastcall TfmBaza::FormShow(TObject *Sender)
{
SGBaza->ColWidths[0]=30;   //Задаем размер колонок
SGBaza->ColWidths[1]=150;
SGBaza->ColWidths[2]=80;
SGBaza->ColWidths[3]=80;

SGBaza->Cells[0][0]="№";     //Озаглавливание фикс ряда
SGBaza->Cells[1][0]="Найменование";
SGBaza->Cells[2][0]="Кол-во";
SGBaza->Cells[3][0]="Цена в руб";

SGBaza->SetFocus(); //Передача фокуса в таблицу
SGBaza->Options<<goTabs; //Разрешаем перемещение по таблице клавишей таб

//нумерация всех рядов
for(int i=1; i<SGBaza->RowCount; i++)
SGBaza->Cells[0][i]=i;
}
//---------------------------------------------------------------------------
void __fastcall TfmBaza::SGBazaKeyPress(TObject *Sender, char &Key)
{
if(Key==VK_RETURN)
   {
     cRow=SGBaza->Row; //Получаем Активную строку
     cCol=SGBaza->Col; //Полчаем  Активную колонку

     fmADD->Edit1->Text=SGBaza->Cells[cCol][cRow];
     fmADD->Show();
   }


}
//---------------------------------------------------------------------------
void __fastcall TfmBaza::btAddRowClick(TObject *Sender)
{
SGBaza->RowCount++;
cRow=SGBaza->RowCount-1;
cCol=1;//Делаем активным первую колонку последнего ряда
SGBaza->Row=cRow; //Делаем активным последний ряд
SGBaza->SetFocus(); //Передача фокуса в таблицу
//нумерация всех рядов
for(int i=1; i<SGBaza->RowCount; i++)
SGBaza->Cells[0][i]=i;
}
//---------------------------------------------------------------------------
void __fastcall TfmBaza::btDeleteRowClick(TObject *Sender)
{
if(SGBaza->Cells[1][1].IsEmpty()&& SGBaza->Cells[2][1].IsEmpty()&& SGBaza->Cells[3][1].IsEmpty())
 ShowMessage("Нечего удалять!");  //Если единственный ряд пустой
 else
 {

if (MessageDlg("Вы действительно хотите удалить запись? "+SGBaza->Cells[1][cRow],mtConfirmation,TMsgDlgButtons() << mbOK<<mbCancel,0)==mrOk)
  {   //Если всего один ряд то просто очищаем
    if(SGBaza->RowCount==2 && SGBaza->Row==1 )
   {
    SGBaza->Cells[1][1]="";
    SGBaza->Cells[2][1]="";
    SGBaza->Cells[3][1]="";
    }
    else
     {
     class TProxyGrid : public TStringGrid
    {
       public:
        using TStringGrid::DeleteRow;

   };

    ((TProxyGrid*)SGBaza)->DeleteRow(cRow);

    }
  }
  }

SGBaza->SetFocus(); //Передача фокуса  в таблицу
//нумерация всех рядов
for(int i=1; i<SGBaza->RowCount; i++)
SGBaza->Cells[0][i]=i;

}
//---------------------------------------------------------------------------
void __fastcall TfmBaza::SGBazaKeyDown(TObject *Sender, WORD &Key,
      TShiftState Shift)
{
if(Key==VK_INSERT)//Добавляем ряд при нажатии клав инсерт
fmBaza->btAddRow->Click();
}
//---------------------------------------------------------------------------

2. Форма добавления

Код


//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop

#include "ADD_ITEM_Unit.h"
#include "MAIN_Unit.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TfmADD *fmADD;
extern int cRow,cCol; //Глобальные переменные
//---------------------------------------------------------------------------
__fastcall TfmADD::TfmADD(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TfmADD::Edit1KeyPress(TObject *Sender, char &Key)
{
int i,k,s=0;
char str[10];
  if(Key==VK_RETURN) //если нажата клавиша ентер
  {
    if(cCol==1)  //Просто добавляем или заменяем наименование товара
    fmBaza->SGBaza->Cells[cCol][cRow]=Edit1->Text;
    if(cCol==2)//Дабавляем к существующему количеству новое 2+2=4
     {
//---Конвертирование содержимого Edit1 и замена точки на запятую-
      strcpy(str,Edit1->Text.c_str());
       for(i=0; i<10; i++)
        if(str[i]=='.')
          str[i]=',';
          Edit1->Text=str;
//---Конвертирование содержимого Edit1 и замена точки на запятую---End--
          if(!fmBaza->SGBaza->Cells[cCol][cRow].IsEmpty())//Если ечейка не пустая
                {
fmBaza->SGBaza->Cells[cCol][cRow]= //Добавление количества
FloatToStr(StrToFloat(fmBaza->SGBaza->Cells[cCol][cRow])+StrToFloat(Edit1->Text));
                }
             else
                {  //если ечейка пустая
//---Конвертирование содержимого Edit1 и замена точки на запятую-
             strcpy(str,Edit1->Text.c_str());
            for(i=0; i<10; i++)
            if(str[i]=='.')
           str[i]=',';
            Edit1->Text=str;
//---Конвертирование содержимого Edit1 и замена точки на запятую---End-- ]
           fmBaza->SGBaza->Cells[cCol][cRow]=Edit1->Text;
                }
     }

  if(cCol==3)  //Просто добавляем или заменяем Цену
     {
//---Конвертирование содержимого Edit1 и замена точки на запятую-
             strcpy(str,Edit1->Text.c_str());
            for(i=0; i<10; i++)
            if(str[i]=='.')
           str[i]=',';
            Edit1->Text=str;
//---Конвертирование содержимого Edit1 и замена точки на запятую---End-- ]

    fmBaza->SGBaza->Cells[cCol][cRow]=Edit1->Text;
     }
     fmBaza->SGBaza->SetFocus(); //Передача фокуса  в таблицу
     //нумерация всех рядов
     for(int i=1; i<fmBaza->SGBaza->RowCount; i++)
     fmBaza->SGBaza->Cells[0][i]=i;
     Close();
  }
}
//---------------------------------------------------------------------------

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »