SpinEdit и StingGrid

@Kseniya77 · Регистрация: 19.01.2013

Подскажите пожалуйста. Есть 4 компонента SpinEdit на одной форме и StingGrid да другой, как сделать чтобы при значение 1 или нескольких SpinEdit.Value равных 0 в таблице оставалась пустая ячейка, вместо значения в ней 0.

@NIKOLAYY · 28.11.2014, 16:31

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

SpinEdit.Value равных 0 в таблице оставалась пустая ячейка

Вот так, укажи только к какой форме обращаешся и какие ячейки делать пустыми.:

Delphi

procedure TForm1.Button1Click(Sender: TObject);
begin
  if SpinEdit1.Value = 0 then
  begin
    Form2.StringGrid1.Cells[1, 1] := '';
    //=========================================================
    //çäåñü åùå êîä íà ïðî÷èå ÿ÷åéêè åñëè íóæíî
    //=========================================================
  end;
end;

@Kseniya77 1 / 1 / 0 Регистрация: 19.01.2013 Сообщений: 98
		1
	SpinEdit и StingGrid 28.11.2014, 15:54. Показов 1346. Ответов 1 Метки нет (Все метки) Подскажите пожалуйста. Есть 4 компонента SpinEdit на одной форме и StingGrid да другой, как сделать чтобы при значение 1 или нескольких SpinEdit.Value равных 0 в таблице оставалась пустая ячейка, вместо значения в ней 0. __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

SpinEdit и StingGrid

Решение