Форум: "Начинающим";
Текущий архив: 2009.09.06;
Скачать: [xml.tar.bz2];
Вниз
Классы форм Найти похожие ветки
← →
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 вся ветка
Форум: "Начинающим";
Текущий архив: 2009.09.06;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.005 c
