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

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

OemToChar и CharToOem


Separator ©   (2002-12-25 13:31:00) 

Как вызвать напрямую из user32.dll функции OemToChar и CharToOem?


Separator   (2002-12-25 14:12:00) [1]

все сделал, просто забыл добавить stdcall


Separator   (2002-12-25 13:48:00) [2]

Вот что я там нашел, как с этим разобраться?

{$EXTERNALSYM CharToOem}
function CharToOem(lpszSrc: PChar; lpszDst: PChar): BOOL; stdcall;

const
user32 = "user32.dll";

implementation

function CharToOem; external user32 name "CharToOemA";


Пытался написать так:

function CharToOem(lpszSrc: PChar; lpszDst: PChar): BOOL; external user32 name "CharToOemA";

Не работает.


Song   (2002-12-25 13:37:00) [3]

Тогда посмотри как она в Windows.dcu импортируется.


MBo   (2002-12-25 13:37:00) [4]

Импортируй сам, точно как в windows.pas


Separator   (2002-12-25 13:36:00) [5]

Самому, без uses Windows


Внук   (2002-12-25 13:34:00) [6]

Дык Uses Windows и вызывайте. Прямее вроде бы некуда :)


Наверх

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