Перетаскиваю из экзешника форму(модальный диалог) в дэлэлэ.

← →
Yttrium © (2003-02-06 01:38) [0]

Тут такие препятствия!!!
Надо чтоб тот диалог ссылался на TIniFile в главной форме.

Почему непрокатывает если функцию объявить примерно так(in DLL):

function DlgList(varINI:TIniFile): Boolean; begin with TFormList.Create(nil) do begin ini := varini; //ini - переменная в TFormList Result := (ShowModal = 1); free; end; end;

Точнее прокатывает но после тогого как несколько раз пощёлкаешь в TFormList по TListBox, в обработчике которого идёт обращение к TIniFile каждый Click, желаемый эффект пропадает! Вылетает ошибка "Access violation at address 00401E43 in module "MyINI.EXE". Write of address 02571574". Была бы это хотя бы предвиденная ошибка я бы кинулся отловить ёё, дело в том что всё работало в составе EXE лучше некуда.

Мож я непонемаю как правильно передать процедуре экземпляр класса!!!
Я незнаю как правильно передать процедуре экземпляр класса!!!

И ёщё диалог имеет свою кнопульку на ТаскБаре, как я нестарался - ну скрыл, при возврате из другого приложения ни в какую нехочет окно на передний план выползать.

Какже быть?
ЗЫ Где-то видел какойто креньдель конструктору подсунул Application, т.е. TFormXXXX.Create(Application), откуда он в DLL взял Application????

← →
Nick_N_A © (2003-02-06 05:23) [1]

Несовсем понятна задача.
Перемещение окна:
ReleaseCapture;
SendMessage(Handle,WM_SYSCOMMAND,WM_MOVE+2,0);

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

Перетаскиваю из экзешника форму(модальный диалог) в дэлэлэ. Найти похожие ветки