| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
EOSError with message 'A call to an OS function failed' [D7, XP]
azamatufa © (2008-05-14 07:03:00)Приветствую!
Вот с сабжем столкнулся.
В коде есть следующее:
1. кнопка1 - create form1
2. кнопка2 - create form2
при п.2 - ошибка (сабж).
если п.2 без п.1 - ошибки нет.
Что может быть?
СПАСИБО!
{RASkov} (2008-05-21 08:13:00) [1]
> azamatufa © (20.05.08 12:37) [20]
Вот из-за:
> пусть даже до конца не узнал причину.
Поэтому и:
> натворил ерунды...
> не умею я программировать (((
:)
ЮЮ (2008-05-21 04:54:00) [2]> ну да ладно! главное решилось! урра! пусть даже до конца
> не узнал причину.
Танец с бубнами сделал свое дело !!! Урра!!! :)
azamatufa (2008-05-20 12:37:00) [3]сегодня )))
ну.. на самом деле не знаю, но переименование имени формы помогло.
Может быть на форме где-то еще были компоненты с таким же именем... хотя ругани не было...
ну да ладно! главное решилось! урра! пусть даже до конца не узнал причину.
Palladin (2008-05-20 12:33:00) [4]когда Edit стал зарезервированным словом?
azamatufa (2008-05-20 12:33:00) [5]Свершилось!!!
Урра!!!
Одна из форм имела название 'Edit'
Нельзя давать имена зарезервированными словами!!!!!!
azamatufa (2008-05-15 11:58:00) [6]Люди добрые, может кто поможет а?
вот она:
http://ifolder.ru/6568714
чтоб дойти до ошибки надо:
1. нажать Приходные накладные
2. нажать Новая накладная (указать номер и дату)
3. нажать Новый поставщик, ввести его
4. нажать Добавить (товар) и вот в этой форме нажать Выбрать.
Порядочность кода гарантирую.
Игорь Шевченко (2008-05-15 10:17:00) [7]
> канваса нету.
есть
azamatufa (2008-05-15 10:17:00) [8]2 ЮЮ.
1. FormCreate - везде пусто
2. строки убил.
3. не авто
2 Игорь Шевченко
канваса нету.
если честно писал очень быстро и тупо.. спешил... натворил ерунды...
не умею я программировать (((
ЮЮ (2008-05-15 10:00:00) [9]> Так вот, при вызове 3-ей формы из 2-ой формы возникает эта
> ошибка
С таки кодом — нет !!!
procedure TForm3.FormCreate(Sender: TObject);
begin
// здесь что-нибу дь есть?
end;
И убей эти строки, если ещё есть
var
Form3: TForm3;
ФормыЮ надеюсь не автосоздаваемые?
Игорь Шевченко (2008-05-15 09:55:00) [10]
> 'A call to an OS function failed'
Чаще всего ошибка при работе с Canvas
azamatufa (2008-05-15 09:49:00) [11]я проверил это дело так: создал новое приложение, 3 формы пустые... без ничего.. и все работает!! ))
короче надо копать.... (((
azamatufa (2008-05-15 09:40:00) [12]
> И, все ж, сколько контролов на первой и второй форме?
на самом деле не больше десяти... в каждой форме....
ребята, я немного ошибся в описании ситуации, на самом деле так:
И так, сидим в Main From'e
Кнопка 1
with TForm1.Create(Self) do begin
try
ShowModal;
finaly
Free;
end;
end;
Кнопка 2
with TForm2.Create(Self) do begin
try
ShowModal;
finaly
Free;
end;
end;
Так вот, а во второйформе есть кнопка создания еще 3 формы!!!
with TForm3.Create(Self) do begin
try
ShowModal;
finally
Free;
end;
end;
Так вот, при вызове 3-ей формы из 2-ой формы возникает эта ошибка
Leonid Troyanovsky (2008-05-14 14:04:00) [13]
> azamatufa © (14.05.08 13:43) [9]
> Спасибо, буду пробовать!
Ну-ну.
Можно, например, выяснить, что исключение произошло, скажем,
при вызове RaiseLastOSError при GetLastError = 0.
И, все ж, сколько контролов на первой и второй форме?
--
Regards, LVT.
azamatufa (2008-05-14 13:43:00) [14]
> han_malign ©
Спасибо, буду пробовать!
Leonid Troyanovsky (2008-05-14 11:31:00) [15]
> DrPass © (14.05.08 11:03) [7]
> Видишь ли, можно придумать способов
Ставлю на первый из них: несколько сот винконтролов
на первой форме, и примерно тоже на второй.
--
Regards, LVT.
DrPass (2008-05-14 11:03:00) [16]Удалено модератором
han_malign (2008-05-14 11:00:00) [17]1. Project->Project options->Compiler->Use Debug DCUs +
2. Project->Build
3. Tools->Debugger Options->Language Exceptions->Stop on Delphi Exceptions +
4. Run->Run
azamatufa (2008-05-14 10:15:00) [18]"..в свои 18 он знал 20 операционных систем и ни одной женщины..."
простите, Windows, конечно же.. (XP Rus SP2)
Palladin (2008-05-14 09:25:00) [19]не знаю такой ОС
azamatufa (2008-05-14 09:23:00) [20]Не, ну я думал может эта ошибка выскакивает при определенных условиях...
например, EDBEEngine error bla-bla.. - копать в сторону БД...
а что за OS function... OS это типа Венда? т.е. ошибка при вызове функции Венды?
я не вызывл функций ))
| |
Страницы: 