Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

DLL в Delphi [D7, WinXP]

Страницы: 1 2 3 4 >
DimOk © (2007-06-27 17:08:00)
Столкнулся с такой проблемой: есть DLL в котором находятся функции для работы с PChar. Подключаю DLL динамически к основной программе, получаю адрес необходимой функции и передаю в нее параметр PChar, при отладке в основной программе указан именно тот набор символов, который пользователь вводит, но как только заходим в проект DLL и смотрим там параметр, который передавали то видим совсем другую картину (вводим 123 а получаем Èº}{ÓvF), может кто знает как устранить такую проблему. Буду очень благодарен за любую помощь.

Сергей М. (2007-06-28 14:46:00) [1]

> все работало нормально

Д-да .. И особенно нормально это - "смотрим .. видим совсем другую картину"

Ну так а что ж ты тогда сюда приперся, олух царя небесного, если "все работало нормально" ?)

Anatoly Podgoretsky (2007-06-28 14:45:00) [2]

> но а где сама библиотека...... из которой вызывается эта
> функция....

Лапшу на уши не вешай, прекрасно знаешь, поскольку в [3] привел ее код.

DimOk (2007-06-28 14:44:00) [3]
Удалено модератором

icWasya (2007-06-28 14:35:00) [4]
Тебе ответили
[27]+[29]
и
[31]

Чего не получается?

[57] все работало нормально - это как ?

и [55] - в маем доме нэ виражатса!

DimOk (2007-06-28 14:32:00) [5]
Удалено модератором

DimOk (2007-06-28 14:19:00) [6]
Удалено модератором

Сергей М. (2007-06-28 14:10:00) [7]
Мальчик обиделся)

DimOk (2007-06-28 14:08:00) [8]
Удалено модератором
Примечание: Грубый мат. 30 дней RO

DimOk (2007-06-28 14:06:00) [9]
Удалено модератором
Примечание: Оскорбления, 7 дней RO

Плохиш (2007-06-28 13:29:00) [10]

> Сергей М. © (28.06.07 13:07) [51]
> Johnmen © (28.06.07 13:10) [52]

Взяли и обсмеяли малъчику пипиську :-D

Johnmen (2007-06-28 13:10:00) [11]
Оффтоп2:

> программирую на С++, VB, FP, 1С

Ерунда. Вот если бы программировал на Газпром....

Сергей М. (2007-06-28 13:07:00) [12]
Оффтоп:

> программирую на ..1С

"Нет такой власти !" (c) "Начальник Чукотки"

Нет такого языка, следовательно, и программировать на нем ты никак не мог)

Сергей М. (2007-06-28 12:52:00) [13]

> Я последовал вашему совету

Не вижу как ты ему последовал в библиотечномпроекте, раз задаешь идиотскийвопрос "где сама библиотека ?".

Сергей М. (2007-06-28 12:50:00) [14]

> а где сама библиотека...... из которой вызывается эта

У тебя есть проект библиотеки ?
Есть.

Вот в нем и замени реализацию функции Encrypt() на мою реализацию одноименной процедуры.

Мне что, делать больше нечего, как только приводить текст целого проекта, вместо того чтобы привести только ключевыеего моменты, требующие коррекции ?

Ты репу-то почеши)

DimOk (2007-06-28 12:49:00) [15]
Удалено модератором

Плохиш (2007-06-28 12:46:00) [16]

> Причем сдесь не совсем ясно, что такое:
> TEncrypt = procedure(Buf: PChar; Key: Word); stdcall;

А прочитать про процедуальные типы в справке - это не царское дело?

> Может я вообще не понимаю, но а где сама библиотека.....
> . из которой вызывается эта функция....

В переменную Encrypt надо, перед вызовом, занести адрес требуемой процедуры.

PS. Жалко, что у тебя авто нет...

Сергей М. (2007-06-28 12:46:00) [17]

> Помоему

Это только по- твоемуясно !

Почемы ты считаешь, что это столь же очевидно и другим, не видящим все что у тебя происходит запределами этого кода ?

DimOk (2007-06-28 12:43:00) [18]

> из которой вызывается эта функция....

Сорри, процедура

DimOk (2007-06-28 12:42:00) [19]

> в хост-приложении:
>
> TEncrypt = procedure(Buf: PChar; Key: Word); stdcall;
> ..
> var
> Encrypt: TEncrypt;
> tmpstr: String;
> ..
> tmpstr := frmSettingsFilesAndDB.PasswordArc.Text;
> Encrypr(PChar(tmpstr), 135);
> frmSettingsFilesAndDB.PasswordArc.Text := tmpstr;

Причем сдесь не совсем ясно, что такое:
TEncrypt = procedure(Buf: PChar; Key: Word); stdcall;
Может я вообще не понимаю, но а где сама библиотека...... из которой вызывается эта функция....

DimOk (2007-06-28 12:38:00) [20]

> К чему вся эта шелуха ?
>
> Тебе в [34] был задан конкретный вопрос, ответить на который
> ты не удосужился, предпочтя вместо этого пустить слезы-сопли
> по поводу якобы "обсирания".
>
> Ну а раз не соизволил ответить, значит тебя не интересует
> источник проблемы.

Помоему там было и без это все ясно, что при вызове процедуры

Страницы: 1 2 3 4 >

Наверх

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