VPF::Преобразование string в PAnsiChar - Форум программистов

BaD_SeCt0R

Дата 30.9.2007, 15:19 (ссылка)

(нет голосов)

Загрузка ...

Lazy Coder

Профиль
Группа: Участник
Сообщений: 432
Регистрация: 9.10.2006
Где: Анапа

Репутация: нет
Всего: 18

Для многих функций WinAPI часто требуется передать в параметрах строку в виде указателя на массив символов ANSI типа PAnsiChar. Как же нам передать обычный стринг? Ответ чрезвычайно прост: нужно привести строку к данному типу "насильно" ))

Код


var
  MyFileName, NewFileName:string
begin
  MyFileName:=paramstr(0);
  NewFileName:='C:\'+ExtractFileName(MyFileName);
  CopyFile(PChar(MyFileName), PChar(NewFileName), false);
end;

Данный код копирует вашу программу при помощи WinAPI функции CopyFile из текущего каталога в корневую диска C:\, и если файл уже существует, копирование не происходит.

Это сообщение отредактировал(а) BaD_SeCt0R - 30.9.2007, 15:21

--------------------

Кто владеет информацией - владеет миром. (С) Френсис Бэкон.

EvilsInterrupt

Дата 11.10.2007, 19:47 (ссылка)

(нет голосов)

Загрузка ...

Executables research

Профиль
Группа: Завсегдатай
Сообщений: 1019
Регистрация: 14.7.2007
Где: Железнодорожный, МО, Россия

Репутация: нет
Всего: 9

Но при этом рекомендуется проверить, а что есть string ? Вдруг используется директива $H, т.к. ее отрицательное значение говорит, о том что используется ShortString, а такой тип надо передавать немного подругому ;)

--------------------

про реверсинг, вроде чтото даже интересно

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »