Зависимость двух таблиц stringgrid на 2 разных формах

@Alex45496 · Регистрация: 21.02.2016

Как сделать так,что при внесении данных в первую таблицу(находящуюся на 1 форме),изменялся вторая таблица stringgrid на второй форме?(т.е. когда первая таблица пустая ,то во второй таблице все ячейки закрашены зеленым .Как только мы начинаем вносить в первую таблицу какие-то данные ,то ячейка с такими же координатами во второй таблице окрашивается в красный цвет(две таблицы на разных формах-это важно)).

@krapotkin · 16.07.2016, 21:16

обе формы одновременно на экране?

@Puporev · 16.07.2016, 21:30

Для примера.
На формах по 1 таблице 5х5 без фиксированных строк и столбцов и по 1 кнопке.
Форма 1.

Delphi

implementation
 
uses Unit2;
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
begin
Form1.Hide;
Form2.Show;
end;

Форма 2.

Delphi

implementation
 
uses Unit1;
 
{$R *.dfm}
 
procedure TForm2.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
  Rect: TRect; State: TGridDrawState);
var i,j:byte;
begin
if (ACol in [0..4])and(ARow in [0..4]) then
 begin
  if Form1.StringGrid1.Cells[ACol,ARow]=''
  then StringGrid1.Canvas.Brush.Color := clGreen
  else StringGrid1.Canvas.Brush.Color := clRed;
  StringGrid1.Canvas.FillRect( Rect );
 end;
 
end;
 
procedure TForm2.Button1Click(Sender: TObject);
begin
Form2.hide;
Form1.Show;
end;

@Alex45496 · 16.07.2016, 21:44 **[ТС]**

Очень помог,спасибо)

@Alex45496 0 / 0 / 0 Регистрация: 21.02.2016 Сообщений: 36
		1
	Зависимость двух таблиц stringgrid на 2 разных формах 16.07.2016, 20:42. Показов 1376. Ответов 3 Метки нет (Все метки) Как сделать так,что при внесении данных в первую таблицу(находящуюся на 1 форме),изменялся вторая таблица stringgrid на второй форме?(т.е. когда первая таблица пустая ,то во второй таблице все ячейки закрашены зеленым .Как только мы начинаем вносить в первую таблицу какие-то данные ,то ячейка с такими же координатами во второй таблице окрашивается в красный цвет(две таблицы на разных формах-это важно)). 0

@krapotkin 5498 / 4293 / 1379 Регистрация: 14.04.2014 Сообщений: 19,285 Записей в блоге: 19
	16.07.2016, 21:16	2
	обе формы одновременно на экране? 0

@Alex45496 0 / 0 / 0 Регистрация: 21.02.2016 Сообщений: 36
	16.07.2016, 21:44 [ТС]	4
	Очень помог,спасибо) 0

Опции темы

Зависимость двух таблиц stringgrid на 2 разных формах

Решение