Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 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
3-21992
dlK
2001-12-06 15:21
2002.01.08
Как не дать программулине


6-22271
Victor
2001-10-04 20:15
2002.01.08
при конекте не появлялось удаленное соединение????


6-22311
BigFoot
2001-10-04 19:27
2002.01.08
Удалённо


14-22339
Китаец Как Зо Вут
2001-11-01 10:12
2002.01.08
Программер, что в нике твоем?


7-22438
Sasha
2001-08-17 16:14
2002.01.08
Голос по модему





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский