Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

В чем дело?

Agi © (2005-10-29 13:35:00)
Привет мастерам!!! Подскажите в сем дело:
при сравнении 2-х текстовых полей(TEdit), когда они совпадают то должна появиться форма, а уменя блин ошибка вылетает:

Project Project1.exe raised exception class EAccessViolation with message ' Access violation at adress 004B2FDE in module 'Project1.exe'. Read of address 00000000 '. Process stopped. Use Step or Run to continue

Anatoly Podgoretsky (2005-10-30 11:08:00) [1]
Agi (29.10.05 15:24) [8]
Слово вродене имеет права на существование.

beglec (2005-10-30 00:19:00) [2]
сделай просче
if Edit4.Text = Edit2.Text then Form3.ShowModal;
замени на
if Edit4.Text = Edit2.Text then if Form3<>nil then Form3.ShowModal else "Форма не создана";

DELORAC (2005-10-29 17:49:00) [3]
А в OnShow для Form3 косяка нет?

wp2 (2005-10-29 15:56:00) [4]

> Project Project1.exe raised exception class EAccessViolation
> with message ' Access violation at adress 004B2FDE in module
> 'Project1.exe'. Read of address 00000000 '. Process stopped.
> Use Step or Run to continue

Такая ошибка часто может возникать.
Поэтому надо всегда уточнять в чём дело...

John Doe (2005-10-29 15:48:00) [5]

> Project Project1.exe raised exception class EAccessViolation
> with message ' Access violation at adress 004B2FDE in module
> 'Project1.exe'. Read of address 00000000 '. Process stopped.
> Use Step or Run to continue

Такая штука появляется в случе если ты напортачил там в памяти что-то.
В данном случае что-то с Form3,я так предпологаю.

Сайбель Алексей (2005-10-29 15:40:00) [6]
Form3 уже создано? на тот момент, когда у тебя выполняется этот код.

Agi (2005-10-29 15:24:00) [7]
Да нет вроде все создано

Anatoly Podgoretsky (2005-10-29 14:30:00) [8]
Не создано, что-то из этого Edit4, Edit2, Form3

Agi (2005-10-29 14:24:00) [9]
При сравнении If....then

Anatoly Podgoretsky (2005-10-29 14:20:00) [10]
В какой строке возникает ошибка?

Agi (2005-10-29 14:15:00) [11]
Form1.Table.First;
while not Form1.Table.Eof do
begin
s := Table.Fields[4].AsString;
a:=StrToDate(s);
Edit2.Text := FormatDateTime('ddmm',a);
if Edit4.Text = Edit2.Text then Form3.ShowModal;
Form1.Table.Next;
end;
Table.First;
end;

RzCoDer (2005-10-29 14:09:00) [12]
Agi, дай исходник, а то так спроси ещё хде у тя пульт от телика завалялся

Agi (2005-10-29 14:05:00) [13]
Подскажу, только ты мне сначала подскажи что с этим исключением делать?

TUser (2005-10-29 13:50:00) [14]
Слушай, у меня тут тоже ошибка в программе. В чем дело, не подскажешь?

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »