Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Аналог функции С++ в Delphi


333and ©   (2004-10-28 10:03:00) 

Извините но подниму тему еще раз, а то за ночь она утонула ):
У меня есть функция в DLL
int CALLBACK  PrintFiscalText(HWND hwnd,void (CALLBACK *Fn),LPARAM UI,LPSTR Text)
Вообщем как ее реализовать на Delphi
Я вот думаю так
procedure PrintFiscalText(HWND:hwnd;myProc:Tmyproc;LPARAM:UINT;LPSTR:PAnsiChar)
где myProc ,будет выглядеть примерно так

  myProc: PTMyProc;
 
TMyProc = function(hWnd: HWND; lpText, lpCaption: PAnsiChar; uType: UINT):
  Integer; stdcall;
 
PTMyProc = ^TMyProc;

Вот и думаю верно ли я переписал функцию, на предмет совместимости параметров? Проверить работу в отладчике не могу так как эта функция работает с железом а у меня его нет.


panov   (2004-10-28 10:19:00) [1]

Чуть выше есть 2 кнопки.
Одна называется "Поиск", другая - "Показать мои вопросы".
http://www.delphimaster.ru/cgi-bin/forum.pl?id=1098893884&n=0


Наверх

Титульная страница Поиск, карта сайта Написать письмо