EOSError with message A call to an OS function failed

← →
azamatufa © (2008-05-14 07:03) [0]

Приветствую!

Вот с сабжем столкнулся.
В коде есть следующее:

1. кнопка1 - create form1
2. кнопка2 - create form2

при п.2 - ошибка (сабж).

если п.2 без п.1 - ошибки нет.

Что может быть?

СПАСИБО!

← →
Palladin © (2008-05-14 08:22) [1]

"– Всё, что угодно, – уверенно молвил тяпнутый." (С)

← →
Leonid Troyanovsky © (2008-05-14 08:57) [2]

> azamatufa © (14.05.08 07:03)

> В коде есть следующее:

Ошибка в 17 строке.

--
Regards, LVT.

← →
azamatufa © (2008-05-14 09:23) [3]

Не, ну я думал может эта ошибка выскакивает при определенных условиях...

например, EDBEEngine error bla-bla.. - копать в сторону БД...
а что за OS function... OS это типа Венда? т.е. ошибка при вызове функции Венды?

я не вызывл функций ))

← →
Palladin © (2008-05-14 09:25) [4]

не знаю такой ОС

← →
azamatufa © (2008-05-14 10:15) [5]

"..в свои 18 он знал 20 операционных систем и ни одной женщины..."

простите, Windows, конечно же.. (XP Rus SP2)

← →
han_malign © (2008-05-14 11:00) [6]

1. Project->Project options->Compiler->Use Debug DCUs +
2. Project->Build
3. Tools->Debugger Options->Language Exceptions->Stop on Delphi Exceptions +
4. Run->Run

← →
DrPass © (2008-05-14 11:03) [7]

Удалено модератором

← →
Leonid Troyanovsky © (2008-05-14 11:31) [8]

> DrPass © (14.05.08 11:03) [7]

> Видишь ли, можно придумать способов

Ставлю на первый из них: несколько сот винконтролов
на первой форме, и примерно тоже на второй.

--
Regards, LVT.

← →
azamatufa © (2008-05-14 13:43) [9]

> han_malign ©

Спасибо, буду пробовать!

← →
Leonid Troyanovsky © (2008-05-14 14:04) [10]

> azamatufa © (14.05.08 13:43) [9]

> Спасибо, буду пробовать!

Ну-ну.
Можно, например, выяснить, что исключение произошло, скажем,
при вызове RaiseLastOSError при GetLastError = 0.

И, все ж, сколько контролов на первой и второй форме?

--
Regards, LVT.

← →
azamatufa © (2008-05-15 09:40) [11]

> И, все ж, сколько контролов на первой и второй форме?

на самом деле не больше десяти... в каждой форме....

ребята, я немного ошибся в описании ситуации, на самом деле так:

И так, сидим в 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-ой формы возникает эта ошибка

← →
azamatufa © (2008-05-15 09:49) [12]

я проверил это дело так: создал новое приложение, 3 формы пустые... без ничего.. и все работает!! ))

короче надо копать.... (((

← →
Игорь Шевченко © (2008-05-15 09:55) [13]

> "A call to an OS function failed"

Чаще всего ошибка при работе с Canvas

← →
ЮЮ © (2008-05-15 10:00) [14]

> Так вот, при вызове 3-ей формы из 2-ой формы возникает эта
> ошибка

С таки кодом  нет !!!
procedure TForm3.FormCreate(Sender: TObject); begin // здесь что-нибу дь есть? end;

И убей эти строки, если ещё есть
var Form3: TForm3;

ФормыЮ надеюсь не автосоздаваемые?

← →
azamatufa © (2008-05-15 10:17) [15]

2 ЮЮ.

1. FormCreate - везде пусто
2. строки убил.
3. не авто

2 Игорь Шевченко
канваса нету.

если честно писал очень быстро и тупо.. спешил... натворил ерунды...
не умею я программировать (((

> канваса нету.

есть

Люди добрые, может кто поможет а?

вот она:
http://ifolder.ru/6568714

чтоб дойти до ошибки надо:

1. нажать Приходные накладные
2. нажать Новая накладная (указать номер и дату)
3. нажать Новый поставщик, ввести его
4. нажать Добавить (товар) и вот в этой форме нажать Выбрать.

Порядочность кода гарантирую.

Свершилось!!!
Урра!!!

Одна из форм имела название "Edit"

Нельзя давать имена зарезервированными словами!!!!!!

когда Edit стал зарезервированным словом?

сегодня )))

ну.. на самом деле не знаю, но переименование имени формы помогло.
Может быть на форме где-то еще были компоненты с таким же именем... хотя ругани не было...

ну да ладно! главное решилось! урра! пусть даже до конца не узнал причину.

> ну да ладно! главное решилось! урра! пусть даже до конца
> не узнал причину.

Танец с бубнами сделал свое дело !!! Урра!!! :)

> azamatufa © (20.05.08 12:37) [20]

Вот из-за:

> пусть даже до конца не узнал причину.

Поэтому и:

> натворил ерунды...
> не умею я программировать (((

:)

EOSError with message A call to an OS function failed Найти похожие ветки