Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 12.07.2009, 17:26   #1
The Best
Пользователь
 
Регистрация: 17.12.2008
Сообщений: 50
Восклицание преобразование переменной AnsiString в PAnsiChar для использования в процедуре loadlibrary

У меня возникла следующая проблемка: мне нужно периодически загружать в своей программе разные DLL с помощью opendialog'а. В отдельном массиве я храню данные типа PAnsiChar. Но вот как преобразовать данные типа String(AnsiString) в PAnsiString, так, чтобы сохранялись "нормальные" символы - не знаю.. Вот пример кода:

s:=opendialog1.FileName;
s1:=@s;
LDLL[2].pdll:=s1;
DLLHandle:=loadlibrary(LDLL[2].pdll);

При этом если s='MyCountry.dll' (название открываемого файла с расширением), то s1 равно какой-то ерунде..
The Best вне форума Ответить с цитированием
Старый 12.07.2009, 17:28   #2
Mixasik
New Delphi Coder
Форумчанин Подтвердите свой е-майл
 
Аватар для Mixasik
 
Регистрация: 20.07.2008
Сообщений: 874
По умолчанию

По-моему просто так: LDLL[2].pdll := PAnsiChar(opendialog1.FileName);
Страх это слабость и потому, кто испугался уже побежден.
Mixasik вне форума Ответить с цитированием
Старый 12.07.2009, 20:42   #3
The Best
Пользователь
 
Регистрация: 17.12.2008
Сообщений: 50
Лампочка

ыть) рашил проблему следующим образом:

Код:
mDLL[2]:=opendialog1.FileName; {где mDLL - массив типа стринг}
for I:=1 to 10 do
 LDLL.pDLL:=PChar(mdll[i]);
всем спасибки)
Код:
PS LDLL.pDLL:=PAnsiChar(mdll[i]);
тоже катит)

Последний раз редактировалось Stilet; 13.07.2009 в 11:05.
The Best вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
перевод String to PAnsiChar (Запуск других приложений) ke6ko Общие вопросы Delphi 2 09.07.2009 20:47
программа для лучшего использования прайс листа. pshirik Помощь студентам 4 19.08.2008 16:28
Работа с файлами (создание, удаление, открытие, связываение с переменной, очищение памяти переменной) Arkuz Общие вопросы Delphi 12 25.09.2007 20:47
pansichar to string Toxa Общие вопросы Delphi 16 31.05.2007 13:40