Скачать: CL | DM;

Классы форм   Найти похожие ветки 

← →
rassl   (2009-07-07 15:09) [0]

Здравствуйте уважаемые программисты!
вопрос следующий (может подскажите).
у меня имеются 2 формы.
в первой форме размещена таблица StringGrid.
procedure TOpenForm.FormCreate(Sender: TObject);
begin
  FormStyle:=fsMDIChild;
  PathName := DefaultFileName;
  NumCMD:=StringGrid.RowCount;  // параметр количества строк
  Num_Find:=StringGrid.Row;     // присваиваем курсос к поиску с этой строки
  StringGridN;
end;
во второй форме кнопка, при нажатии на которую в таблице первой формы должно увеличиться необходимое количество строк.
procedure TCMDForm.CMDOK(Sender: TObject);
var   i, ii : integer;
begin
  ii:= NumCMD;   // счетчик количества уже имеющегося количества строк таблицы
  inc(NumCMD,NumberPortLen);  // увеличение числа строк на количество портов
//  OpenForm.StringGrid.RowCount:=NumCMD;    // добавление строк в таблицу
end;
Но, этого не происходит.появляется ошибка Access Violation at adress 0049459B. Read of adress 0000038C.
и соответственно строки не появляются в первой форме.
"Что нужно добавить" во вторую форму (процедуру, класс и т.д.), чтобы эта операция была доступна для изменения таблицы в первой.
спасибо.

---

← →
Anatoly Podgoretsky ©   (2009-07-07 15:55) [1]

> rassl  (07.07.2009 15:09:00)  [0]

Сплошные глобальные переменные с неизвестными значениями.

---

← →
Dennis I. Komarov ©   (2009-07-07 16:14) [2]

Мда.. тут нужен мощный телепатор, или даже кластер :)

---

← →
clickmaker ©   (2009-07-07 16:46) [3]

а OpenForm создана на момент OpenForm.StringGrid.RowCount?

---

← →
rassl   (2009-07-08 05:53) [4]

> а OpenForm создана на момент OpenForm.StringGrid.RowCount?

да сначало появляется OpenForm
а потом CMDForm. т.е. в ней кнопка Button
ii:= NumCMD;   // счетчик количества уже имеющегося количества строк таблицы
 inc(NumCMD,NumberPortLen);  // увеличение числа строк на количество портов
 OpenForm.StringGrid.RowCount:=NumCMD;    // добавление строк в таблицу

---

← →
Плохиш ©   (2009-07-08 10:57) [5]

> rassl   (08.07.09 05:53) [4]

> да сначало появляется OpenForm

Хм, опять викторина "расставь запятые"...

Встроенным в делфи отладчиком воспользоваться не пробовал?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.007 c