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

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

C++ Builder DLL + Delphi App [D5]


Landgraph ©   (2002-10-12 13:07:00) 

Как надо объявлять функции в DLL, написанной на С++(Borland C++ Builder), чтобы их можно было бы потом вызывать из приложения, написанного под Delphi?
Желательно динамическая загрузка.

Ф-ция:
extern "C" char* __export func (char *a)
{
return a;
}

При загрузке и вызове которой:

procedure TForm1.Button1Click(Sender: TObject);
var
dll:HWND;
asd: function(text:PChar):PChar;
txt: PChar;
begin
@asd:=nil;
dll:=LoadLibrary("dll.dll");
txt:="asd";
if(dll>=32) then
begin
asd:=GetProcAddress(dll, "_func");
if(@asd=nil) then MessageBox(Handle, "NO FUNC!", "Error!", 0)
else
begin
txt:=asd(txt);
ShowMessage(txt);
end;
end;
FreeLibrary(dll);
end;

Возвращается фигня, а не переданная строка =(
Что же делать, как же быть?


Landgraph   (2002-10-13 22:14:00) [1]

В смысле?


TTCustomDelphiMaster   (2002-10-13 11:07:00) [2]

stdcall применяете?


Landgraph   (2002-10-13 09:55:00) [3]

Эй! Мастера! Ну помогите же! Уже с месяц долблюсь! Очень надо! =(


Landgraph   (2002-10-12 17:43:00) [4]

Никто не знает чтоли?


Наверх

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