Странно ведет себя Delphi

← →
Goida © (2003-12-22 11:24) [0]

Я в шоке! :???:
Код следующий:

procedure TfrmOperPlan.FormShow(Sender: TObject); var year, month, day : word; begin [b]frmOperPlan.Height := 162;[/b] OperplanExcel.DBaseName:=dbOperPlan.DatabaseName; OperplanExcel.UserName_ :=dbOperPlan.Params.Values["USER NAME"]; OperplanExcel.Password :=dbOperPlan.Params.Values["PASSWORD"]; OperplanExcel.BaseName :=AliasParam(dbOperPlan.AliasName, 0); OperplanExcel.ServerName:=AliasParam(dbOperPlan.AliasName, 1); cbMonth.Enabled := false; lcFinplan.LookupDisplay := "name"; lcFinplan.LookupField := "finplan_id"; ...

Так вот, если выделенная строка закоментирована - все нормально. Но если нет - то вылетает сообщение: Access vilation at address XXX in modul "Operplan.dll"

Почему???

← →
Reindeer Moss Eater © (2003-12-22 11:30) [1]

Потому что переменная frmOperPlan не проинициализирована

← →
BoxTer © (2003-12-22 11:30) [2]

а экземпляр frmOperPlan был ранее создан? Скорее всего нет ...

← →
Silver Alex © (2003-12-22 11:33) [3]

напиши self.Height:=162;

← →
Ega23 © (2003-12-22 11:34) [4]

frmOperPlan это объект типа TfrmOperPlan, так?
Если такой объект не создан, то как проваливаемся в его обработчик?

← →
Reindeer Moss Eater © (2003-12-22 11:37) [5]

frmOperPlan это объект типа TfrmOperPlan, так?
Не так. Это переменная.

Если такой объект не создан,
Он вполне может быть и создан.

то как проваливаемся в его обработчик?
Как обычно.

← →
Goida © (2003-12-22 11:38) [6]

> Silver Alex ©
> напиши self.Height:=162;

Все получилось.
Постоянно забываю про это. Только недавно начал работать с DLL :)

← →
Кщд (2003-12-22 11:43) [7]

конкретно длл здесь непричем
общие принципы-с...

← →
Reindeer Moss Eater © (2003-12-22 11:45) [8]

А зачем Self? Тогда уж просто.

Height:=162;

← →
Anatoly Podgoretsky © (2003-12-22 11:50) [9]

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

← →
Silver Alex © (2003-12-22 11:53) [10]

> Reindeer Moss Eater © (22.12.03 11:45) [8]

а зачем frmOperPlan ?можно просто Height, а можно и не просто.А можно еще (sender as TForm).Height:=162;
и почему бы первым постом было не ответить?

и почему бы первым постом было не ответить?

Но если нет - то вылетает сообщение: Access vilation at address XXX in modul "Operplan.dll"

Почему???

Reindeer Moss Eater © (22.12.03 11:30) [1]
Потому что переменная frmOperPlan не проинициализирована

Есть возражения?

>
> Reindeer Moss Eater © (22.12.03 11:56) [11]
> и почему бы первым постом было не ответить?
>
> Но если нет - то вылетает сообщение: Access vilation at
> address XXX in modul "Operplan.dll"
>
> Почему???

У всех здесь нормально с логикой.И вопрос именно так и звучал. Но ведь данный ответ это не полное решение проблемы.Такое ощущение что мы здесь не помогаем людям, а пытаемся доказать кто же здесь "лучший из лучших"

У всех здесь нормально с логикой
Что, и справка есть?

Такое ощущение что мы здесь не помогаем людям, а пытаемся доказать кто же здесь "лучший из лучших"

Кто виноват, что у тебя такие ощущения?

Странно ведет себя Delphi Найти похожие ветки