Вернуться   CoderX :: Forums > Основные форумы > Программинг
Войти через OpenID

Программинг Форум для тем связанных с программированием

Чат (Новых сообщений с момента вашего последнего визита нет)
Загрузка...
Задавайте ваши вопросы на форуме. Чат предназначен для небольших разговоров.
 
 
 
Опции темы Опции просмотра
Старый 18.09.2010, 22:59   #1
Пользователь
 
Аватар для ALF
 
Регистрация: 18.09.2010
Адрес: Киев
Сообщений: 70
Сказал Спасибо: 9
Имеет 10 спасибок в 6 сообщенях
ALF пока неопределено
Восклицание Вывод текста в окно игры

Помогите вывести текст в игру.
Вот мой код, но он не работает.
Буду очень благодарен за помощь.
delphi Код:
library MyFirstDLL; uses   SysUtils,   Classes,   Graphics,   Forms,   Windows; const adres = '?DrawString@FCanvasUtil@@QAEHHHPBGPAVUFont@@VFColor@@@Z'; type TBOB = procedure(x,y:Integer; text, font:PChar; color:TColor); stdcall; procedure HelloWorld(); var         DLLInstance : THandle;         BOB: TBOB; begin         { загружаем DLL }         DLLInstance := LoadLibrary('Engine.dll');    @BOB := GetProcAddress(DLLInstance, adres);    BOB(100,100,'SSSSSSSSSSS','Font1',$00FFFFFF);     FreeLibrary(DLLInstance); end; {Какой-нибудь код, в котором используется SomeBuffer.} exports         HelloWorld; begin end.

Последний раз редактировалось xkor, 19.09.2010 в 15:32.
ALF вне форума   Ответить с цитированием
 

  CoderX :: Forums > Основные форумы > Программинг



Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +4, время: 20:35.

vBulletin style designed by MSC Team.
Powered by vBulletin® Version 3.6.11
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd. Перевод: zCarot
Locations of visitors to this page
Rambler's Top100

Вы хотите чувствовать себя в безопасности? чоп Белган обеспечит её!