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

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

Обои [D7, WinXP]


Manur ©   (2007-06-14 16:37:00) 

Здраствуйте.
У меня вот проблема
надыбал исходник процедуры меняющей обои
procedure   ChangeActiveWallpaper(s:pwidechar);
begin ....
end;

procedure TForm1.Button2Click(Sender: TObject);
var
s1:string;
begin
 s1:=FileListBox1.FileName;
 ChangeActiveWallpaper(s1); <- вот тут то и начинается
end;
пробовал писать @s1, @s1[1] не помогает
что посоветуете ?


grisme   (2007-06-15 08:49:00) [1]

ну прямо таки PWideChar(s) попробуй :o)


Manur   (2007-06-15 06:51:00) [2]

это я уже пробовал делать
не совпадение типов


grisme   (2007-06-14 17:56:00) [3]

PChar(s)?


Наверх

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