|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Передача переменной из exe в dll
У меня есть приложение ЕХЕ которое в определенный момент подгружает библиотеку. Мне надо передать значение из Edit EXE в переменную DLL. Как это сделать?
P.S.: Если можно с примером. |
#2
|
||||
|
||||
вызвать функцию dll с нужным по типу параметром из exe
Пишу программы за еду. __________________ |
#3
|
|||
|
|||
В библиотеке есть функция, она постоянно вызывается. Мне надо получить примерно такое: (см. DrawTextA то что курсивом)
Код:
unction EndScene9Callback(self: pointer): HResult; stdcall; var TextRect: TRect; color:TD3DColor; begin TextRect := Rect(300,300,300,300); g_Font.DrawTextA(nil,PChar(From1.Edit1.Text),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff)); Result:=EndScene9Next(self); end; |
#4
|
||||
|
||||
Код:
function EndScene9Callback(self: pointer; text: PChar): HResult; stdcall; var TextRect: TRect; color:TD3DColor; begin TextRect := Rect(300,300,300,300); g_Font.DrawTextA(nil,text,-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff)); Result:=EndScene9Next(self); end; Пишу программы за еду. __________________ Последний раз редактировалось Admin, 10.02.2011 в 15:03. |
#5
|
|||
|
|||
И как дальше быть, что писать в exe ?
P.S.: В библиотеке в uses надо написать Unit1??? (Unit1 - исходник ехе) Вот мои исходники, что надо исправить? Помогите плиз, уже незнаю к кому обращаться. Последний раз редактировалось carliker, 10.02.2011 в 15:52. |