Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Внизпомогите Найти похожие ветки
← →
Катя (2001-12-17 15:25) [0]Я не могу понять, почему к проекту не присоединяется восьмая форма.Точнее , она присоединяется , но если написать какой -нибудь код, то выходит ошибка и седьмая форма (к которой присоединена 8-ая)тоже зависает.
← →
gek (2001-12-17 15:28) [1]Сам вопрос непонятен.Конкретнее
← →
MBo (2001-12-17 15:45) [2]Да это наверно, подружка Настеньки прикалывается
← →
Юрий Зотов (2001-12-17 15:51) [3]Это недокументированная фича Delphi. Все дело в том, что в проекте не может быть 8 форм - должно быть или 7, или 9. Добавьте к проекту девятую форму - и все заработает. Правда при одном условии - ни в коем случае не пишите никакого кода ни в одной из форм. Для работоспособности проекта это крайне вредно.
← →
Катя (2001-12-17 16:00) [4]//для MBo ©
Я не Настенька и не тем более ее подружка,я несчастная студентка , которой кровь из носа послезавтра сдавать курсач на Delphi
← →
MBo (2001-12-17 16:04) [5]Тогда извиняюсь.
По всей вероятности (по сведениям из второй твоей ветки)
у тебя не существует форма и соответственно стринггрид на ней в тот момент, когда обращаешься к нему. Приведи код, относящийся к этому.
← →
gek (2001-12-17 16:05) [6]Ну а какие проблемы
Form8:=TForm8.create(application);
try
// тута код заполнения Form8.stringgrid
Form8.ShowModal;
finally
Form8.free;
end;
А сообщение acces violation at address </> это ничто иное как проблемы с памятью.Прога пытается захватить память ей не принадлежащую.
Смотри все ли правильно освобождаешь и не обращаешься ли к объектам которые еще не созданы
>> Юрий Зотов
Круто про кол-во форм и код в формах
← →
Катя (2001-12-17 16:24) [7]"тута код заполнения "не работает Еще вырианты есть?
На всякий случай приведу код
var
i,n,j:integer;
begin
Form8:=TForm.create(application);
try
n:=1;
for i:=1 to Stringgrid1.Rowcount-1 do begin
if strtoint(Stringgrid1.cells[9,i])=0 then
for j:=1 to n do begin
Form8.Stringgrid1.cells[0,j]:=inttostr(j);
Form8.Stringgrid1.cells[1,j]:=Stringgrid1.cells[1,j];
Form8.Stringgrid1.cells[2,j]:=Stringgrid1.cells[2,j];
Form8.Stringgrid1.cells[3,j]:=Stringgrid1.cells[9,j];
end;end;
Form8.ShowModal;
finally
Form8.free;
end;
← →
Dmitriy(new) (2001-12-17 16:28) [8]Stringgrid1.Rowcount -- ?? сколько
← →
gek (2001-12-17 16:31) [9]1.Зачем второй цикл j у тебя всегда = 1 ?
2.Совпадает ли количество колонок первого грида и второго
3.Где увеличение RowCount
RowCount:=RowCount + 1;//увеличить кол-во строк второго грида
← →
MBo (2001-12-17 16:35) [10]вопросы
form8 - создается динамически. А в *.dpr она не создана?
создаешь ее конструктором TForm, а не TForm8 - значит, она по умолчанию, и Stringgrid на ней нет!
если в dpr нет
Application.CreateForm(TForm8, Form8);
то делай
Form8:=TForm 8.create(application);
← →
Катя (2001-12-17 16:38) [11]а что разве есть разница совпадают количества столбцов в таблицах или нет?..у меня в одной 10, в другой 3 а код я конечно, ложовый послала-поторопилась .
← →
Катя (2001-12-17 17:14) [12]спасибо вам большое -все заработало!!!
← →
NickBat (2001-12-17 17:19) [13]А в проекте форму убрала из Auto-Create Forms? А то ведь она второй раз пытается создаться, вот и ругается.:))
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.01 c