Главная страница
    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.85 MB
Время: 0.039 c
14-22351
nikols
2001-10-31 18:55
2002.01.08
Опрос: Кто занимается (знает, интересуется CORBA)


3-21916
SVS
2001-12-03 12:08
2002.01.08
InterBase


1-22235
DDDeN
2001-12-17 06:47
2002.01.08
Заставка


4-22489
Skiv
2001-11-05 09:55
2002.01.08
Вывод версии *.exe


14-22360
РУС
2001-11-07 19:16
2002.01.08
Internet Explorer





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский